![]() |
![]() |
faberge 31.07.2004 - 21:07 | Как в Делфи, созвавая объект, к примеру типа TButton, прописать свои ф-ци на соответствующие события? |
dvserg 1 - 31.07.2004 - 21:40 |
Руками чтоль создаешь? Тогда простро приравняй Мойбуттон.OnCluck := FuncOnClick А функцию FuncOnClick объяви и сделай, как это делается в дельфе для этого события, либо присвой какую-ниить уже существующую |
faberge 2 - 01.08.2004 - 02:03 |
Можно увидеть пример рабочего кода? У меня выскакивают несоответсвия типов, сделал как ты описал. |
Deflorator 3 - 01.08.2004 - 02:26 | а входные параметры для процедур (НЕ ФУНКЦИЙ) совпадают? |
XPEH 4 - 01.08.2004 - 07:39 |
TForm1 = class(TForm) [...] private Button1: TButton; procedure OnButton1Click(Sender: TObject); end; [...] Button1.OnClick := OnButton1Click; |
faberge 5 - 01.08.2004 - 17:57 |
Доброе утро всем... ;) ХРЕН, наипрегромаднейшее спасибо. Но если процедура объявлена не как член класса TForm, вот так к примеру: TForm1 = class(TForm) [...] private Button1: TButton; end; [...] procedure OnButton1Click(Sender: TObject); begin .... end; [...] Button1.OnClick := OnButton1Click; как тут быть? |
VaS 6 - 02.08.2004 - 09:47 |
Никак. Событие должно быть типа TMethod (т.е. procedure ... of object), который есть запись, хранящая помимо указателя на процедуру (функцию) адрес объекта. Мой совет - избавляйся от глобальных функций (переменных - тем более). |
faberge 7 - 03.08.2004 - 12:08 | Окс. Спасибо, понял. Отчасти это непривычно(я после с/с++), но где - то даже прикольно. ;) |