[NumLock]

Сообщение от Кодер

В моих предположениях необходимо объявить глобально массив из TBitmap и забивать в него все изображения, но как их индексировать? Как им присвоить некий идентификатор, чтобы потом не составила труда в поиске по id?

Код:

type
  TMyBitmap = class(TBitmap)
  public
    UserID: Integer;
  end;
...
var
  abmp: array of TMyBitmap;
begin
  SetLength(abmp, 2);
  
  abmp[0]:=TMyBitmap.Create;
  abmp[0].LoadFromFile('1.bmp');
  abmp[0].UserID:=1248;

  abmp[1]:=TMyBitmap.Create;
  abmp[1].LoadFromFile('2.bmp');
  abmp[1].UserID:=5555;

  ShowMessage(IntToStr(abmp[0].UserID));
  ShowMessage(IntToStr(abmp[1].UserID));
end;