Forum: Multimedia
Delphi
by ATwardz,
5. Jan 2005
Ja das hätte mir echt auffallen müssen, bitte um verzeihung!
Sitze vermutlich schon zu lange vormPC und bin zu krank um noch logisch denken zu können!
Dankefür die schnellen Antworten!
Klappt mit
for i := ComponentCount-1 downto 0 do
sehr gut
Dake Jan
Forum: Multimedia
Delphi
by ATwardz,
5. Jan 2005
Also du meinst in etwa so ja?
For j:=0 to Form1.ComponentCount do
Begin
If Form1.Components.Name='' then
Form1.Components.Free;
end;
Leider bekomme ich immer einen Listindex out of Bounds (25)
Forum: Multimedia
Delphi
by ATwardz,
5. Jan 2005
Kann man irgenwie eine Komponente aus einem zusammengestzen name ansprechen?
Also zum Beispiel Findkomponent(intostr(x)+Inttostr(y)) ?
Das wäre dann eine Lösung!
Jan
Forum: Multimedia
Delphi
by ATwardz,
5. Jan 2005
Hallo!
Habe das Problem das ich mehrer TImage Komponenten erzeuge und diese irendwann wieder freisetzen will! Das Problem Namen hab ich nicht vergeben da es in meinem Fall hinderlich ist!
With TImage.Create(Form1) do
Begin
Picture.loadfromfile('TEST.bmp');
parent:=Form1;
visible:=true;
end;