Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Dragon27,
27. Jul 2006
Hallo,
danke der Code funct jetzt bei Formularen. Nun benutze ich auch Frames und habe das hier geändert aber es geht nicht :-( wieso?
if Application.Components is TFrame then
begin
for i2 := 0 to TFrame(Application.Components).ComponentCount -1 do
if TFrame(Application.Components).Components is TLabel then // <-- hier
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Dragon27,
27. Jul 2006
Danke für die Hilfe....
aber bei diesem Code:
for I := 0 to Application.ComponentCount-1 do
begin
if Application.Components is TForm then
begin
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Dragon27,
27. Jul 2006
Hallo,
habe das hier Probiert:
for I := 0 to Application.ComponentCount-1 do
begin
if Application.Components is TForm then
begin
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Dragon27,
27. Jul 2006
Hallo habe folgenden Code gefunden:
for I := 0 to chatform.ComponentCount-1 do begin
if chatform.Components is TLabel then
TLabel(chatform.Components).Font.Color := clred;
end;