moparisthebest
/
Simba
mirror of https://github.com/moparisthebest/Simba
1
0
Fork 0
Code Issues Releases Wiki Activity

Fix InvalidTypecast. Forms are cleaned up by the LCL.

This commit is contained in:
Merlijn Wajer 2010-07-23 13:23:04 +02:00
parent 8d852cf18f
commit 1c026294ba
3 changed files with 5 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
Extensions/reflection.sex
View File

@ -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;

2
Extensions/security.sex
View File

@ -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}

4
Extensions/srl.sex
View File

@ -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;