Forum: Programmieren allgemein
Delphi
by BasilBavaria,
20. Sep 2013
In den Proceduren passiert zur zeit nichts, was aus meiner Sicht damit zusammenhängen könnte:
procedure TFrmMain.FormCreate(Sender: TObject);
begin
FrmMain.WindowState := wsMaximized;
end;
procedure TFrmMain.FormPaint(Sender: TObject);
begin
Forum: Programmieren allgemein
Delphi
by BasilBavaria,
19. Sep 2013
Aufruf der Farbänderung - entspricht Button1Click im vg. Code
procedure TFrmMain.ImageAppOptionsClick(Sender: TObject);
begin
FrmMainOptions.ShowModal;
FrmMain.Color := OptFarbe;
// ListBox1.Color := OptMetroFarbe;
// ListBox1.Repaint;
Forum: Programmieren allgemein
Delphi
by BasilBavaria,
19. Sep 2013
Danke für die Rückmeldung. Hatte ich mir auch gedacht:
FrmMainOptions.ShowModal; // <-- Farbänderung im OptionsDialog
FrmMain.Color := OptFarbe; // <-- wird übernommen - OK!
//folgende drei Anweisungen werden ignoriert
ListBox1.Color := OptFarbe;
ListBox1.Repaint;
ListBox1.Refresh;
Forum: Programmieren allgemein
Delphi
by BasilBavaria,
18. Sep 2013
Hallo zusammen!
Ich steh mal wieder auf'm Schlauch:
Der Anwender soll die Fare eines Formulars ändern können.
Alle Elemente des Formulars haben die Eigenschaft
ParentColor = true
Bei Programmstart passt es auch (1.Teilbild im Screenshot)