Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by DeddyH,
30. Okt 2013
Der Gedanke war mir auch schon gekommen, nur weiß man ja nicht, ob da evtl. noch andere Komponenten dazwischen liegen, die nicht mit ausgeblendet werden sollen.
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by DeddyH,
28. Okt 2013
procedure TForm1.ShowEdits(Show: Boolean);
var
i: Integer;
begin
for i := Low(Edits) to High(Edits) do
Edits.Visible := Show;
end;
//Anzeigen
ShowEdits(true);
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by DeddyH,
28. Okt 2013
Quick and Dirty:
procedure TForm1.Button1Click(Sender: TObject);
var
i: Integer;
begin
for i := 10 to 43 do
TEdit(FindComponent('Edit' + IntToStr(i))).Visible:=true;
end;
Oder aber Du deklarierst Dein Array global bzw. als Feld des Formulars und fügst die Edits dort initial ein. Anschließend musst Du dann nur noch dieses Array durchlaufen.
var