Nebula
2011-12-31 21:36:23
Is there a procedure/function I could use to wait until a specfic string appears in the chatbox? I have tried looking through the functions list but can't find anything. Thanks :)
2011-12-31 21:36:23
2011-12-31 21:38:18
while not(IsChatBoxTextAnyLine('string',clBlack)) do
sleep(100);though you would want a failsafe in there as it could be an endless loop without one
2011-12-31 21:39:04
2011-12-31 21:43:37
Procedure SomeoneTalked;
var
I: Integer;
begin
FixChat;
OldLine := TheLine;
if(LastChatter(TheName))then
begin
GetLastChatText(TheLine);
if OldLine <> TheLine then
try
For I:= 0 To 5 do
begin
PlaySound('C:\Users\Brandon\Downloads\MSN_Sound.wav');
wait(150);
end;
writeln(TheLine);
except end;
end else
begin
GetLastChatText(TheLine);
if OldLine <> TheLine then
try
For I:= 0 To 5 do
begin
PlaySound('C:\Users\Brandon\Downloads\MSN_Sound.wav');
wait(150);
end;
writeln(TheLine);
except end;
end;
end;
2011-12-31 21:44:33
From: [Nathan]
though you would want a failsafe in there as it could be an endless loop without onewhile not(IsChatBoxTextAnyLine('string',clBlack)) do
sleep(100);