Entwickler-Ecke
Sonstiges (Delphi) - Randomize
Hochhäusl - So 18.07.04 11:03
Titel: Randomize
Hi,
ich will in eine image ein zufällig gewähltes bild laden ('z (34).bmp').
Delphi-Quelltext
1:
2:
3:
4:
5:
6:
| var
a: integer;
begin
randomize;
a:=random(50);
image1.Picture.LoadFromFile('C:\z ('+a+').bmp'); |
So funktioniert es jedoch noch nicht ganz. Wie kann man das machen?
Moderiert von 
Peter Lustig: Code- durch Delphi-Tags ersetzt.
raziel - So 18.07.04 11:06
Try this:
Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
| var
a: integer;
begin
randomize;
a:=random(50);
image1.Picture.LoadFromFile('C:\z (' + IntToStr(a) + ').bmp');
end; |
beim weg: nimm doch das nächste mal einfach die [delphi] - Tags anstelle der [code] - Tags...
raziel
Hochhäusl - So 18.07.04 15:37
Danke, so funktionierts.
Und wie kann ich das selbe mit einer ressourcendatei machen???
So klappts nicht
Delphi-Quelltext
1:
2:
3:
4:
5:
6:
| var
a: integer;
begin
randomize;
a:=random(27);
Image1.Picture.Bitmap.Handle:=LoadBitmap(HINSTANCE,'d'+a); |
raziel - So 18.07.04 15:55
Dein Problem ist, dass Du String und Integer mixt, was aber in Delphi nicht direkt möglich ist! Du musst erst den Integer Wert per IntToStr in einen String Wert konvertieren, und das hab ich Dir oben bereits gezeigt!
raziel
//edit:
RESOURCE BITMAP oder gleich
http://www.delphi-forum.de/viewtopic.php?t=98
Entwickler-Ecke.de based on phpBB
Copyright 2002 - 2011 by Tino Teuber, Copyright 2011 - 2025 by Christian Stelzmann Alle Rechte vorbehalten.
Alle Beiträge stammen von dritten Personen und dürfen geltendes Recht nicht verletzen.
Entwickler-Ecke und die zugehörigen Webseiten distanzieren sich ausdrücklich von Fremdinhalten jeglicher Art!