ColorDialog

0

jak zrobić aby po wybraniu kolorku w ColorDialog była wyświetlana np. w mwmo wartość rbg a nie coś takiego $00400000

0

Hmm... a ColorToRGB(ColorDialog1.Color); i to na przykład jeszcze na stringa zamienić nie wystarczy?--, tradycyjnie pozdrawiam - Numi.

0

nie wiem dokladnie o co chodzi ale moze ten kodzik sie tobie przyda :)

var
RGBColor : Integer;
begin
if ColorDialog1.Execute then
begin
RGBColor := ColorToRGB(ColorDialog1.Color);
Memo1.Lines.Add('RGB:('+IntToStr(GetRValue(RGBColor))+
','+IntToStr(GetGValue(RGBColor))+
','+IntToStr(GetBValue(RGBColor))+')');
end;
end;---=-=[ Delphi 3, 6 ]=-=-
-=-=-==[ LKS ]==-=-=-
-=[ [email protected] ]=-

0

Jeśli dobrze pamietam wystarczy zrobić np coś takiego

listbox1.Color:=colordialog1.color;
//a wtedy zmienna_integer:=listbox1.Color;
powinno podać wartość bardziej przyzwoitą ale nie jestem pewien
-- Waldi Koronowo
[email protected]

1 użytkowników online, w tym zalogowanych: 0, gości: 1, botów: 0