Einzelnen Beitrag anzeigen

ScharfeMietze

Registriert seit: 5. Mär 2014
114 Beiträge
 
Delphi 10.2 Tokyo Architect
 
#14

AW: raise Exception.Create() feuert ApplicationEvents nicht aus TTask an

  Alt 12. Okt 2018, 16:19
Du kannst doch eine Property im HauptProgramm ansprechen und diese reagieren lassen im Setter

Delphi-Quellcode:
  TTask.Run(
  procedure
  begin
    testExeption:= 'TEST EXCEPTION 1';
  end);
 property testExeption: string read FtestExeption write set_testExeption;
Delphi-Quellcode:
procedure TTGMBot.set_testExeption(const Value: string);
begin
  FtestExeption := Value;
  ShowMessage(value);
end;
Das ist nun ziemlich vereinfacht. aber hier kannst du neue aktionen anstoßen, je nachdem wie du den Fehler behandeln willst...
  Mit Zitat antworten Zitat