|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
29.08.2009, 11:50 | #1 |
Форумчанин
Регистрация: 04.12.2008
Сообщений: 260
|
sFontComboBox1 компонента Alfa control
Как задать свойство text компоненту sFontComboBox1 ? Т.е я прописываю в text шрифт, который должен отображаться по умолчанию, жму ентер и поле text вновь пустое. Пробовал кодом:
Код:
Заранее спасибо.
Я бы изменил мир, но Бог не дает исходники...
|
29.08.2009, 12:17 | #2 |
Форумчанин
Регистрация: 22.02.2009
Сообщений: 875
|
А вы выставляйте ItemIndex вместо свойства Text:
Код:
Чтобы обнаруживать ошибки, программист должен иметь ум, которому доставляет удовольствие находить изъяны там, где, казалось, царят красота и совершенство.
|
29.08.2009, 12:35 | #3 |
Форумчанин
Регистрация: 04.12.2008
Сообщений: 260
|
Neeter, спасибо!
Блин а как обращение к нему сделать? Т.е по нажатию на кнопку например в caption формы вывести выбранный шрифт? Код:
Чет не удобно как-то компонент сделали...
Я бы изменил мир, но Бог не дает исходники...
Последний раз редактировалось Polotenchik; 29.08.2009 в 12:40. |
29.08.2009, 12:58 | #4 |
Форумчанин
Регистрация: 22.02.2009
Сообщений: 875
|
В точности как ComboBox.
Код:
Код:
Чтобы обнаруживать ошибки, программист должен иметь ум, которому доставляет удовольствие находить изъяны там, где, казалось, царят красота и совершенство.
|
29.08.2009, 12:59 | #5 |
Старожил
Регистрация: 28.01.2009
Сообщений: 21,000
|
Код:
с просоня недосмотрел Хорошо поставленный вопрос это уже половина ответа. | Каков вопрос, таков ответ.
Программа делает то что написал программист, а не то что он хотел. Функции/утилиты ждут в параметрах то что им надо, а не то что вы хотите. Последний раз редактировалось Пепел Феникса; 29.08.2009 в 13:07. |
29.08.2009, 13:02 | #6 |
Форумчанин
Регистрация: 22.02.2009
Сообщений: 875
|
Пепел Феникса, только .Text в конце не надо.
Чтобы обнаруживать ошибки, программист должен иметь ум, которому доставляет удовольствие находить изъяны там, где, казалось, царят красота и совершенство.
|
29.08.2009, 13:03 | #7 |
Форумчанин
Регистрация: 04.12.2008
Сообщений: 260
|
извините за эти тупые вопросы. Просто почему-то в caption формы он не хотел запихивать название шрифта, потому и возникли вопросы. В edit все отлично работает! Спасибо!
Я бы изменил мир, но Бог не дает исходники...
|
10.09.2009, 18:17 | #8 |
Новичок
Джуниор
Регистрация: 08.09.2009
Сообщений: 2
|
sFontComboBox1 компонента Alfa control
Воспользуйтесь приведением типов.
Кодrocedure TForm24.FormCreateSender: TObject;begin if TComponentSender.Name = Button1 then begin ShowMessageНажата кномпочка; end;end;Или если нужно присвоить значение .Text компоненту типа TEdit на форме: Кодrocedure TForm24.FormCreateSender: TObject;begin if Sender is TEdit then begin TEditSender.Text := Нажата кномпочка; end;end; |
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Anyplace Control | GAGARIN-NEW | Общие вопросы Delphi | 3 | 04.10.2008 21:37 |
Cursor in Control | NeiL | Общие вопросы Delphi | 1 | 09.02.2008 16:00 |