Michael Schimmel
20 lines
295 B
ObjectPascal
20 lines
295 B
ObjectPascal
unit Myc.TaskManager;
|
|
|
|
interface
|
|
|
|
uses
|
|
System.SysUtils,
|
|
Myc.Signals;
|
|
|
|
type
|
|
IMycTaskManager = interface
|
|
function CreateTask( const Gate: IMycState; const Proc: TProc ): TMycSubscription;
|
|
end;
|
|
|
|
var
|
|
TaskManager: IMycTaskManager;
|
|
|
|
implementation
|
|
|
|
end.
|