Einzelnen Beitrag anzeigen

meierotto

Registriert seit: 20. Mai 2005
Ort: Cottbus
73 Beiträge
 
Delphi 2005 Professional
 
#7

Re: Thread in TIdTCPClient-Klasse

  Alt 23. Sep 2005, 09:16
Vielen Dank für eure Hinweise und Hilfestellungen,

ein paar Fragen tun sich mir aber noch auf :

Delphi-Quellcode:
type TOwnTCPClient = class(TIdTCPClient)
[...]
procedure DoQuery; //müsste hier nicht class procedure DoQuery definiert sein,
                       //um mit dem TQueryThread darauf zugreifen zu können?
[...]
end;

type TQueryThread = class(TThread)
private
  QT: TQueryThread; //Ist das so richtig?
[...]
end;
[...]

constructor TQueryThread.Create;
begin
  QT := TQueryThread.Create(true); // suspended=True kann hier nicht übergeben werden
end;

procedure TQueryThread.Execute;
begin
  InternalTCP.Query; //InternalTCP? Was verbirgt sich dahinter?
end;

procedure TOwnTCPClient.DoQuery;
begin
  QT.Resume; //Wie kann TOwnTCPClient darauf zugreifen?
end;
Ich erwähnte schon, dass ich mit Threads noch nicht viel gemacht habe?

...
Lass nie die Lösung eines Problems wichtiger werden als die Liebe zu einem Menschen. (Barbara Johnson)
  Mit Zitat antworten Zitat