Форум по Delphi программированию

Delphi Sources



Вернуться   Форум по Delphi программированию > Все о Delphi > [ "Начинающим" ]
Ник
Пароль
Регистрация <<         Правила форума         >> FAQ Пользователи Календарь Поиск Сообщения за сегодня Все разделы прочитаны

Ответ
 
Опции темы Поиск в этой теме Опции просмотра
  #1  
Старый 03.02.2013, 21:19
lostbananan lostbananan вне форума
Начинающий
 
Регистрация: 05.01.2013
Сообщения: 119
Репутация: 10
По умолчанию Значение ColorBox из INI файла

Написал такой код:
ColorBoxBg.ItemIndex := ColorBoxBg.Items.IndexOf(sIniFile.ReadString('Main ', 'bgColor', ''));
Компилируется нормально, но значение из ини-файла в даном ColorBox-е не вібирается...
В чем ошибка или неточность?
Ответить с цитированием
  #2  
Старый 03.02.2013, 21:52
lostbananan lostbananan вне форума
Начинающий
 
Регистрация: 05.01.2013
Сообщения: 119
Репутация: 10
По умолчанию

sIniFile.ReadString('Main ', 'bgColor', '') - код работает правильно и возвращает правильное значение...
Почему оно не выбирается??
Ответить с цитированием
  #3  
Старый 03.02.2013, 22:06
Аватар для Facepalm
Facepalm Facepalm вне форума
Прохожий
 
Регистрация: 03.02.2013
Сообщения: 40
Репутация: 2552
По умолчанию

Код:
clrbx1.Items.indexof('clMaroon') = 1
Код:
clrbx1.Items.Text = 'clBlack'#$D#$A'clMaroon'#$D#$A'clGreen'#$D#$A'clOlive'#$D#$A'clNavy'#$D#$A'clPurple'#$D#$A'clTeal'#$D#$A'clGray'#$D#$A'clSilver'#$D#$A'clRed'#$D#$A'clLime'#$D#$A'clYellow'#$D#$A'clBlue'#$D#$A'clFuchsia'#$D#$A'clAqua'#$D#$A'clWhite'#$D#$A'clMoneyGreen'#$D#$A'clSkyBlue'#$D#$A'clCream'#$D#$A'clMedGray'#$D#$A'clActiveBorder'#$D#$A'clActiveCaption'#$D#$A'clAppWorkSpace'#$D#$A'clBackground'#$D#$A'clBtnFace'#$D#$A'clBtnHighlight'#$D#$A'clBtnShadow'#$D#$A'clBtnText'#$D#$A'clCaptionText'#$D#$A'clGradientActiveCaption'#$D#$A'clGradientInactiveCaption'#$D#$A'clGrayText'#$D#$A'clHighlight'#$D#$A'clHighlightText'#$D#$A'clHotLight'#$D#$A'clInactiveBorder'#$D#$A'clInactiveCaption'#$D#$A'clInactiveCaptionText'#$D#$A'clInfoBk'#$D#$A'clInfoText'#$D#$A'clMenu'#$D#$A'clMenuBar'#$D#$A'clMenuHighlight'#$D#$A'clMenuText'#$D#$A'clScrollBar'#$D#$A'cl3DDkShadow'#$D#$A'cl3DLight'#$D#$A'clWindow'#$D#$A'clWindowFrame'#$D#$A'clWindowText'#$D#$A

Гы, дефейс страницы))
__________________
Ну ты понел ^_^.

Последний раз редактировалось M.A.D.M.A.N., 04.02.2013 в 09:15.
Ответить с цитированием
  #4  
Старый 03.02.2013, 22:23
lostbananan lostbananan вне форума
Начинающий
 
Регистрация: 05.01.2013
Сообщения: 119
Репутация: 10
По умолчанию

не понял я вас
Ответить с цитированием
  #5  
Старый 03.02.2013, 22:31
Аватар для Facepalm
Facepalm Facepalm вне форума
Прохожий
 
Регистрация: 03.02.2013
Сообщения: 40
Репутация: 2552
По умолчанию

Мой пример, верхняя строчка, работает?
__________________
Ну ты понел ^_^.
Ответить с цитированием
  #6  
Старый 03.02.2013, 23:12
lostbananan lostbananan вне форума
Начинающий
 
Регистрация: 05.01.2013
Сообщения: 119
Репутация: 10
По умолчанию

Код:
clrbx1.Items.indexof('clMaroon') = 1 
как это может работать?
написал так:
Код:
colorboxbg.Items.indexof('clMaroon') := 1
- выдает ошибку:
Left side cannot be assigned to

MAD: тег code

Последний раз редактировалось M.A.D.M.A.N., 03.02.2013 в 23:22.
Ответить с цитированием
  #7  
Старый 03.02.2013, 23:19
Аватар для Facepalm
Facepalm Facepalm вне форума
Прохожий
 
Регистрация: 03.02.2013
Сообщения: 40
Репутация: 2552
Злость

Да как как, If приписать и проверить, выполняется условие или нет.
Ты сейчас на каждый чих будешь темы плодить? С твоим колорбоксом и филькиными проблемами темы 3 уже. Сложно справку почитать, погуглить?
__________________
Ну ты понел ^_^.
Ответить с цитированием
  #8  
