![]() |
|
#1
|
|||
|
|||
![]() Хочу присвоить форму цвет записанный в базу данных, но он ругаеться на не совместимые типы
Код:
DataModule1.Rashodi_podschet_ADOQuery.Active:= false; DataModule1.Rashodi_podschet_ADOQuery.SQL.Clear; DataModule1.Rashodi_podschet_ADOQuery.SQL.Add('select parametr '); DataModule1.Rashodi_podschet_ADOQuery.SQL.Add('FROM [Setting]'); DataModule1.Rashodi_podschet_ADOQuery.SQL.Add('WHERE name =' + '''Form_color'''); DataModule1.Rashodi_podschet_ADOQuery.Active:= true; Form1.Color := DataModule1.Rashodi_podschet_ADOQuery.Fields[0].AsString; Последний раз редактировалось qwwwq, 14.01.2009 в 19:40. |