TWString = record
  WString: WideString;
end;

struct TWString {
  BSTR WString;
};