Please about this code:
type
TClient = class(TObject)
public
Host: String;
Queue: TIdThreadSafeStringList;
end;
var
Clients: TThreadList;
procedure TMain. FormCreate(Sender: TObject);
Please about this code:
type
TClient = class(TObject)
public
Host: String;
Queue: TIdThreadSafeStringList;
end;
var
Clients: TThreadList;
procedure TMain. FormCreate(Sender: TObject);
I have a program that requires a parameter of type TObject, as shown below:
MyProcedure (const AValue: TObject ); I have a Variant array, and I am calling the procedure in a loop, as shown be