Старый 04.02.2013, 09:17
lostbananan lostbananan вне форума
Начинающий
 
Регистрация: 05.01.2013
Сообщения: 119
Репутация: 10
По умолчанию

Условие - выполняется, чего ему не выполняться...?

И гуглил и справку читал, а не работает!

Последний раз редактировалось M.A.D.M.A.N., 04.02.2013 в 09:22. Причина: Объединил сообщения
Ответить с цитированием
  #9  
Старый 04.02.2013, 09:20
Аватар для M.A.D.M.A.N.
M.A.D.M.A.N. M.A.D.M.A.N. вне форума
Sir Richard Abramson
 
Регистрация: 05.04.2008
Сообщения: 5,505
Версия Delphi: XE10
Репутация: выкл
По умолчанию

В инишнике чвет как записан? clMaroon?
cl+Colorname?
clRed, clLime? В таком ключе?
Тебе же дали перечень цветов, содержащихся в колорбоксе.

Цитата:
Сообщение от lostbananan
И гуглил и справку читал, а не работает!
Значит читай еще.
В элементарных вещах разобраться не можешь.
__________________
— Как тебя понимать?
— Понимать меня не обязательно. Обязательно меня любить и кормить вовремя.


На Delphi, увы, больше не программирую.
Рекомендуемая литература по программированию
Ответить с цитированием
  #10  
Старый 04.02.2013, 09:25
Аватар для NumLock
NumLock NumLock вне форума
Let Me Show You
 
Регистрация: 30.04.2010
Адрес: Северодвинск
Сообщения: 5,426
Версия Delphi: 7, XE5
Репутация: 59586
По умолчанию

Код:
  try
    ColorBox1.Selected:=StringToColor('clRed');
//    ColorBox1.Selected:=StringToColor(ini.ReadString('Form1', 'Color', 'clBtnFace'));
  except
    ColorBox1.Selected:=clBtnFace;
  end;
__________________
Пишу программы за еду.
__________________
Ответить с цитированием
  #11  
Старый 04.02.2013, 09:26
Аватар для M.A.D.M.A.N.
M.A.D.M.A.N. M.A.D.M.A.N. вне форума
Sir Richard Abramson
 
Регистрация: 05.04.2008
Сообщения: 5,505
Версия Delphi: XE10
Репутация: выкл
По умолчанию

Цитата:
Сообщение от NumLock
Код:
  try
    ColorBox1.Selected:=StringToColor('clRed');
//    ColorBox1.Selected:=StringToColor(ini.ReadString('Form1', 'Color', 'clBtnFace'));
  except
    ColorBox1.Selected:=clBtnFace;
  end;
Через ItemIndex тоже прекрасно все работает, ТС видимо упоротый.
__________________
— Как тебя понимать?
— Понимать меня не обязательно. Обязательно меня любить и кормить вовремя.


На Delphi, увы, больше не программирую.
Рекомендуемая литература по программированию
Ответить с цитированием
  #12  
Старый 04.02.2013, 21:43
lostbananan lostbananan вне форума
Начинающий
 
Регистрация: 05.01.2013
Сообщения: 119
Репутация: 10
По умолчанию

Взыл ваш код:
Код:
  try
    ColorBoxBg.Selected := StringToColor(sIniFile.ReadString('Main', 'bgColor', ''));
  except
    ColorBoxBg.Selected:= clBtnFace;
  end;
MAD: Пользуемся тегами!
так после откртия в колорбоксе так и осталя черный цвет

Последний раз редактировалось M.A.D.M.A.N., 04.02.2013 в 22:54.
Ответить с цитированием
  #13  
Старый 04.02.2013, 21:55
Аватар для sariman
sariman sariman вне форума
Активный
 
Регистрация: 19.11.2011
Адрес: Украина, Луганская обл.
Сообщения: 244
Версия Delphi: 7, XE, Lazarus
Репутация: выкл
По умолчанию

А ну-ка покажите, как записываете данные в ини.
Ответить с цитированием
  #14  
Старый 04.02.2013, 21:57
lostbananan lostbananan вне форума
Начинающий
 
Регистрация: 05.01.2013
Сообщения: 119
Репутация: 10
По умолчанию

Код:
sIniFile.WriteString('Main', 'bgColor', ColorToString(ColorBoxBg.Selected));
MAD: Теги!

Прошу прощения - нашел я ошибку я передтем как читать данные из файла их туда записывал - остюда и вся котовасия....

Последний раз редактировалось M.A.D.M.A.N., 04.02.2013 в 22:55.
Ответить с цитированием
Ответ


Delphi Sources

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск
Опции просмотра

Ваши права в разделе
Вы не можете создавать темы
Вы не можете отвечать на сообщения
Вы не можете прикреплять файлы
Вы не можете редактировать сообщения

BB-коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.
Быстрый переход


Часовой пояс GMT +3, время: 20:58.


 

Сайт

Форум

FAQ

Соглашения

Прочее

 

Copyright © Форум "Delphi Sources" by BrokenByte Software, 2004-2025