e tova ne go ochakvah , no e fakt :))
nadqvam se i pri teb da varvi .
az go probvah i varhu delphi IDE-to i varhu Notepad
selectira texta bez problem :)
// kachva cursora gore-lqvo
keybd_event(VK_CONTROL, 1, 0, 0);
keybd_event(VK_HOME, 1, 0, 0);
keybd_event(VK_HOME, 1, KEYEVENTF_KEYUP, 0);
keybd_event(VK_CONTROL, 1, KEYEVENTF_KEYUP, 0);
// tuk ima edno "izlishno" natiskane/otpuskane na SHIFT, obache tochno to dade resultat :))
keybd_event(VK_SHIFT, 1, 0, 0);
keybd_event(VK_SHIFT, 1, KEYEVENTF_KEYUP, 0);
// i tuk veche si simuliram SHIFT+CTRL+END i si selectiram texta ...
keybd_event(VK_SHIFT, 1, 0, 0);
keybd_event(VK_CONTROL, 1, 0, 0);
keybd_event(VK_END, 1, 0, 0);
keybd_event(VK_END, 1, KEYEVENTF_KEYUP, 0);
keybd_event(VK_SHIFT, 1, KEYEVENTF_KEYUP, 0);
keybd_event(VK_CONTROL, 1, KEYEVENTF_KEYUP, 0);
kazi dali stava.
______________
Щом не върви от първия път, значи има шанс ![](http://i.dirbg.com/clubs/icons/wink.gif) Редактирано от LongJohn на 11.09.03 13:28.
|