Skip to content

Instantly share code, notes, and snippets.

@mdbs99

mdbs99/program2.pas

Created December 11, 2017 01:35
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save mdbs99/979c82ffe9288ec129b5792cfef0d9b0 to your computer and use it in GitHub Desktop.
Save mdbs99/979c82ffe9288ec129b5792cfef0d9b0 to your computer and use it in GitHub Desktop.
Download ZIP
Program 2, Performance and Interfaces
Raw
program2.pas
program Project2;
{$mode delphi}
uses
SysUtils, Unit1;
procedure Execute(const A: IAction);
begin
A.Act;
end;
begin
Execute(TAction.Create);
end.
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment