mirror of
https://github.com/moparisthebest/Simba
synced 2025-01-30 23:00:18 -05:00
Fix InvalidTypecast. Forms are cleaned up by the LCL.
This commit is contained in:
parent
8d852cf18f
commit
1c026294ba
@ -213,8 +213,8 @@ procedure Free;
|
|||||||
begin
|
begin
|
||||||
if (started) then
|
if (started) then
|
||||||
Timer.Enabled := False;//Freeing the components is not needed, as they will be freed upon the freeing of Simba.
|
Timer.Enabled := False;//Freeing the components is not needed, as they will be freed upon the freeing of Simba.
|
||||||
if F <> nil then
|
{ if F <> nil then
|
||||||
F.Free;
|
F.Free; }
|
||||||
end;
|
end;
|
||||||
|
|
||||||
procedure Attach;
|
procedure Attach;
|
||||||
|
@ -1395,7 +1395,7 @@ end;
|
|||||||
procedure Free;
|
procedure Free;
|
||||||
begin
|
begin
|
||||||
// Only here so people won't freak out. :)
|
// Only here so people won't freak out. :)
|
||||||
Icon_Lock.Free;
|
{ Icon_Lock.Free; }
|
||||||
end;
|
end;
|
||||||
|
|
||||||
{$IFDEF EXTENSION}
|
{$IFDEF EXTENSION}
|
||||||
|
@ -267,8 +267,8 @@ procedure Free;
|
|||||||
begin
|
begin
|
||||||
if (started) then
|
if (started) then
|
||||||
Timer.Enabled := False;//Freeing the components is not needed, as they will be freed upon the freeing of Simba.
|
Timer.Enabled := False;//Freeing the components is not needed, as they will be freed upon the freeing of Simba.
|
||||||
if F <> nil then
|
{ if F <> nil then
|
||||||
F.Free;
|
F.Free; }
|
||||||
end;
|
end;
|
||||||
|
|
||||||
procedure Attach;
|
procedure Attach;
|
||||||
|
Loading…
Reference in New Issue
Block a user