delphi-code in c++ - wer hilft?

[marlem]

hi leute,

das hier:

procedure TFrmMain.strgbtClick(Sender: TObject);
begin
if strgbt.down = false then
begin
Strg1.Checked := false;
keybd_event(vk_Control, 0, KEYEVENTF_EXTENDEDKEY or KEYEVENTF_KEYUP, 0);
end;

if strgbt.down = true then
begin
Strg1.Checked := true;
keybd_event(vk_Control, 0, KEYEVENTF_EXTENDEDKEY, 0);
end;

end;

ist eine oncklick-procedur eines schalters in delphi-code!
es geht hier um einen button den man per mauslick "einrasten" und wieder ausrasten lassen kann!
in delphi heißt das ding "speedbutton"!
der befehl keybd_event ist ein api-befehl.
wer kann den code in c++ konvertieren?