![]() |
Problem mit Array vom Typ TImage
Hallo,
ich habe eine Klasse in der ein Array vom Typ TImage existiert. Beim Constructor dieser Klasse soll das Array mit gewissen Bildern gefüllt werden. Ich habe folgendes probiert:
Delphi-Quellcode:
Nun möchte ich mit einer Funktion ein bestimmtes Bild aus dem Array nehmen und auf der Form in ein bestehendes Image laden. Jedoch funktioniert das laden der TImage-Variable in das TImage nicht, mein Code sieht so aus:
for i := Low(Bilder) to High(Bilder) do begin
Bilder[i] := TImage.Create(Self); with Bilder[i] do begin Width := 60; Height := 75; Picture.LoadFromFile('Bilder\'+IntToStr(i)+'.bmp'); end; end;
Delphi-Quellcode:
Und beim laden in das TImage(nicht mehr in der Klasse sondern im GUI):
Zahl := Random(High(Bilder))+1;
Bild:= Bilder[zahl];
Delphi-Quellcode:
.. wobei Auswahl als Klasse deklariert wurde.
imgBild1 := Auswahl.Bild
Wo ist da mein Fehler? Es soll einfach nur ein bestimmtes Bild aus einem Array mittels einer Klasse in einem bestehendem TImage angezeigt werden. Schonmal Danke im vorraus, mfG Sunset |
AW: Problem mit Array vom Typ TImage
Und wenn Du statt Array of TImage ein Array of TPicture definierst und das dann in das TImage (GUI) lädst? Ansonsten sieht mir das schwer nach potentiellen Speicherlecks aus.
|
AW: Problem mit Array vom Typ TImage
Vielen Dank, wäre ich von allein niemals drauf gekommen :oops:
|
AW: Problem mit Array vom Typ TImage
Schau dir vielleicht mal TList oder noch besser TObjectList an.
|
AW: Problem mit Array vom Typ TImage
Ja stimmt, das ist für soetwas wohl besser. Muss ich mich mal mit auseinander setzen.
Danke ;) |
AW: Problem mit Array vom Typ TImage
Hat aber mit dem ursprünglichen Problem nichts zu tun :mrgreen:
|
AW: Problem mit Array vom Typ TImage
Das schon, aber vielleicht kennt er beide Listen nicht. Und wenn man damit noch ein paar Problemchen erschlagen kann. Wenn ich die Kombination aus Array und Objekten sehe kommt von mir eigentlich meist der Hinweis ;)
|
AW: Problem mit Array vom Typ TImage
Ich möchte hier keine Diskussion lostreten, aber auch bei TObjectList kann man viel falsch machen, wenn man nicht aufpasst.
|
Alle Zeitangaben in WEZ +1. Es ist jetzt 14:31 Uhr. |
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz