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..
Canvas.Pen.Color := farbe;
jmd. nen tipp?