Einzelnen Beitrag anzeigen

hoika

Registriert seit: 5. Jul 2006
Ort: Magdeburg
8.276 Beiträge
 
Delphi 10.4 Sydney
 
#1

ParentFont aller Komponenten eines Forms setzen

  Alt 23. Nov 2011, 08:22
Hallo #,

ich will alle ParentFont aller Komponenten auf False setzen.
Ich gehe wie immer vor (Components[], ComponentCount)
Geht hier nur leider nicht.
ParentFont scheint nicht irgendwo public zu werden, wie z.B. Caption in TControl.

Muss ich jetzt für jedes meiner Komponenten ein eigenes

Delphi-Quellcode:
Component:= Components[i];
if Component is TLabel then
begin
  TLabel(Component).ParentFont:= False;
end;
if Component is TEdit then
begin
  TEdit(Component).ParentFont:= False;
end;


Danke

Heiko
Heiko

Geändert von hoika (23. Nov 2011 um 08:39 Uhr)
  Mit Zitat antworten Zitat