Почему не работает?

← →
Flash1 (2002-05-26 16:51) [0]

Есть такой код.
h:=FindWindow("Ieframe",nil); // ищем окно IE LockWindowUpdate(h); // не даем возможность показывть выделение текста SendMessage(h, WM_SYSCOMMAND, SC_HOTKEY, h); // активизируем окно IE PlayKeys(Chr(vk_control)+#0+strtokeys("a")+#0); // нажимаем CTRL-A, т.е выделяем текст PlayKeys(Chr(vk_control)+#0+strtokeys("c")+#0); // нажимаем CTRL-C, т.е копируем выд.текст richedit1.PasteFromClipboard; //Помещаем в richedit1 скопированный текстPlaykeys выполняется на основе модуля sndkey.

Проблемы две.
Во-первых, нужно скопировать весь текст, что находится в старнице Ie. В принципе данная задача успешно выполняется. НО при этом текст страницы полностью выделен, т.е LockWindowUpdate(h) не дает желаемого результата, а именно запрещение выделение текста. А задача заключается в том, чтобы юзер не знал, что его страница скопирована, да и потом это жутко раздражает, когда каждая страница у тебя выделена. Вопрос заключается в том, как бы выделить страницу (т.е произвести стрл-а), но при этом, чтобы весь тескт не выделялся?

Во-вторых, нужно проверять разные загаловки, а вот такая фишка h:=FindWindow("Ieframe",label1.caption), где label1.caption заголовок нового окна не работает, т.к Pchar и Tcaption не любят друг-друга. НО при этом окна то все равно надо разные проверять... Как решить данную проблему?

Очень желателен пример в случае если надо модифицировать код или полностью его изменить

← →
SPeller © (2002-05-26 18:31) [1]

2 Flash1 (26.05.02 16:51)

h:=FindWindow("Ieframe",label1.caption), где label1.caption заголовок нового окна не работает, т.к Pchar и Tcaption не любят друг-друга.

А так пробовал: pchar(label1.caption); ??

Почему не работает? Найти похожие ветки