Вниз
Скачать: CL | DM;

Создание процедуры обработки события onClick   Найти похожие ветки 

← →
Sergl   (2007-11-02 11:11) [0]

Нужно создать процедуру обработки события onClick для массива елементов которые создаются програмно.

Объявляю процедуру в type`е: procedure masClick;
Создаю код процедуры:

procedure Tform1.masClick;
begin
//
end;

Создаю компонент:
mas[1]:=Tmemo.create(Self);
mas[1].onClick:=masClick; - прога не компилируется и пишет  ошибку "Parameter lists differ"

В чем я неправ?


← →
Reindeer Moss Eater ©   (2007-11-02 11:12) [1]

Скравни обработчик создаваемый IDE и свой


← →
ЮЮ ©   (2007-11-02 11:12) [2]

procedure Tform1.masClick(Sender: TObject);


← →
DVM ©   (2007-11-02 11:12) [3]


> В чем я неправ?

в количестве параметров функции masClick


← →
Sergl   (2007-11-02 11:12) [4]

Те пишет: "несоответствие типов  "Parameter lists differ""


← →
Reindeer Moss Eater ©   (2007-11-02 11:14) [5]

а ты поверь в это сообщение


← →
Sergl   (2007-11-02 11:17) [6]

Поставил в объвлении "Sender: TObject"... Вопрос что можно/нужо написать
mas[1].onClick:=masClick(ЗДЕСЬ).


← →
Reindeer Moss Eater ©   (2007-11-02 11:17) [7]

ничего


← →
DVM ©   (2007-11-02 11:18) [8]

НИЧЕГО


← →
Sergl   (2007-11-02 11:18) [9]


> а ты поверь в это сообщение

Да я верю)


← →
Sergl   (2007-11-02 11:20) [10]


> НИЧЕГО

Он там пишет ошибку "Not enough actual parameters"


← →
Sergl   (2007-11-02 11:21) [11]

Скобочки забыл убрать)


← →
ЮЮ ©   (2007-11-02 11:21) [12]

> [7] Reindeer Moss Eater ©   (02.11.07 11:17)
> ничего
> [цитата]
>
> [8] DVM ©   (02.11.07 11:18)
> НИЧЕГО


и () ни к чему. Просто mas[1].onClick := masClick;


← →
DrPass ©   (2007-11-02 11:21) [13]


> Он там пишет ошибку "Not enough actual parameters"

Скобочки убери


← →
Sergl   (2007-11-02 11:21) [14]

Всем спасибо.


← →
DVM ©   (2007-11-02 11:22) [15]

во проблемы у человека :)


← →
Anatoly Podgoretsky ©   (2007-11-02 12:55) [16]

Нам бы его проблемы и его методику ведения дисскуссии.



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.48 MB
Время: 0.012 c
15-1192992518
Cerberus
2007-10-21 22:48
2007.11.25
Помогите собрать системник за 14к р.


15-1193397825
vajo
2007-10-26 15:23
2007.11.25
Нужно внести изменение в текстовом файле на сайте.


3-1184307277
ambhtr
2007-07-13 10:14
2007.11.25
DBGrid -> OnTitleClick


2-1194204107
olegusis
2007-11-04 22:21
2007.11.25
переменные


10-1140499983
rosl
2006-02-21 08:33
2007.11.25
excel




   Наверх