Главная страница
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.017 c
14-99330
vopros
2002-12-06 13:20
2002.12.30
Люди иногда не могу понять руссий язык


1-99088
Yakudza
2002-12-19 16:03
2002.12.30
TButton


14-99269
NOV
2002-12-09 00:24
2002.12.30
DOA для DELPHI 6


4-99425
TankMan
2002-11-05 15:35
2002.12.30
Очень уж быстрая перезагрузка?


4-99396
wandp
2002-11-14 04:49
2002.12.30
Sleep в canvas e