Forum: Programmieren allgemein
by mimi,
5. Dez 2003
hast recht, aber dann nimmt man einen speedbuttone oder buttons die so eine eigenschaft haben und fertig :)
Forum: Programmieren allgemein
by mimi,
4. Dez 2003
ich kenne keine komponente wo es nicht eine color eingenschaft gibt.
ansonsten muss du alle eingenschaften durchgehen mit:
var
i: Integer;
Component: TComponent;
begin
for i := 0 to ComponentCount - 1 do
begin
Component := Components;
Forum: Programmieren allgemein
by mimi,
4. Dez 2003
du musst alle komponenten durchgehen die es gibt und nach den eigenschaften color bzw. font.color suche, möchtes du die font farhbe ändern oder die hintergrund farbe???
du könntes das auf jeden fall so machen:
procedure setColorAll;
begin
for i:=0 to Form1.componentcount{weiß nicht ob ich es richtig schreibe} do begin
with Form1.component{weiß nicht ob ich es richtig schreibe} do...