Typumwandlung string -> PAnsiChar

[sx2008]

Ist doch eigentlich ganz einfach; man braucht einen AnsiString als Zwischenspeicher:

Delphi-Quellcode:

var
  to_addr : AnsiString;
begin
  ...
  to_addr := Mail.Values['to'];  // UnicodeString auf AnsiString kopieren
  Receip.lpszName:= PAnsiChar(to_addr);