Вы не сможете сделать это
Delphi 1
Массив объектов-изображений
Вы не сможете сделать это напрямую и "визуально", но если вы не возражаете против нескольких строк кода, то я покажу как это может быть просто:
|
|
type
TForm1 = class(TForm)
...
public
images: array [1..10] of TImage;
...
end;
procedure TForm1.FormCreate(...);
var i: integer;
begin
...
for i := 1 to 10 do begin
images[i] := TImage.Create(self);
with images[i] do begin
parent := self;
tag := i; { это облегчит идентификацию изображения }
... установите другие необходимые свойства, например:
OnClick := MyClickEventHndlr;
end;
end;
...
end;
|
Для того, чтобы убедиться, что все модули в секции "uses" установлены правильно, бросьте на форму один такой динамический компонент, и затем удалите его, или установите его видимость в False. Более сложный способ заключается в разработке собственного компонента, делающего описанное выше.
[001173]
Содержание Назад Вперед
Forekc.ru
Рефераты, дипломы, курсовые, выпускные и квалификационные работы, диссертации, учебники, учебные пособия, лекции, методические пособия и рекомендации, программы и курсы обучения, публикации из профильных изданий