2 Instanzen eine Klasse gleichzeitig berechnen

[bernhard_LA]

mein Code geht wie folgt ,
warum gehen die beiden Parallel.Join( ) Aufrufe nicht ?
Der Code a.berechne, b.berechne wird nicht ausgeführt.

Delphi-Quellcode:

uses  .... , OtlParallel, ......   ;


Type TMyClass= Class
          ....
          procedure Berechne();
          .....
     end; 


var  a, b  : TMyClass;


     a := TMyClass.Create ;
     b := TMyClass.Create ;



     //   diese code  funktioniert 
     a.Berechne();
     b.Berechne(); 


     //geht nicht, compile  = OK
       Parallel.Join(
         procedure begin
         a.Berechne();
         end,
         procedure begin  
         b.Berechne();
         end );

    //geht nicht, compile = OK; 
       Parallel.Join(
         a.Berechne(); b.Berechne() );

[himitsu]

Weil jemand vergessen hat zu sagen, dass es auch gemacht werden soll?

Delphi-Quellcode:

Parallel.Join(
  procedure
  begin
    ...
  end,
  procedure
  begin
    ...
  end).Execute;

Pssst: Das Beispiel ist aus der Doku (erster Link in OtlParallel) :wink:

Zitat:

//geht nicht, compile = OK;
Parallel.Join(
a.Berechne(); b.Berechne() );

Das kompiliert wirklich? (oder meinst mit einem Komma)

[bernhard_LA]

Danke :-) .execute hat gefehlt
Code funktioniert jetzt