Source cleanup

This commit is contained in:
Steve Jordi 2026-10-02 16:03:31 +02:00
commit 0e467bcaed

View file

@ -37,7 +37,6 @@ type
private
{ Private declarations }
FMyTask : ITask ;
currentPos : TPoint ;
counter : Integer ;
procedure startTask ;
procedure stopTask ;
@ -63,7 +62,6 @@ implementation
procedure TfrmMain.FormCreate(Sender: TObject);
begin
runIt := False ;
currentPos := Point( mouse.CursorPos.X , mouse.CursorPos.Y ) ;
counter := 0 ;
end;