Thema: Delphi würfelprogramm

Einzelnen Beitrag anzeigen

Larsi

Registriert seit: 10. Feb 2007
2.262 Beiträge
 
Delphi 2007 Professional
 
#3

Re: würfelprogramm

  Alt 18. Jun 2008, 07:51
Hi,

herzlich Willkommen in der Delphi- Praxis

Wo ist dennd ie Variable Zahl dekliniert?

Also ich würde erstmal einen Bereich machen in dem die Zufallszahlen überhaupt sein können:

Delphi-Quellcode:
function Zufallszahl(Von, Bis: Integer): Integer;
begin
  Result := Random(Succ(Bis - Von)) + Von;
end;

Das Randomize könntest du in FormOnCreate schreiben, dass muss nicht so oft aufgerufen werden.

Dann muss die Variable Zahl dekliniert sein:

Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var
Zahl: Integer;
begin
...
end;

Dann musst du die durch die oben genannte Funktion der Variable Zahl einen Wert zwischen 1 und 6 zugeben und es müsste gehen.


Setzte deinen Delphi Code bitte in Tags sodass man ihn einfacher sehn kann.


MFG Lars Wiltfang


Edit: Zu spät
Ein Tag ohne Delphi ist ein verlorener Tag!

Homepage zu meinem neuen Programm: StreamZ
  Mit Zitat antworten Zitat