Machs so:
Unter Dialoge nimmste den ColorDialog.
Und um dass die Farbe zu bekommen: (Am beispiel eines Buttons)
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
begin
if colordialog1.Execute then begin
kawas.color := colordialog1.Color;
end;
end;
Colordialog1.color is dann eben die Farbe die du ausgewählt hast!