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