Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2009.11.15;
Скачать: CL | DM;

Вниз

Реестр и StringToColor   Найти похожие ветки 

 
Aleks   (2009-09-29 16:29) [0]

На форме фигура(Shape).Цвет Shape меняю в программе и сохраняю в реестре при выходе. При перезапуске программы читаю цвет в String и присваиваю Shape. Компилится отлично,а при запуске вылетает ошибка :( . Причина так думаю после чтения из реестра и конвертации функцией StringToColor прочтенного значения в Color, так-как если исключить эту строку из программы, то все работает,но у Shape стандартный цвет заданный изначально при кодинге. Как правильно преобразовать String в Color? Почему не работает родная StringToColor? Если можно приведите пример чтения из реестра параметров цвета и присваивание его Shape. Спасибо!


 
Сергей М. ©   (2009-09-29 16:34) [1]

TColor - это integer.

Нашиша хранить в реестре строку - не понятно ..
Есть же TRegistry.Read/WriteInteger ..


 
Aleks   (2009-09-29 17:04) [2]

Если можно приведите пример записи-чтения из реестра параметров цвета и присваивание его Shape с помощью TRegistry.Read/WriteInteger . Спасибо!


 
Сергей М. ©   (2009-09-29 17:09) [3]

Registry.WriteInteger("MyShape_PenColor", Shape.Pen.Color);
Shape.Pen.Color := Registry.ReadInteger("MyShape_PenColor");


 
Amoeba ©   (2009-09-29 22:19) [4]


> Shape.Pen.Color := Registry.ReadInteger("MyShape_PenColor");
>
>

Может не Pen а  Brush?


 
Германн ©   (2009-09-30 01:37) [5]


> Amoeba ©   (29.09.09 22:19) [4]

А есть принципиальная разница?
:)


 
AIK ©   (2009-09-30 08:03) [6]


> Как правильно преобразовать String в Color? Почему не работает
> родная StringToColor?


Function StringToColor(S: String): TColor;
Begin
If s="красный" then result:= clRed     else
If s="зеленный" then result:= clGreen  else
If s="синий" then result:= clBlue      else
......                                 else result:=0;
End;


))))))))


 
brother ©   (2009-09-30 09:01) [7]

> Почему не работает родная StringToColor?

Description

Call StringToColor to reverse the translation performed by ColorToString. This method is useful for converting the strings entered by the user into useable TColor values.

The S parameter can be either the name of a built-in color constant such as "clBtnFace", or the string representation of a valid TColor value such as "$02FF8800".  StringToColor returns the TColor value that corresponds to the S parameter.

Note: If the string identifier can only be the name of a color constant, use IdentToColor instead.


 
Dennis I. Komarov ©   (2009-09-30 15:56) [8]


> Сергей М. ©   (29.09.09 16:34) [1]
>

Так все секреты гуру расскажешь ;)



Страницы: 1 вся ветка

Текущий архив: 2009.11.15;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.012 c
15-1252140185
Пит
2009-09-05 12:43
2009.11.15
Перехват функций игры Battlefield 2


2-1254139166
defen
2009-09-28 15:59
2009.11.15
пРОБЛЕМА С listbox


15-1252614613
Юрий
2009-09-11 00:30
2009.11.15
С днем рождения ! 11 сентября 2009 пятница


4-1221216201
Riply
2008-09-12 14:43
2009.11.15
Работа с памятью в Kernel-mode.


2-1254202686
Анна
2009-09-29 09:38
2009.11.15
импорт данных в MSSQL2000 из БД Access