如何在正则表达式中跳过引用的文本（或如何在Unicode文本中使用HyperStr ParseWord？）

I need regex help to create a delphi function to replace the HyperString ParseWord function in Rad Studio XE2. HyperString was a very useful string library that never made the jump to Unicode. I've got it mostly working but it doesn't honor quote delimiters at all. I need it to be an exact match for the function described below:I need regex help to create a delphi function t