Привет всем!
использую либу
Font_32
написал вот такую процедуру для смены цвета текста
procedure change_color(black:boolean);
begin
if black=false then
im_font:=ReplaceColor(im_font, TranslateColor(255,0,0,0), TranslateColor(255,200,200,198)) //это типа серый текст
else
im_font:=ReplaceColor(im_font, TranslateColor(255,200,200,198), TranslateColor(255,0,0,0));
Modify(im_font);
end;
но оно токо меняет на серый цвет... а менять на чёрный нехочет...
я наверно просто не понял что делаетсо при вызове процедуры Modify(im_font).... оно меняет в переменной чорное на серое и ето ж серое остаётсо в переменной?