![]() |
Прежде чем задать вопрос, смотрите FAQ.
Рекомендуем загрузить DRKB.
![]() |
sheka |
![]()
Сообщение
#1
|
![]() Я. ![]() ![]() ![]() ![]() Группа: Пользователи Сообщений: 809 Пол: Мужской Реальное имя: Саша Репутация: ![]() ![]() ![]() |
С помощью инета сделал свой компонент. Подскажите, как
unit component1; изменять, например, свойство Visible формы, на которую этот компонент установлен. Сообщение отредактировано: sheka - 17.11.2009 18:43 |
![]() ![]() |
volvo |
![]()
Сообщение
#2
|
Гость ![]() |
Цитата но его и остальные поля и методы предка - НЕТ! т.е. их не видит. ![]() Цитата и еще, что вот это за проверка:if Assigned(FOnTimer) then FOnTimer(Self); А если у тебя за время между тиками таймера (т.е. за эту самую секунду) произошли изменения, ты (ну, или кто-то другой, неважно) сбросил FOnTimer в nil? Что будет на следующем тике? Попытка разыменовать нулевой указатель будет, а это приведет только к аварийному вылету. Вот поэтому сначала проверяем, есть ли собственно обработчик, и если есть - то вызываем его. |
sheka |
![]()
Сообщение
#3
|
![]() Я. ![]() ![]() ![]() ![]() Группа: Пользователи Сообщений: 809 Пол: Мужской Реальное имя: Саша Репутация: ![]() ![]() ![]() |
Вот смотрите: если на форме стоит только один Edit1 и прописать:
procedure TForm1.Edit1Change(Sender: TObject); тогда в Run-Time будет при изменении Edit1.Text будет меняться form1.Caption. как мне сделать чтобы при изменении текста моего компонента происходило то же самое, без предварительной прописки в новоп проекте: procedure TForm1.MyComponent1Change(Sender: TObject); Что собой представляет TNotifyEvent? указатель на какое-то событие? если да, то ним могут быть все(OnClick,OnCreate..итд)? |
![]() ![]() |
![]() |
Текстовая версия | 12.07.2025 0:09 |