Inhalt von Textfeldern in externer Anwendung ändern

[little_budda]

Hallo,

also ich habe jetzt eine Form mit zwei Buttons.
Der eine schickt eine Taste ("b", Key 66). Das klappt. (Damit wähle ich mein Edit aus)
Der zweite schickt "willi". Das klappt nicht.

Hier der Code:

Delphi-Quellcode:

procedure Tfrm_main.btn_sendKeyClick(Sender: TObject);
begin
  iSendKeyCode := 66;  // Klein B
  PostMessage (extWindowsHandle,  // Handle des externen Programmes
               WM_CHAR,           // Übergabe = Keycode
               iSendKeyCode,      // KeyCode
               0                  // Vierter Parameter (frei)
              );
end;


procedure Tfrm_main.btn_setTextClick(Sender: TObject);
var sEditValue : string;
begin
  sEditValue := "willi";
  SendMessage(extWindowsHandle,           // Text des Objektes schreiben
              WM_SETTEXT,                 // Übergabe = Text
              0,                          // Dritter Parameter (frei)
              Integer(Pchar(sEditValue))  // Adresse der Variablen ("willi")
              );  
end;

Ich hab so keine Idee mehr ...