Einzelnen Beitrag anzeigen

Benutzerbild von Olli73
Olli73

Registriert seit: 25. Apr 2008
Ort: Neunkirchen
741 Beiträge
 
#6

AW: Prozedur innerhalb einer Prozedur

  Alt 26. Nov 2022, 11:56
Du kannst auch sowas probieren, falls dir das lieber ist:

Delphi-Quellcode:

procedure TForm2.DoSomethingAfterTranslation(OriginalText, TranslatedText, SourceLang, TargetLang: string);
begin
  //Mach was mit TranlatedText ....
end;

procedure TForm2.Button1Click(Sender: TObject);
begin
  DeepLTranslateTextASync(tfile.ReadAllText(FAPIKeyFileName), 'EN', 'DE', Edit1.Text, DoSomethingAfterTranslation);
end;
  Mit Zitat antworten Zitat