Nächsten Tag berechnen!

[Nobody0101]

Danke, danke ihr wart ne große Hilfe, und dann auch noch so schnell o.O
wow!

das einzige was er mir sagt was falsch ist ist jetz noch das hier (mit pfeilen markiert):

Delphi-Quellcode:

 if (Monat=2) and >>>(IsLeapYear)<<<
       then begin if Tag=29
            then begin TagM:=1; MonatM:=Monat+1; jahrM:=Jahr; end
            else if (Tag<29) and (Tag>=1)
                 then begin TagM:=Tag+1; MonatM:=Monat; JahrM:=Jahr; end
                 end

Dazu sagt er, dass es nicht genügend wirkliche Parameter habe.
Ich kann damit nicht wirklich was anfangen... habe ich einen falschen Variablenwert genommen? also sollte ich integer anstatt real nehmen...?

oder sollte ich das mit Jahr mod 4=0 ersetzen?
obwohl wenn ich das mache, geht das bei mir auch nicht... dann steht da nämlich: operator ist auf diesen operandentyp nicht anwendbar.