Personale/Router4Delphi
1
0
Fork 0
mirror of https://github.com/CloudDelphi/Router4Delphi.git synced 2025-12-19 16:53:43 +01:00
Code Issues Packages Projects Releases Wiki Activity

Compare commits

base: Personale:master
Branches Tags
Personale:master
Personale:1.0.8
Personale:1.0.7
Personale:1.0.6
Personale:1.0.5
Personale:1.0.4
Personale:1.0.3
Personale:1.0.2
Personale:1.0.1
..
compare: Personale:1.0.7
Branches Tags
Personale:master
Personale:1.0.8
Personale:1.0.7
Personale:1.0.6
Personale:1.0.5
Personale:1.0.4
Personale:1.0.3
Personale:1.0.2
Personale:1.0.1

No commits in common. "master" and "1.0.7" have entirely different histories.
master ... 1.0.7

1 changed files with 0 additions and 3 deletions
Show Stats Expand all files Collapse all files

3
src/Router4D.Helper.pas
View File

@ -30,10 +30,7 @@ begin
for lIndex := Self.ControlCount - 1 downto 0 do for lIndex := Self.ControlCount - 1 downto 0 do
begin begin
if (Self.Controls[lIndex] is TForm) then if (Self.Controls[lIndex] is TForm) then
begin
(Self.Controls[lIndex] as TForm).Close; (Self.Controls[lIndex] as TForm).Close;
(Self.Controls[lIndex] as TForm).parent := nil;
end;
end; end;
end; end;