Mega Code Archive

 

Categories / Delphi / Forms

 

[] Ekrandaki formları öğrenin

var I: Integer; begin for I := 0 to Screen.CustomFormCount-1 do ListBox1.Items.Add(Screen.CustomForms[I].Name); end;