ColorDialog - Farbe speichern?

[He4db4nger]

hi,

bevor ich jetzt wieder angepflaumt werde: Erstell ich halt für jedes Problem nen neuen Thread.

Ich hab mir jetzt nen ColorDialog eingepflanzt:

Delphi-Quellcode:

procedure TForm1.Button6Click(Sender: TObject);
begin
   ColorDialog1.Execute;
end;

Ok, sie wird auch aufgerufen und man kann die Farbe auswählen.
edit: Mittlerweile behält er sich, was ausgewählt ist.

die Farbe wird an die Variable "farbe" : TColor weitergegeben.

Delphi-Quellcode:

procedure TForm1.ColorDialog1Close(Sender: TObject);
begin
   ColorDialog1.Color := farbe;
end;

wenn jedoch das Fenster zu ist und ich die Farbe nutzen möchte, sei es durch die Zeichnung einer meiner Geofiguren,
dann bleibt das schwarz..

Delphi-Quellcode:

Canvas.Pen.Color := farbe;

jmd. nen tipp?

[jfheins]

Probier mal

Delphi-Quellcode:

farbe := ColorDialog1.Color;

;) :mrgreen:

[He4db4nger]

hm,klappt nicht wirklich.

[SirThornberry]

wie zeichnest du deine Geofiguren? hast du schonmal anstelle von pen.color, brush.color versucht? Je nach dem welche Methoden du zum zeichnen nimmst musst du auch die Farbe wo anders setzen.

[He4db4nger]

Delphi-Quellcode:

with PaintBox1 do begin
    hoehex := width DIV 2;
    hoehey := height DIV 2;
    farbe := Canvas.Pen.Color;
    Canvas.Pen.Width := 10;
    Canvas.Ellipse(hoehex - rad, hoehey - rad, hoehex + rad, hoehey + rad);
    Canvas.Ellipse(hoehex - Umf, hoehey - Umf, hoehex + Umf, hoehey + Umf);
  end;

so geb ich die figuren aus, hab eben auch mal .brush gehabt, funzt aber auch nich..

[Brainstalker]

Schreib einfach mal

Delphi-Quellcode:

Canvas.Pen.Color := farbe;

Der Wert dem du etwas zuweist steht immer links.
Der Wert der zugewiesen werden soll steht rechts.