Name als Objektbezeichnung

[TiGü]

Zitat von TRvsFR:

'Traktor'+IntToStr(FZustand)+'bmp'.Top := 'Traktor'+IntToStr(FZustand)+'bmp'.Top - 25;

Delphi-Quellcode:

  // TImage Komponente aufs Formular ziehen und so benennen
  FTraktorImage: TImage;

Delphi-Quellcode:

begin
  // Bild ins TImage laden
  FTraktorImage.Picture.LoadFromFile('Traktor' + IntToStr(FZustand)+ '.bmp');

  // Image auf Formular bewegen
  FTraktorImage.Top := FTraktorImage.Top - 25;
...
end;