Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Sonstige Fragen zu Delphi (https://www.delphipraxis.net/19-sonstige-fragen-zu-delphi/)
-   -   Delphi ColorDialog1.Color schliessen ohne eine Farbe zu wählen ? (https://www.delphipraxis.net/128278-colordialog1-color-schliessen-ohne-eine-farbe-zu-waehlen.html)

thomas2009 27. Jan 2009 11:34


ColorDialog1.Color schliessen ohne eine Farbe zu wählen ?
 
Hallo

1- wenn ich das ColorDialog-Fenster schliesse ohne eine Farbe zu wählen, wird trotzdem
die Farbe des Panelsgeändert !
Was soll ich dagegen tun
Delphi-Quellcode:
  if ColorDialog1.Execute then
  Panel1.Color:=ColorDialog1.Color;
das 2. Problem, ich möchte auch, wenn ich ColorDialog aufrufe, soll automatisch die Panel1.Farbe in ColorDialog markiert werden. Ich meine der ColorDialog soll mit der Farbe von dem Panel starten

Luckie 27. Jan 2009 11:42

Re: ColorDialog1.Color schliessen ohne eine Farbe zu wählen
 
Zitat:

Zitat von thomas2009
1- wenn ich das ColorDialog-Fenster schliesse ohne eine Farbe zu wählen, wird trotzdem
die Farbe des Panelsgeändert !
Was soll ich dagegen tun
Delphi-Quellcode:
  if ColorDialog1.Execute then
  Panel1.Color:=ColorDialog1.Color;

Kann nicht sein. wenn man den Dialog abbricht, liefert die Methode Execute False zurück.

Ist das dein ganzer Code oder kommt danach noch was? Hast du daran gedacht, dass wenn sich die Bedingung auf mehrere Zeilen beziehen soll, diese in einem begin-end-Block gefasst werden müssen?

Zitat:

das 2. Problem, ich möchte auch, wenn ich ColorDialog aufrufe, soll automatisch die Panel1.Farbe in ColorDialog markiert werden. Ich meine der ColorDialog soll mit der Farbe von dem Panel starten
Für eine neue Frage, erstell bitte einen neuen Thread, dann passt auch wieder der Threadtitel.

thomas2009 27. Jan 2009 12:01

Re: ColorDialog1.Color schliessen ohne eine Farbe zu wählen
 
Stimmt. das lag an begin-end Block
Danke

Delphi-Quellcode:
ColorDialog1.Color:=Panel1.Color; // Lösung für Frage 2
if ColorDialog1.Execute then begin // Lösung 1
  Panel1.Color:=ColorDialog1.Color; end;
end;


Alle Zeitangaben in WEZ +1. Es ist jetzt 11:31 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz