Parameter an TTask.Run übergeben?

**Zacherl**

Hallo zusammen,

ich versuche mich grad an der neuen Parallel API:

Delphi-Quellcode:

			URL := { erzeuge dynamische URL }

        TTask.Run(procedure

        var

          HTTP: TIdHTTP;

        begin

          HTTP := TIdHTTP.Create(nil);

          try

            HTTP.Get(URL);

Der Code wird in einer Schleife ausgeführt. Jetzt habe ich das Problem, dass der Zugriff auf URL natürlich nicht synchronisiert ist.

Habe ich die Möglichkeit URL direkt als Parameter mitzugeben?

Viele Grüße
Zacherl

**Sir Rufo**

Ja, aber nicht direkt

markieren

Delphi-Quellcode:

			function AsyncHttpGet( const AURL: string ): ITask;

begin

  Result := TTask.Run(

    procedure

    begin

      ...

      Http.Get( AURL );

      ...

    end );

end;

Du könntest auch noch einen Callback übergeben, der aufgerufen wird, wenn das Ergebnis da ist inkl. dem Ergebnis.

**Zacherl**

Danke sehr, damit kann ich arbeiten!

**uups**

Zitat von Sir Rufo:

Du könntest auch noch einen Callback übergeben, der aufgerufen wird, wenn das Ergebnis da ist inkl. dem Ergebnis.

Und wie geht das mit dem Callback? Meinen Sie die Run-Variante mit dem TNotifyEvent als Parameter?

Parameter an TTask.Run übergeben?

Parameter an TTask.Run übergeben?

AW: Parameter an TTask.Run übergeben?

AW: Parameter an TTask.Run übergeben?

AW: Parameter an TTask.Run übergeben?

Forumregeln

Zacherl Registriert seit: 3. Sep 2004 4.629 Beiträge Delphi 10.2 Tokyo Starter	#3 AW: Parameter an TTask.Run übergeben? 18. Apr 2015, 20:37 Danke sehr, damit kann ich arbeiten! Projekte: - GitHub (Profil, zyantific) - zYan Disassembler Engine ( Zydis Online, Zydis GitHub)
	Zitat

uups Registriert seit: 23. Aug 2004 68 Beiträge	#4 AW: Parameter an TTask.Run übergeben? 23. Jan 2017, 21:49 Zitat von Sir Rufo: Du könntest auch noch einen Callback übergeben, der aufgerufen wird, wenn das Ergebnis da ist inkl. dem Ergebnis. Und wie geht das mit dem Callback? Meinen Sie die Run-Variante mit dem TNotifyEvent als Parameter?
	Zitat