| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

Мастера помогите [D5, D6, Win95/98, WinME, NT4, Win2k, WinXP]

Ferrarium ©   (2002-10-17 16:59:00) 

есть код
unit Unit1;

interface
uses
Controls, Forms, StdCtrls;

function Start(Owner:TObject):Boolean;

implementation

procedure ButClick(Sender: TObject);
begin

end;

function Start(Owner:TObject):Boolean;
var Button:TButton;
begin
Button:=TButton.Create(Application);
Button.Parent:=TWinControl(Owner);
Button.Caption:="";
Button.OnClick:=ButClick;-этой строке выдается ошибка :"Incompatible types: method pointer and regular procedure"
<СODE>
end;

end.

Что я делаю не правильно????

---

Smithson   (2002-10-17 18:29:00) [1]

procedure [b]Form1.[/b]ButClick(Sender: TObject)

---

Ferrarium   (2002-10-17 18:24:00) [2]

не работает

---

DieHard   (2002-10-17 17:32:00) [3]

procedure ButClick(Sender: TObject) of object;
begin

end;


---

Ferrarium   (2002-10-17 17:20:00) [4]

пример кода можно

---

AngeL B.   (2002-10-17 17:16:00) [5]

Правильнее будет сказать, что ButClick должен быть методом объекта некоторого класса.
И еще. Не надо путать Owner и Parent.
Owner - тот, кто уничтожает объект при своем освобождении;
Parent - тот, кто прорисовывает объект.
Указывая TButton.Create(Application), ты либо должен уничтожить объект сам, либо он будет уничтожен вместе с заверщение приложения, а до этого будет занимать память.

---

Bis   (2002-10-17 17:12:00) [6]

может быть методом любого объекта, наследованного от TObject

---

Anatoly Podgoretsky   (2002-10-17 17:06:00) [7]

ButClick должен быть методом формы

---

Наверх