Forum: Object-Pascal / Delphi-Language
Prism
by idefix2,
1. Jun 2010
Die ganzen Abfagen kann man sich sparen mit:
const bildname: array of string = ('wasser.jpg', 'schuss.jpg', 'schiff.jpg', 'wrack.jpg');
....
image1.picture.loadfromfile(bildname]);
image2.picture.loadfromfile(bildname]);
....
Und auf die Komponenten kann man in einer Schleife über den Namen zugreifen
Forum: Object-Pascal / Delphi-Language
Prism
by idefix2,
1. Jun 2010
Nur nebenbei: Schleifen mit einer festen Anzahl von Durchläufen sollte man immer mit einer for Schleife und nicht mit einer while Schleife programmieren. Damit wäre dir dann vielleicht noch eher aufgefallen, dass du in der schleife 5 mal genau dasselbe machst:
for k:=1 to 5 do
a:=2;