Plötzlich Invalid typecast - aber ich hab nichts geändert

[shmia]

Delphi-Quellcode:

 Song: AnsiString;  // <====
...
  SendMessage(hWinAmp, WM_GETTEXT, Len + 1, Integer(PChar(Song)));