Помощь - Поиск - Пользователи - Календарь
Полная версия этой страницы: Срочно нужна помощь в Delphi!!!
Форум программистов > Системное программирование > Delphi и Pascal > Delphi - FAQ
LuberZ
По точкам, которые вносят в StingGrid, строится график в Image. После выполнения я изменяю цвет графика. Затем я сохраняю координаты в .txt файле.
ВОПРОС: как там же сохранить выбранный цвет гафика и чтобы при загрузке из файла цвет был выбранным?
Серёга
LuberZ
цвет - это шеснадцатиричное число.
вот как число и сохраняйте
AC Leo
Есть DBGrid, который "разукрашивается" в разные цвета в зависимости от условия (есть долг, нет долг, отриц. долг). Загрузить с ini - файла цвета не получается, при смене цвета через ColorDialog вообще разукрашивает разные ячейки в разные цвета. Если ставлю фиксированный цвет (clREd, clGreen, clBlack) все ОК. Че делать? Пытался через IntToHex, тоже не хрена. sad.gif
Artexoid
LuberZ
Цитата
ВОПРОС: как там же сохранить выбранный цвет гафика и чтобы при загрузке из файла цвет был выбранным?

Значит так. Возьми преобразуй цвет (Изначально он в шеснадцатиричной форме) который ты выбрал в RGB и сохрани его в текстовом файле.
Процедура приобразования 16-ричного кода цвета в RGB]
function TcolorToRGB(Color: Longint):string;
var r, g, b: Byte;
begin
    r     := Color;
    g     := Color shr 8;
    b     := Color shr 16;
    TcolorToRGB:=IntToStr(r)+' '+IntToStr(g)+' '+IntToStr(b);
end;

Затем при загрузке программы (или когда там тебе надо) бери и считывай сохраненный тобой цвет в RGB формате из файла. Приобразуй его обратно в шеснадцатиричный код и присваевай его к своему графику.
Процедура приобразования RGB в 16-ричный код цвета
function RGBToTColor(R, G, B: Byte): TColor;
begin
 Result := B shl 16 or G shl 8 or R;
end;
Для просмотра полной версии этой страницы, пожалуйста, пройдите по ссылке.
Форум IP.Board © 2001-2008 IPS, Inc.