Массив элементов управления
Как создать сабж в дельфи 7? Юзал такую вещь в VB, для ряда задач довольно удобно..
Все, нашел..
Типа все просто к примеру
var dd:array[1..10] of TEdit;
..
dd[1]:=TEdit.create(form1);
dd[1].parent:=form1;
Типа все просто к примеру
var dd:array[1..10] of TEdit;
..
dd[1]:=TEdit.create(form1);
dd[1].parent:=form1;
хы, новая запарка.. а как теперь сделать РАБОТАЮЩУЮ процедуру, обрабатывающую клик на элемент этого массива?
Цитата:
Originally posted by wdk
хы, новая запарка.. а как теперь сделать РАБОТАЮЩУЮ процедуру, обрабатывающую клик на элемент этого массива?
хы, новая запарка.. а как теперь сделать РАБОТАЮЩУЮ процедуру, обрабатывающую клик на элемент этого массива?
procedure TForm1.ButtonsClick(Sender: TObject);
Var i: Integer;
begin
for i:=1 to 10 do
if Sender=dd then
begin
{Выполняем действия для i-ой кнопки массива};
Break;
end;
end;
. . .
dd[1].OnClick := ButtomsClick;
Great TNX!!! Нигде по этому вопросу инфы нету..
Все прикольно, только вот здесь:
dd[1].OnClick := ButtonsClick;
Цитата:
dd[1].OnClick := ButtonsClick;
вылазит Debugger Exception Notification.. Это только при использовании массива.. Если так написать для простого контрола, все нормально..
Цитата:
Originally posted by wdk
Все прикольно, только вот здесь:
вылазит Debugger Exception Notification.. Это только при использовании массива.. Если так написать для простого контрола, все нормально..
Все прикольно, только вот здесь:
вылазит Debugger Exception Notification.. Это только при использовании массива.. Если так написать для простого контрола, все нормально..
А контрол в массиве создан до того, как ты присваиваешь ему это свойство?
Кинь лучше кусок кода, где эта ошибка лезет. Без контекста сказать что-либо определенное трудно.
Цитата:
Originally posted by Sagittarius
А контрол в массиве создан до того, как ты присваиваешь ему это свойство?
Кинь лучше кусок кода, где эта ошибка лезет. Без контекста сказать что-либо определенное трудно.
А контрол в массиве создан до того, как ты присваиваешь ему это свойство?
Кинь лучше кусок кода, где эта ошибка лезет. Без контекста сказать что-либо определенное трудно.
В натуре, он потом создается.. Теперь все пашет! Спасибо еще раз!