Hallo!

Ich habe meine schon etwas älteren pas-Dateien soweit nötig für Delphi XE2 angepasst. Aber warum funktioniert hiermit www.swissdelphicente...showcode.php?id=1242 das Übersenden zB. eines Strings an ein Fenster eines anderen (von mir geschriebenen) Programmes nicht mehr? Es kommt entweder nichts an oder der String ist zu kurz, und
cbData := StrLen(PChar(Edit1.Text)) + 1; klappt überhaupt nicht.
Gebe ich hier eine fixe Zahl an, klappt es zwar, aber irgendwann kommt ein Zugriffsfehler. Ändern von PChar auf PAnsiChar nützt nichts.

Mit anderen Worten: Das funktioniert einfach nicht mehr. Dabei hatte ich so ähnlichen Code (= die Teile, die den Textstring verarbeiten) fix und fertig in einer eigenen pas-Datei und musste einfach nur die Prozedur SendText(//...) aufrufen.

Was passt hier nicht mehr?

Die Größe müsste afaik mit WideChar so aussehen



Ein reines Umstellen auf PAnsiChar hat wahrscheinlich nicht geklappt, weil die ganzen API-Aufrufe in dem Code bei XE2 die Wide-Variante nutzen.

Gausi hat folgendes geschrieben :

Die Größe müsste afaik mit WideChar so aussehen markieren Delphi-Quelltext     1: cbData := (StrLen(PChar(Edit1.Text)) + 1) * SizeOf(Char);

So einfach! Jetzt funktioniert es, vielen Dank!