ColorBox

← →
DelphiNew © (2004-01-15 14:27) [0]

Возник такой вопрос после выполнения этой строки ColFonLab:=String (FrmCfg.ColFonLb.Color);
где ColFonLab - переменная стрингового типа
ColFonLb - компонент ColorBox
выскакивает ошибка Access violation.....
Как можно обойти эту ошибку или как сделать по другому?

← →
Ega23 © (2004-01-15 14:28) [1]

Наверное
ColFonLab:=IntToStr(FrmCfg.ColFonLb.Color);

← →
Skier © (2004-01-15 14:29) [2]

Насмешил ! :)
ColorToString(...)

← →
DelphiNew © (2004-01-15 14:34) [3]

А почему тогда после этого
FrmMain.Label1.Color:=StringToColor(ColFonLab);
Цвет Label остаётся белым какой бы я цвет не выбиралd colorbox????

← →
icWasya © (2004-01-15 14:39) [4]

если FrmMain.Label1.Transparent = True
то по барабану, что будет присвоено в FrmMain.Label1.Color. Может быть Вам нужно FrmMain.Label1. Font.Color:=StringToColor(ColFonLab); ???

← →
DelphiNew © (2004-01-15 14:39) [5]

точнее не белым а clwondow

← →
AKul © (2004-01-15 14:41) [6]

Так ComboBox, из которого ты берешь цвет, наверное ж clWindow?

← →
DelphiNew © (2004-01-15 14:42) [7]

2icWasya
Свойство Transparent стоит в False
Нет мне нужно поменять именно цвет самого Label

← →
DelphiNew © (2004-01-15 14:44) [8]

2AKul
В том и проблема что нет

Откуда ж он тогда берется?
Приведи полный код.

Всё разобрался..... спасибо!!!!

наверное так:
ColFonLab:=ColorToStr(FrmCfg.ColFonLb.Selected);

ColorBox Найти похожие ветки