For und Image!!!

**maximi**

Ich möchte mit einer Schleife allen Bilder in meinem Form ein Bild zuweisen!! Wie mach ich das???

**Stanlay Hanks**

Na ja, wenn du die Bilder durchnummeriert benannt hast, geht das mit FindComponent. Such mal hier im Forum, da gibts tonnenweise beiträge dazu.

**maximi**

Irgendwie kappier ich's noch nicht so ganz!! Kannst du mir vielleicht mal ein kleines Beispiel zeigen???

**Stanlay Hanks**

In diesem Beispiel wird 5 Images mit den durchnummerierten Namen Image1, Image2, Image3 usw. das Bild einer Vorlage(Auch ein Image) zugewiesen.

markieren

Delphi-Quellcode:

			procedure TForm1.dxButton1Click(Sender: TObject);

var i : Integer;

begin

 For i := 1 to 5 do

  (FindComponent('Image'+IntToStr(i)) as TImage).Picture := Vorlage.Picture;

end;

**maximi**

Ok Danke!
Wenn ich aber mehrere variablen in einer procedure habe, muss ich eine variable vom Typ TComponent initiallisieren. Diese variable aber hat dann den wert nil. Wie kann ich das verhindern???

**Christian Seehase**

Moin maximi,

Zitat von maximi:

Wenn ich aber mehrere variablen in einer procedure habe, muss ich eine variable vom Typ TComponent initiallisieren.

Was meinst Du mit diesem Satz?

**maximi**

Also: Ich hab dann eine variable vom typ Tcomponent, diese aber hat den Wert nil!

**Darty**

Hast du etwas Code zum zeigen ?

**Stanlay Hanks**

Erklähr bitte mal genau, was du machen, willst, mit welchen Komponenten und so.

**maximi**

Hallo!!!!
Ich hab's hinbekommen!! Ich hatte mehrere Klassen vereinbart und deswegen musste vor findcomponent noch Form1!!!

maximi Registriert seit: 9. Jun 2003 217 Beiträge Delphi 7 Personal	#1 For und Image!!! 10. Jun 2003, 18:51 Ich möchte mit einer Schleife allen Bilder in meinem Form ein Bild zuweisen!! Wie mach ich das???
	Zitat

Stanlay Hanks Registriert seit: 1. Mär 2003 2.078 Beiträge Delphi 2005 Professional	#2 10. Jun 2003, 19:06 Na ja, wenn du die Bilder durchnummeriert benannt hast, geht das mit FindComponent. Such mal hier im Forum, da gibts tonnenweise beiträge dazu.
	Zitat

maximi Registriert seit: 9. Jun 2003 217 Beiträge Delphi 7 Personal	#3 10. Jun 2003, 19:18 Irgendwie kappier ich's noch nicht so ganz!! Kannst du mir vielleicht mal ein kleines Beispiel zeigen???
	Zitat

Stanlay Hanks Registriert seit: 1. Mär 2003 2.078 Beiträge Delphi 2005 Professional	#4 10. Jun 2003, 20:55 In diesem Beispiel wird 5 Images mit den durchnummerierten Namen Image1, Image2, Image3 usw. das Bild einer Vorlage(Auch ein Image) zugewiesen. markieren Delphi-Quellcode: procedure TForm1.dxButton1Click(Sender: TObject); var i : Integer; begin For i := 1 to 5 do (FindComponent('Image'+IntToStr(i)) as TImage).Picture := Vorlage.Picture; end;
	Zitat

maximi Registriert seit: 9. Jun 2003 217 Beiträge Delphi 7 Personal	#5 10. Jun 2003, 21:17 Ok Danke! Wenn ich aber mehrere variablen in einer procedure habe, muss ich eine variable vom Typ TComponent initiallisieren. Diese variable aber hat dann den wert nil. Wie kann ich das verhindern???
	Zitat

Christian Seehase (Co-Admin) Registriert seit: 29. Mai 2002 Ort: Hamburg 11.105 Beiträge Delphi 11 Alexandria	#6 10. Jun 2003, 23:24 Moin maximi, Zitat von maximi: Wenn ich aber mehrere variablen in einer procedure habe, muss ich eine variable vom Typ TComponent initiallisieren. Was meinst Du mit diesem Satz? Tschüss Chris Die drei Feinde des Programmierers: Sonne, Frischluft und dieses unerträgliche Gebrüll der Vögel. Der Klügere gibt solange nach bis er der Dumme ist
	Zitat

maximi Registriert seit: 9. Jun 2003 217 Beiträge Delphi 7 Personal	#7 11. Jun 2003, 05:53 Also: Ich hab dann eine variable vom typ Tcomponent, diese aber hat den Wert nil!
	Zitat

Darty Registriert seit: 8. Jun 2002 Ort: Kronau 731 Beiträge	#8 11. Jun 2003, 07:03 Hast du etwas Code zum zeigen ? Matthias Knebel *Mfg* M. Knebel [-Darty-] - Gehörlose Delphianer gibt es selten - www.team-knebel.de
	Zitat

Stanlay Hanks Registriert seit: 1. Mär 2003 2.078 Beiträge Delphi 2005 Professional	#9 11. Jun 2003, 07:13 Erklähr bitte mal genau, was du machen, willst, mit welchen Komponenten und so.
	Zitat

maximi Registriert seit: 9. Jun 2003 217 Beiträge Delphi 7 Personal	#10 11. Jun 2003, 12:26 Hallo!!!! Ich hab's hinbekommen!! Ich hatte mehrere Klassen vereinbart und deswegen musste vor findcomponent noch Form1!!!
	Zitat

For und Image!!!

For und Image!!!

Forumregeln