TPanel und Image Frage???

[Sunlight7]

Wenn ich gerade Online bin, kann ich schnelle Antworten geben

Ich meine das zB so:

Delphi-Quellcode:

var i: integer;
begin
//i:= strtoint(Edit1.Text);
i:= strtointdef(Edit1.Text, 0); // <- Sicherer
If i>0 then try
  for i := 0 to 100 do
  begin

    bmp1[i]:=TImage.Create(Panel1);  // Bild erstellen.
    bmp1[i].Picture.Bitmap.LoadFromResourceName(HInstance, 'LedRotOff');
    bmp1[i].Parent:=Panel1;          // Bild ins Panel setzen

//   if i > 0 then // Macht keinen Unterschied, ob mit oder ohne

  bmp1[i].Top:=bmp1[i].HEIGHT * i;
  panel1.Repaint;
except
  // Wenn Fehler, Abbrechen und bereits erstelltes frei geben, oder sonst entsprechend vorgehen
end;