Simulation Strg+C geht nicht mehr unter Vista

[Logic]

Hallo,

ich hatte bisher Strg+C so similiert (der zu kopierende Text ist dabei makiert und im Vordergrund):

Delphi-Quellcode:

procedure sim_CtrlC;
begin 
  keybd_event(VK_CONTROL, MapVirtualKey(VK_CONTROL, 0), 0, 0); 
  keybd_event(Ord('C'), MapVirtualKey(Ord('C'), 0), 0, 0); 
  keybd_event(Ord('C'), MapVirtualKey(Ord('C'), 0), KEYEVENTF_KEYUP, 0); 
  keybd_event(VK_CONTROL, MapVirtualKey(VK_CONTROL, 0), KEYEVENTF_KEYUP, 0) 
end;

Bin aber zwangs neuem PC auf Windows Vista 64bit umgestiegen.

Habt ihr eine Idee was ich abändern muss, damit es auch hier funktioniert?

Gruß
Logic