Wie konstanter String auf unicode casten?

[DieDolly]

Du bist schon so weit, dass du jetzt alles auf Unicode umstellst. Das ist gut.

Aber

Zitat:

Gibt es event. irgendein elegantes Typcasting

Lass das sein. Stell alles korrekt um und versuch nicht mit irgendwelchen dirty-hack-typecastings alles so hinzubiegen, dass es irgendwie funktioniert.

Zitat:

Eine andere Möglichkeit wäre event. auch anstelle von shortString[255] ein „array[1..1024] of Char“ als Zielablage der Api-Funktion zu nehmen.

Wie wärs mit string ?

Du bist viel zu ressourcen-orientiert meiner Meinung nach.

[DeddyH]

Aus dem Hut:

Delphi-Quellcode:

const
  MYMAXLEN = 255;
var 
  aWinText : String;
  Info1 : string;

begin
  SetLength(aWinText, MYMAXLEN);
  GetWindowText(WindowAbcHandle, PChar(aWinText), MYMAXLEN);
  Info1 := copy(aWinText,1,Pos('unwichtig',aWinText)-1);
  ...

Solange man nicht explizit Ansi und Unicode mischt, sind die meisten Win32-API-Aufrufe eigentlich kompatibel.