Entwickler-Ecke
Delphi Language (Object-Pascal) / CLX - Integer and String Fehler
Zlatan - Do 03.02.11 11:49
Titel: Integer and String Fehler
Könnte jemand diesen Quelltext korrigieren?
Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
| procedure TForm1.Button1Click(Sender: TObject);
var Zahl : Integer;
begin
Zahl:= random(5)+1;
Randomize;
Panel2.Caption:= Zahl;
if Zahl =1
then shape6.Left:= shape6.Left +10
else if Zahl=2
then shape6.Left:= shape6.Left +20
else if Zahl=3
then shape6.Left:= shape6.Left +30
else if Zahl=4
then shape6.Left:= shape6.Left +40
else if Zahl=5
then shape6.Left:= shape6.Left +50
else shape6.Left:= shape6.Left +60
end;
end. |
Moderiert von 
Narses: Topic aus Sonstiges (Delphi) verschoben am Do 03.02.2011 um 15:28
Bergmann89 - Do 03.02.11 11:52
Hey,
Zahlen kann man nicht an einen String übergeben, dazu muss man sie erst mit IntToStr in einen String umwandeln:
Delphi-Quelltext
1:
| Panel2.Caption := IntToStr(Zahl); |
MfG Bergmann.
MaxWurzel - Do 03.02.11 12:18
Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
| procedure TForm1.Button1Click(Sender: TObject);
var Zahl : Integer;
begin
Zahl:= random(6)+1;
Panel2.Caption:= inttostr(Zahl);
shape6.Left:= shape6.Left + zahl * 10;
end; |
randomize im formcreate aufrufen.
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!