Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.12.30;
Скачать: CL | DM;

Вниз

Посылка строки с переходом на следующую строку!   Найти похожие ветки 

 
Arkan ©   (2002-11-12 18:50) [0]

Здравствуйте!
У меня прога открывает блокнот и туда посылает строку(SendMessage(WHandle,WM_SETTEXT,length(x),integer(x));). Внимание, вопрос! :) Как мне перейти на другую строку? Послать ему какой-то спец символ? Возможно, но останется ли у меня предыдущая строка??? Заранее спасибо.
И ещё вопросик! Как мне лучше всего сделать задержку???
Например, можно так:
h:=createevent(nil,true,false,"");
waitforsingleobject(h,100);
closehandle(h);
Моно и так:
sleep(100);
Объясните, что лучше или где использовать??


 
Arkan ©   (2002-11-12 22:47) [1]

ну хотя бы с задержками помогите :(


 
SottNick ©   (2002-11-13 06:26) [2]

x:="Строка1"#13#10"Строка2";
SetWindowText(WHandle,Pchar(x));

sleep(100);


 
Guerrillero ©   (2002-11-13 15:27) [3]

Чтобц перейти на другую строку надо нажать Enter в конце этой строки.Попробуй это реализовать c помощью сообщений, например :
var
H : THandle;
I : Integer;
begin
WinExec("notepad",SW_SHOWNORMAL);
H := FindWindow("Notepad",nil);
if H < 32 then Exit;
H := FindWindowEx(H,0,"Edit",nil);
if H < 0 then Exit;
SendMessage(H,WM_SETTEXT,0,Integer(PChar("Ха-Ха")));
for I := 0 to 4 do // переходим в конец строки
begin
SendMessage(H,WM_KEYDOWN,VK_RIGHT,0);
SendMessage(H,WM_KEYUP,VK_RIGHT,0);
end;
SendMessage(H,WM_CHAR,VK_RETURN,0);




Страницы: 1 вся ветка

Текущий архив: 2002.12.30;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.012 c
3-98963
kol
2002-12-09 14:06
2002.12.30
События компонента TField


7-99376
maniacnnov
2002-09-25 16:14
2002.12.30
+ 5 вольт на лпт порт


14-99356
Uran
2002-12-10 16:12
2002.12.30
Программа для чтения этого форума.


1-99089
chsv
2002-12-16 20:12
2002.12.30
специальный графический формат


1-99193
Hooch
2002-12-19 09:31
2002.12.30
Word + Delphi