Sorry to ask this but.
Im creating a IRC client that will connect to multiple servers.
It already connects and sends data to each of them, but Im having troubles retrieving data from them.
Every time I try to retrieve the data, it locks SCAR up.
Is it because Im using a TTimer or what?
Heres the code.
SCAR Code:
procedure dataCollect(sender : TObject);
var
iCount : Integer;
Data : Array[1..4] of string;
dA : Boolean;
begin
for iCount := 1 To Length(mArray) do
begin
dA := ReadConnectionData(mArray[iCount].Con, Data[iCount]);
if(Data[iCount] <> '') then
begin
Writeln(Data[iCount]);
end;
end;
exit;
end;
Thanks. :]
Edit: Fixed the slopiness. :]]