Tastaturkommandos an ein Handle senden (Remote)

[little_budda]

Hallo,


habe hier im Forum Code gefunden zum setzen von Editfeldern.
Aber er trägt mir nichts ein...

Delphi-Quellcode:

procedure Tfrm_main.btn_setTextClick(Sender: TObject);
var sEditValue : string;
    Buffer     : array of Char;
    ix, iMax   : integer;
begin
  sEditValue := ed_text.text;          // Text aus dem Edit lesen
  iMax := length(sEditValue);          // Länge ermitteln
  setlength(Buffer, iMax);             // Array setzen
  for ix := 1 to iMax do       
    Buffer[ix - 1] := sEditValue[ix];  // Array füllen

  // PostMessage(extWindowsHandle, WM_SETTEXT, iMax, Integer(@Buffer));  // Text auf das Handle schreiben
  SendMessage(extWindowsHandle, WM_SETTEXT, iMax, Integer(@Buffer));  // Text auf das Handle schreiben

Ich bin mir nicht wirklich sicher ob ich die Umwandllung in "Buffer " brauche
oder ob ein String schon automatisch als Array of Char angesehen wird ...


Tipps?
Vorschläge?