Innerhalb meines Progs geht es. will ich aber von einem anderen Prog den Text eines Feldes geht es nicht.
Kann das evtl hiran liegen:
Code:
procedure TForm1.FormCreate(Sender: TObject);
var ok: longbool;
begin
i:=0;
ok:=RegisterHotKey(Form1.Handle, ID, MOD_Alt, Ord('Q'));
if not ok then showmessage('Fehler');
ok:=RegisterHotKey(Form1.Handle, ID+1, MOD_control, vk_f1);
end;
Irgendwie stört das form1. Aber ich weiß nicht wie das sonst funzen soll.