Skip to content

Instantly share code, notes, and snippets.

@MySohoWiki
Created December 7, 2022 09:00
Show Gist options
  • Save MySohoWiki/a8ad4a1475cd810bf2d05ed17b0a2ec0 to your computer and use it in GitHub Desktop.
Save MySohoWiki/a8ad4a1475cd810bf2d05ed17b0a2ec0 to your computer and use it in GitHub Desktop.
Add IndyTask
//When to be visible the task
Procedure UpdTrnCus(indi: TADC_IndirectlyTask);
begin
indi.Visible:= (frm.CurrentView = fvDetail);
end;
//Procedure for execute
procedure ExecTrnCus();
begin
showmessage('bla bla bla');
end;
Begin
frm.AddIndiTask('Τιμολόγηση πελάτη', @ExecTrnCus, @UpdTrnCus, true);
End.
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment