Einzelnen Beitrag anzeigen

Benutzerbild von Sharky
Sharky

Registriert seit: 29. Mai 2002
Ort: Frankfurt
8.252 Beiträge
 
Delphi 2006 Professional
 
#1

Alle Controls mit FOR-IN durchlaufen?

  Alt 5. Jun 2005, 08:49
Hai,

ist es möglich diesen Code:
Delphi-Quellcode:
var
  ndx : Integer;
begin
  for ndx := 0 to Panel1.ControlCount -1 do
  begin
    if (Panel1.Controls[ndx] is TSpeedButton) then
    begin
      (Panel1.Controls[ndx] as TSpeedButton).Glyph := nil;
    end;
  end;
end;
mit dieser "FOR-IN" Konstruktion zu ersetzen?

Irgendwie blicke ich bei der noch nicht so richtig durch.
Stephan B.
"Lasst den Gänsen ihre Füßchen"
  Mit Zitat antworten Zitat