Skip to content
This repository has been archived by the owner on Jul 14, 2024. It is now read-only.

Latest commit

 

History

History
46 lines (30 loc) · 504 Bytes

eventually.md

File metadata and controls

46 lines (30 loc) · 504 Bytes

Eventually

The eventually structure is used to a call a number of destructing type of actions.

Usage

begin
	var e : Eventualy = procedure
		begin
			writeln('done');
		end;
	// do other things
end;
type 
	TMyObject = class
		public
			procedure doSomething();
	end;


var 
	e2 : Eventualy;
begin
	w2 := myobj.doSomething;
end;
Eventually.call<integer>(10, procedure (const AContext : integer)
	begin
		writeln('context value ' + IntToStr(AContext));
	end));