Einzelnen Beitrag anzeigen

mjreaper

Registriert seit: 15. Aug 2005
6 Beiträge
 
#1

Images zur Laufzeit erstellen - Delphi 8 Architect

  Alt 15. Aug 2005, 14:40
Hallo,

ich möchte gerne einige images zur laufzeit erstellen, leider zeigt er mir die noch nicht an. Ich erhalte aber auch keine Fehlermeldung. Was könnte das Problem sein?

Delphi-Quellcode:
procedure Tmainform.FormCreate(Sender: TObject);
var i: integer;
begin

  // images erstellen

 for i:=1 to 25 do
 begin
  punkt[i]:=timage.Create(self);

  with punkt[i] do
  begin

   left := 5+i*10;
   height := 5;
   width := 5;
   top := 25;

   parent:=mainform;
   visible:=true;
   picture:=image1.picture;

  end;
 end;

end;
image1 ist ein schon vorhandenes image, welches einfach nur die picture information enthält (vorerst).

die images wurde vorher als array deklariert:

punkt: array[1..25] of timage; hab schon überall nach einer lösung gesucht, nur leider finde ich keine...

wäre über jede konstruktive Hilfe erfreut

[edit=sakura] [code] -> [delphi]. Mfg, sakura[/edit]
  Mit Zitat antworten Zitat