Thema: Delphi END. fehlt am Modulende

Einzelnen Beitrag anzeigen

Dax
(Gast)

n/a Beiträge
 
#2

Re: END. fehlt am Modulende

  Alt 26. Okt 2008, 16:05
Delphi-Quellcode:
            if LKPunkte then
            begin
              s := format('%n', [LK[i].Punkte_MoFr]);
              TextOut (1500 - TextWidth(s), ORand, s);
              s := format('%n', [LK[i].Punkte_Summe_MoFr]);
              TextOut (1700 - TextWidth(s), ORand, s);
            end // fehlt das nicht? bei einem else ohne if sollte der compiler auch schon ein wenig früher aussteigen als beim "END."...
            else
            begin
              s := format('%n', [LK[i].Preis_MoFr]);
              TextOut (1500 - TextWidth(s), ORand, s);
              s := format('%n', [LK[i].Preis_Summe_MoFr]);
              TextOut (1700 - TextWidth(s), ORand, s);
            end; // if LKPunkte
  Mit Zitat antworten Zitat