Einzelnen Beitrag anzeigen

TiGü

Registriert seit: 6. Apr 2011
Ort: Berlin
3.062 Beiträge
 
Delphi 10.4 Sydney
 
#2

AW: TRestRequest ExecuteAsync Parameter Frage

  Alt 5. Jul 2017, 15:31
Delphi-Quellcode:
var
  // aus der Unit REST.Types ganz oben: TCompletionHandlerWithError = TProc<TObject>;
  MyCompletionHandlerWithError: TCompletionHandlerWithError;
begin
  MyCompletionHandlerWithError := procedure(AObject: TObject)
    begin
      if Assigned(AObject) and (AObject is Exception) then
      begin
        raise Exception(AObject); // oder was immer du möchtest!
      end;
    end;

  FRESTRequest.ExecuteAsync(nil, true, true, MyCompletionHandlerWithError);
end;
  Mit Zitat antworten Zitat