[kaizer131]

Доброго времени суток уважаемые форумчане!

А можно для компонентов Timage, создаваемых в runtime назначить процедуру загрузки изображений из ресурсов в зависимости от их tag? Я создаю несколько обьектов TImage,



отдельно написал процедуру

Код:

procedure loadimage(Sender:TObject);
  begin
    case a.Tag of
    1:a.Picture.Bitmap.LoadFromResourceName(HInstance,'a');
    2:a.Picture.Bitmap.LoadFromResourceName(HInstance,'b');
    end;
  end;

Но пока незнаю как её назначить им .