Einzelnen Beitrag anzeigen

Bernd29bln

Registriert seit: 28. Feb 2005
Ort: Berlin
281 Beiträge
 
Delphi 7 Professional
 
#4

Re: TPanel und Image Frage???

  Alt 4. Nov 2006, 10:39
Hallo,

Okay ich habs fast geschaft , ich hab bmp1 in ein Array gestopft.
Problem : Wenn ich im edit den wert 2 eintrage wird der abstand grösser zwischen den Led´s .

Mein Code:
Delphi-Quellcode:
var i: integer;
begin
i:= strtoint(Edit1.Text);
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

bmp1[i].Top:= bmp1[i].Top* i;
panel1.Repaint;
Bernd
Es ist keine Schande, nichts zu wissen, wohl aber, nichts lernen zu wollen.
Sokrates
  Mit Zitat antworten Zitat