| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Access Violation при работе с TComboBox. [D5, Win2k]
Дельфятник © (2002-06-26 17:37:00)У меня есть обработчик события OnChange для нескольких TComboBox. Вот его код:
procedure TInputForm.ComboBox1Change(Sender: TObject);
begin
if ((Sender as TComboBox).Text<>"") and ((Sender as TComboBox).Text<>" ") and
(not (Sender as TComboBox).DroppedDown)
then (Sender as TComboBox).OnClick(Sender)
end;
Проблема в том, что не у всех ComboBox"ов есть обработчик события OnClick, поэтому у них происходит Access Violation при попытке вызова этой процедуры. Как должно выглядеть условие проверки наличия обработчика события OnClick?
Дельфятник (2002-06-26 18:24:00) [1]Всем спасибо!
rhf (2002-06-26 17:47:00) [2]
with Sender as TComboBox do
if (Text<>"") and (Text<>" ") and not DroppedDown and assigned(onClick) then OnClick(Sender)
так и код приятней читать :)
MBo (2002-06-26 17:41:00) [3]if Assigned((Sender as TComboBox).OnClick) then ...
| |
