Einzelnen Beitrag anzeigen

Wolverine

Registriert seit: 30. Mai 2003
Ort: Düsseldorf (NRW)
109 Beiträge
 
Delphi 7 Enterprise
 
#1

Problem beim Punktezählen

  Alt 8. Jul 2003, 18:11
Tach zusammen.
Wieder mal ein Prob.
Ich will den Wert einer Variablen bei einem bestimmten Ereigniss, Form1.Visible=True, immer um 1 erhöhen.
Das Problem ist, wenn das Formular 4 mal angezeigt wird, ändert sich der Wert trotzdem nur um 1, er sollte sich dann aber um z.B. 4 erhöhen!!!

Quellcode lautet:

Delphi-Quellcode:
if (Form1.Visible=True) then
begin
   scorespieler1 := scorespieler1 + 1;
   Form4.Label1.Caption:='Score von Spieler 1= '+IntToStr(scorespieler1);
 end;
Ist der Code so richtig oder fehlt etwas???
Was muss ich, wenn was fehlt, wie ändern???
Bräuchte die Lösung wiedermal schnell aber das ist hier ja Standard
Guido L.
The nice thing about Windows is - It does not just crash, it displays a dialog box and lets you press 'OK' first.
Guten Rutsch und Start ins neue Jahr 2005
  Mit Zitat antworten Zitat