Entwickler-Ecke

Sonstiges (Delphi) - Neue Line dann Aktion?


DelphiNoobCoder - Fr 23.03.07 17:24
Titel: Neue Line dann Aktion?
Hi
also ich versuche gerade bei einem Chat wenn jemand schreibt dass dann eine Aktion ausgefürht wird.

Also wenn InterLan schreibt soll er eine Aktion ausfürhen.
Diesen Code hab ich von DaKirsche bloß wenn ich den auf Timer leg und mit InterLan schreib Passiert nix warum?


Delphi-Quelltext 
1:
2:
3:
4:
5:
6:
7:
8:
9:
 
var i,a:integer ;
begin
for i := a + 1 to a + 1 do begin
if (pos('InterLan: ',log.lines[i]) > 0) then begin
 keybd_event(91,MapVirtualKey(91,0),0,0);
 keybd_event(91,MapVirtualKey(91,0),KEYEVENTF_KEYUP,0);
a := i;
end;
end;


MFG Martin


Narses - Fr 23.03.07 23:10
:?!?:

Wenn du keine Ahnung hast, was du da abschreibst, dann solltest du das lassen... :?

cu
Narses


Entwickler-Ecke.de based on phpBB
Copyright 2002 - 2011 by Tino Teuber, Copyright 2011 - 2026 by Christian Stelzmann Alle Rechte vorbehalten.
Alle Beiträge stammen von dritten Personen und dürfen geltendes Recht nicht verletzen.
Entwickler-Ecke und die zugehörigen Webseiten distanzieren sich ausdrücklich von Fremdinhalten jeglicher Art!