Text Kopieren mittels Shift Ende

[Dumpfbacke]

Hallo,
ich wollte z.B. eine Text aus dem Editior mittels eines anderen Programmes kopieren. Dazu positioniere ich erst die Maus in den Editor und klicke mit links. Nun vershciebe ich den Cursor an die endsprechende Stelle. (Anfang der Zeile). Nun wolle ich ein Shift Ende senden, damit der Text markiert ist. Dises mache ich mittels.

Delphi-Quellcode:

Keybd_event(vk_Shift,0,0,0);
keybd_event(VK_end,0,0,0);
keybd_event(vk_Shift,0,keyeventf_keyup,0);
keybd_event(ck_end,keyevent_keyup,0);

Der Cursor geht auch ans ende der Zeile nur die Zeile ist nicht blau makiert. Ich wollte dann einfach dein CTRL C senden um den Text in die Zwischenablege zu bekommen.

Wie kann ich den ein Shift End simumieren ?
Was mich jedoch wurdeter ein CRTL End geht ohne Probleme



Tanja