Thema
:
FreePascal
Probleme bei der Code-Übernahme von Delphi ...
Einzelnen Beitrag anzeigen
DieDolly
Registriert seit: 22. Jun 2018
2.175 Beiträge
#
10
AW: Probleme bei der Code-Übernahme von Delphi ...
21. Nov 2018, 13:13
Nur so dahingeschrieben
zusammenfalten
·
markieren
Delphi-Quellcode:
var
FormList: TList<TCustomForm>
FormList := TList<TCustomForm>.Create;
FormList.Add(Result);
for
i := 0
to
FormList.Count - 1
do
begin
if
FormList.Items[i] = Form1
then
begin
FLastIndex := iIndex;
Result := FormList.Items[i];
Break;
end
;
end
;
Zitat
DieDolly
Öffentliches Profil ansehen
Mehr Beiträge von DieDolly finden