[Anton93]

Вызываю картинку из ресурса, они все пронумерованы как вызвать их поочереде через repeate? делаю следующим способом но не знаю что писать после until и вообще правильно ли я делаю? Я знаю что можно путем вызывать подставляя номер картинки, но он мне требуется через repeat.

Код:

var
  ResBmp: TBitmap;
  kaptinka: PChar;
          begin
            repeat
              st:=copy(kaptinka_,1,4);
              if st='kapt' then
                begin
                  _TmplStr:=st;
                  ResBmp.LoadFromResourceName(HInstance, kaptinka);
		//.....
                end;
            until ;
          end;

Прошу не ругаться я только учусь)

[M.A.D.M.A.N.]

А петля "for" для этой цели не подойдет?

[Anton93]

подойдет, мне главное попробовать обойтись без подстановки inttostr()

[Alegun]

А не проще тогда

Код:

for i:= 1 to 10
 begin
  ResBmp.LoadFromResourceID(HInstance, i);
  //..... 
 end;