| Autor |
Beitrag |
Hasche
Beiträge: 43
|
Verfasst: Mi 20.06.07 09:28
Ein Button "Zufallszahlen" lässt in einem Array 10 Zufallszahlen entstehen und gibt diese in einem StringGrid aus.
Könnte mir vllt jemand den Code dafür schreiben? Ich bin total unerfahren mit Delphi und mit dieser, vllt leichten Aufgabe, überfordert.
Bitte um schnelle Hilfe.
Danke
|
|
chrisw
Beiträge: 439
Erhaltene Danke: 3
W2K
D7
|
Verfasst: Mi 20.06.07 09:37
Um nicht deine Hausaufgaben zu machen, hier mal der Pseudocode, den du nur noch in Delphi umsetezn musst:
Variablen : Zähler, array(10)
Zufallsgenerator initialisieren,
in einer Schleife 10 mal folgenden Code laufen lassen:
Zähler erhöhen
Array(zähler) = Zufallszahl;
Stringgridzelle(0,zähler) = Array(zähler)
Viel Spass
_________________ Man sollte keine Dummheit zweimal begehen, die Auswahl ist schließlich groß genug.
|
|
Hasche 
Beiträge: 43
|
Verfasst: Mi 20.06.07 09:42
wär nett, wenn du mir den code geben könntest, hab hier zwar einen gefunden, aber das programm meckert immer rum, dass die dcu opder so nich erstellt werden kann.
mein code sieht folgendermaßen aus:
  Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
22:
| procedure TForm1.Form1Create(Sender: TObject);
var i:integer;
begin
for i:=1 to 10 do
form1.StringGrid1.Cells [i,0]:= inttostr (i-1);
form1.StringGrid1.Cells [0,0]:= 'Zahlen';
form1.StringGrid1.Cells [0,1]:= 'Zufallszahlen';
end;
procedure TForm1.Button1Click(Sender: TObject);
var l,i: integer;
begin
randomize;
for i:=1 to 10 do
begin
l:= random(10);
form1.StringGrid1.Cells [i,1]:= inttostr (l);
end;
end; |
Moderiert von  Klabautermann: Delphi Tags hinzugefügt.
|
|
FiceGoesDelphi
Beiträge: 485
Win XP Prof
Delphi 2006
|
Verfasst: Mi 20.06.07 09:43
da kann ich chrisw nur recht geben!
Pack deinen Delphi code doch bitte mal in Delphi Tags und stelle gezielte Fragen!
Nur so lernst du auch was!
Dann sind wir auch gerne bereit dir zu helfen!
_________________ <(^^<) <(^^)> (>^^)>
===================
|
|
ZeitGeist87
Beiträge: 1593
Erhaltene Danke: 20
Win95-Win10
Delphi 10 Seattle, Rad Studio 2007, Delphi 7 Prof., C++, WSH, Turbo Pascal, PHP, Delphi X2
|
Verfasst: Mi 20.06.07 09:45
Ich konnte am Code keine Fehler entdecken
_________________ Wer Provokationen, Ironie, Sarkasmus oder Zynismus herauslesen kann soll sie ignorieren um den Inhalt meiner Beiträge ungetrübt erfassen zu können.
|
|
Hasche
Beiträge: 43
|
Verfasst: Mi 20.06.07 09:46
ich kann keine gezielten fragen stellen, weil ich wirklich keine ahnung habe, wie ich die zufallszahlen generieren soll und ein button immer neue zufallszahlen erstellen soll.
deswegen bräuchte ich hilfe und es wäre sehr nett, wenn ich en antwort kriegen würde auch ohen gezielte fragen ^^
|
|
Hasche
Beiträge: 43
|
Verfasst: Mi 20.06.07 09:48
Also Fehler von Delphi lautet:
[Fataler Fehler] Unit1.pas(54): Ausgabedatei 'Unit1.dcu' kann nicht erstellt werden.
|
|
ZeitGeist87
Beiträge: 1593
Erhaltene Danke: 20
Win95-Win10
Delphi 10 Seattle, Rad Studio 2007, Delphi 7 Prof., C++, WSH, Turbo Pascal, PHP, Delphi X2
|
Verfasst: Mi 20.06.07 09:53
Beende Delphi mal und starte es einfach neu
Leg n neues Projekt an, speichere es und tipp deinen Code.
Kompilier das Ganze und es sollte funktionieren..
BTW: Björn sag du doch auch mal was dazu
LG
Stefan
_________________ Wer Provokationen, Ironie, Sarkasmus oder Zynismus herauslesen kann soll sie ignorieren um den Inhalt meiner Beiträge ungetrübt erfassen zu können.
|
|
FiceGoesDelphi
Beiträge: 485
Win XP Prof
Delphi 2006
|
Verfasst: Mi 20.06.07 09:55
Also, in dem Code an sich ist schonmal kein fehler!
Das funktioniert soweit.
Aber den Code hier raus zu kopieren ist nicht gut!!!
Es wird dir nicht helfen!
OT // Naja was soll ich sagen @ Stefan?! Du hast es auf den Punkt gebracht!
_________________ <(^^<) <(^^)> (>^^)>
===================
|
|
Hasche
Beiträge: 43
|
Verfasst: Mi 20.06.07 09:57
Delphi isn komisches Programm, ich habs gespeichert, dann gings LOL
Naja, danke für die Hilfe!
Grüße, hasche
|
|
