Hallo
Delphi-Quellcode:
procedure TForm1.Timer1Timer(Sender: TObject);
begin
keybd_event(VK_CONTROL, 0, 0, 0);
keybd_event(Ord('C'), 0, 0, 0);
keybd_event(VK_CONTROL, 0, KEYEVENTF_KEYUP, 0);
Sleep(10);
if Clipboard.HasFormat(CF_TEXT) then Caption:= Clipboard.AsText;
end;
Ist zwar grausig, aber so gehts überall. Solltest nur schauen, dass Du den vorherigen Inhalt der Zwischenablage irgendwie sichern kannst, damits wenigstens ein bisschen sauberer ist.
Gruss
Shaman