Danke Leute
Google hat auch wie immer weiter geholfen
Den Code komplett und gekocht aus China
:
Delphi-Quellcode:
begin
sleep(1000);
edit1.SetFocus;
edit1.SelectAll;
sleep(2000);
edit1.CopyToClipboard;
edit2.SetFocus;
sleep(2000);
keybd_event(VK_CONTROL, 0, 0, 0);
keybd_event(Ord('V'), 0, 0, 0);
keybd_event(Ord('V'), 0, KEYEVENTF_KEYUP, 0);
keybd_event(VK_CONTROL, 0, KEYEVENTF_KEYUP, 0);
end;