image1 и image2

← →
Zirus (2003-02-01 13:31) [0]

Доброго времени суток! Возможен ли доступ к image1, image2,... через счётчик, типа: image[x].canvas...

← →
ZmeiGorin (2003-02-01 13:42) [1]

Да сколько хочешь:
var Images: array[0..7] of TImage.
...
images[0]:=image1;
images[1]:=image2;

Но судя по вопросу, тебе надо почитать учебников по Delphi/object pascal (без обид :) )

← →
OxOTHuK (2003-02-01 13:44) [2]

Вряд ли.... только по хитрому номеру компонента, а там уж смотри имя оного и делай с ним все, что хочешь.

← →
Zirus (2003-02-01 13:44) [3]

Спасибо! Да уж... были бы ещё учебники! денег-то жалко...

← →
OxOTHuK (2003-02-01 13:47) [4]

>> ZmeiGorin ©
Вот уж спасибо... просветил =) а то я хотел уж такой же вопрос в форум кидать...
И судя по вопросу, мне надо почитать учебников по Delphi/object pascal

← →
smok_er (2003-02-01 14:20) [5]

а что мешает сделать обход компонентов по форме?
типа
for i := 0 to form1.componentscount - 1 do
if form1.components[i] is timage then
with form1.components[i] as timage do
...

← →
DJ_Sedoy (2003-02-01 14:56) [6]

А если имя компонента известно, то делаем так:

for i := 0 to form1.componentscount - 1 do
if form1.components[i].Name = "ИМЯ" then .....

да тут сотни вариантов.
А можно конкретнее - для чего доступ и когда? То есть если при например onClick, то при создании можно было бы сделать

TImage(NewItem).OnClick=myClickProc;

а потом просто оперировать с TImage(Sender).Canvas

image1 и image2 Найти похожие ветки