Delphi - Как опредилить динамический обект двухмерного масива TImage

Внимание, важное сообщение: Дорогие Друзья!
В ноябре далекого 2001 года мы решили создать сайт и форум, которые смогут помочь как начинающим, так и продвинутым пользователям разобраться в операционных системах. В 2004-2006г наш проект был одним из самых крупных ИТ ресурсов в рунете, на пике нас посещало более 300 000 человек в день! Наша документация по службам Windows и автоматической установке помогла огромному количеству пользователей и сисадминов. Мы с уверенностью можем сказать, что внесли большой вклад в развитие ИТ сообщества рунета.

Но... время меняются, приоритеты тоже. И, к сожалению, пришло время сказать До встречи! После долгих дискуссий было принято решение закрыть наш проект. 1 августа форум переводится в режим Только чтение, а в начале сентября мы переведем рубильник в положение Выключен

Огромное спасибо за эти 24 года, это было незабываемое приключение. Сказать спасибо и поделиться своей историей можно в данной теме.

С уважением, ваш призрачный админ, BigMac...

Delphi - Как опредилить динамический обект двухмерного масива TImage

Dock1100

Новый участник

Сообщения: 8
Благодарности: 0

Профиль | Отправить PM | Цитировать

Кагда создан двухмерный масив я кликаю по рисунку и он должен исщезнуть а вместо него на етомже месте должен появитса другой с другого масива.
При создании масива вот таким образом

Код:

for i := 1 to 12 do
for k := 1 to 12 do
begin
i2:=i-1;
k2:=k-1;
State[i2,k2]:=TImage.Create(Form1);
with state[i2,k2] do begin
Width:=20;
Height:=20;
Picture.LoadFromFile(path+'not_open.bmp');
SetBounds(20*i2, 20*k2, 20, 20);
parent:=form1;
onmousedown:=cell_mousedown(i2,k2);
end;

где cell_mousedown

Код:

  state[i_pos,k_pos].Visible:=false;
  status[i_pos,k_pos].Visible:=true;

(тоесть в cell_mousedown(i2,k2); я определяю какой именно Timage для дальнейшей с ним работыю)
Выдает что ето не событие а процедура.
Как ето исправить.

Отправлено: 14:35, 24-11-2009