Das sicherste wäre also alle befehle einzeln hinzuschreiben?
Oder wie genau funzt das?
Delphi-Quellcode:
procedure ShowControls (const aControls: array of TControl;
const aVisible: Boolean = True);
var
i : Integer;
begin
for i := 0 to High(aControls) do
aControls[i].Visible := aVisible;
end;
// Anwendung:
ShowControls ([Button4, Button5, Edit1, Edit3, Panel42]);
Gruß der dumme Fussel
