Widać gdfgfd jak masz zamiar pisać takie rzeczy pod anonimowym kontem to sie w ogóle nie udzielaj w tym temacie, program napisałem szybciej niż myślałem, ale :
W notatniku wypisuje mi normalnie
www.wp.pl
www.wp.pl3
www.wp.pl
Natomiast w grze , czy na gadu gadu wygląda to tak :
www.wp.pl
www.wp.pl3
w.wp.pl
Dlaczego mi wypisuje "w" zamiast "www" często ?
Oto kod
procedure TForm1.Timer1Timer(Sender: TObject);
begin
keybd_event(vk_Return, 0, 0, 0);
keybd_event(vk_Return, 0, KEYEVENTF_KEYUP, 0);
keybd_event(VkKeyScan('w'), 0, 0, 0);
keybd_event(VkKeyScan('w'), 0, 0, 0);
keybd_event(VkKeyScan('w'), 0, 0, 0);
keybd_event(VkKeyScan('.'), 0, 0, 0);
keybd_event(VkKeyScan('w'), 0, 0, 0);
keybd_event(VkKeyScan('p'), 0, 0, 0);
keybd_event(VkKeyScan('.'), 0, 0, 0);
keybd_event(VkKeyScan('p'), 0, 0, 0);
keybd_event(VkKeyScan('l'), 0, 0, 0);
keybd_event(vk_Return, 0, 0, 0);
keybd_event(vk_Return, 0, KEYEVENTF_KEYUP, 0);
end;
procedure TForm1.Timer2Timer(Sender: TObject);
begin
keybd_event(vk_Return, 0, 0, 0);
keybd_event(vk_Return, 0, KEYEVENTF_KEYUP, 0);
keybd_event(VkKeyScan('w'), 0, 0, 0);
keybd_event(VkKeyScan('w'), 0, 0, 0);
keybd_event(VkKeyScan('w'), 0, 0, 0);
keybd_event(VkKeyScan('.'), 0, 0, 0);
keybd_event(VkKeyScan('w'), 0, 0, 0);
keybd_event(VkKeyScan('p'), 0, 0, 0);
keybd_event(VkKeyScan('.'), 0, 0, 0);
keybd_event(VkKeyScan('p'), 0, 0, 0);
keybd_event(VkKeyScan('l'), 0, 0, 0);
keybd_event(VkKeyScan('3'), 0, 0, 0);
keybd_event(vk_Return, 0, 0, 0);
keybd_event(vk_Return, 0, KEYEVENTF_KEYUP, 0);
end;
end.
Timer1 : 3000ms
Timer2 : 5000ms