glücksmaschine(casino einarmiger bandit)

Motoorradengel · Hält's aus hier Beiträge: 6 Win xp D7 enterprise

ich habe folgendes problem, ich versuche verzweifelt ein solches program anzufertigen es ist auch o gut wie vollständig das problem ist nur er schreibt keine zaheln in meine edit fenster sondern macht gar nichts... kann mir bitte jemand helfen...
mint recht freundlichen und verzweifelten grüßen
m-engel

Martin77 · Verfasst: So 18.04.04 12:32

markieren

Delphi-Quelltext

1:	das problem ist nur er schreibt keine zaheln in meine edit fenster sondern macht gar nichts

meine Kristallkugel ist leider über das Wochenende in Urlaub gefahren

Poste mal den Quelltext der nicht klappt, dann hilft dir auch jemand.

Gruß Martin

Motoorradengel · Hält's aus hier Beiträge: 6 Win xp D7 enterprise

das problem ist der quelltext ist in der schule auf dem server und nicht auf meiner diskette da ist ein programm von einem ganz anderen schüler drauf weil mein lehrer mir das ja auf die diskette kopieren ollte... nur das problem ist der lehrer kennt sich mit pc und mit delphi nicht so ganz aus und wir dürfen die aufgaben die er uns gibt alle mit der hilfe versuchen und wenn das nicht geht dann haben wir selber schuld...

GTA-Place · Verfasst: So 18.04.04 12:51

Hast du das auch so oder so Ähnlich?:

markieren

Delphi-Quelltext

1:
2:
3:
4:
5:

var
  Glückszahl: Integer;
begin
  Glückszahl := random(100); // je nachdem, wie viele Kombinationen es geben soll.
  Edit1.Text := IntToStr(Glückszahl);

Motoorradengel · Hält's aus hier Beiträge: 6 Win xp D7 enterprise

nein ich habe zwar auch mit random gearbeitet, aber irgendwie anders zeigen kann ich es leider nicht da der quelltext nicht vorhabnden ist...

seppel86 · Beiträge: 54

an deiner stelle würde ich mit einem Timer arbeiten. (unter system zu finden)

Bau einen in dein Programm ein und schreib dann in das TimerEvent:

markieren

Delphi-Quelltext

1:
2:

Glückszahl:=rondom(100)+1 {Die +1 ein damit die null wegfällt}
edit1.text:=inttostr(glückszahl);

Kennst du dich mit Labels aus? du kannst statt editfenster labels verwenden. Jeder Zahl ordnest du eine Farbe zu und das Label verändert dann mit dem Timer intervall die Farbe.

Für einen unterschiedlichen Rythmus solltest du für jedes Label einen eigenen Timer benutzen.

Auf [url] www.seppel.mynetcologne.de [/url] hab ich das Programm online gestellt (wir mussten das auch mal in der Schule machen).

Seppel86

	Mitgliederliste
	Gruppen
	Das Team
	Richtlinien
	Synonyme