Einzelnen Beitrag anzeigen

ozz

Registriert seit: 26. Jun 2005
131 Beiträge
 
#1

Komponenten in Threads verwenden ja/nein ?

  Alt 18. Dez 2006, 19:34
Hallo zusammen,
ich habe mal eine Frage zum Einsatz von Threads.Ist es sinnvoll, Komponenten direkt in Threads zu verwenden, wie in diesem Beispiel?
Oder spricht etwas dagegen? Wenn ja was?
Danke für die Info!

Delphi-Quellcode:
unit HttpGetThreads;

interface

uses
  Classes,
  IdBaseComponent, IdComponent, IdTCPConnection,IdTCPClient, IdHTTP,IdObjs;//Indy


type
  THttpGetThread = class(TThread)

  private
    { Private-Deklarationen }
  IdHTTP: TIdHTTP;
  ContentStream:TStringStream;
  procedure loadComplete;
  public
    url:string;
  protected
    procedure Execute; override;
  end;

implementation
uses Unit1;//Main

procedure THTTPGetThread.Execute;
begin
  { Thread-Code hier einfügen }
  IdHTTP:=TIdHTTP.Create;
  ContentStream:= TStringStream.Create(toEOF);
  try
  IdHTTP.Get(URL,ContentStream);
  except
  end;
  Synchronize(loadComplete);
  IdHTTP.Destroy;
  ContentStream.Free;
end;

procedure THTTPGetThread.loadComplete;
begin
Form1.parseDoc(ContentStream);
end;

end.
  Mit Zitat antworten Zitat