Einzelnen Beitrag anzeigen

Medium

Registriert seit: 23. Jan 2008
3.679 Beiträge
 
Delphi 2007 Enterprise
 
#2

Re: Zwei Fragen zum ersten Programm

  Alt 7. Jan 2010, 16:47
Willkommen in der !

Ich hab zunächst mal ein paar kleine Fragen zum Quellcode (-> Kommentare)
Delphi-Quellcode:
For i:=1 To 16 Do
      begin
      Felder[i].Visible:=false;
      end;

Wuerfel1:=random(6)+1;
    aktFeld:= Wuerfel1 + Wuerfel2 ; // Woher kommt Wuerfel2? Und müsste es nicht "aktFeld := aktFeld + Wuerfel1 + Wuerfel2;" heissen?
    Felder[aktFeld].Visible:= true;
    Wuerfel2:= aktFeld; // Hö?

    If (aktFeld > 16)
        then
           begin
           aktFeld:=aktFeld - 16; // Hier sollte der if-Zweig auch schon enden. aktFeld bleibt dann ja immer zwischen 1 und 16, wird also eigentlich nie 32.
           Felder[aktFeld].Visible:= true;
           Gekauft[aktFeld].Visible:= false;
           aktBetrag:= aktBetrag + 100; //Geh über Los(+100)
           FEGeld1.Value:= aktBetrag;
           end ;
Zum zweiten: "Gekauft[aktFeld].Visible := true/false". Das ":=" ist eine Zuweisung. Ein Vergleich machst du nur mit "=".
"When one person suffers from a delusion, it is called insanity. When a million people suffer from a delusion, it is called religion." (Richard Dawkins)
  Mit Zitat antworten Zitat