[Delphi] schrikkeljaar

[Verwijderd]

hallo,

Ik ben zelf, op het gebied van programmeren, een beginner.
Ik heb wat ervaring met vb en js, maar nu vond onze ict leraar het een leuk idee om maar eens aan delphi te beginnen.

We hebben de nodige lesbrieven gekregen en hier moeten we het volgens hem mee kunnen doen.Ik heb deze brieven goed bestudeert maar zit toch volledig met de handen in het haar.

Ik heb de opdracht "schrikkeljaar" toegewezen gekregen en kom er dus totaal niet uit. Het is de bedoeling een programma te schrijven die bepaalt of een jaartal een schrikkeljaar is of niet.

Ik heb zelf de volgende code gefabriceert:

code:

procedure TForm1.Button1Click(Sender: TObject);
begin
x1:=jaartal.text
if x1 mod 4 > 0 then
uitvoer.Text = 'geen schrikkeljaar'
end
else
begin
if x1 mod 100 > 0 then
uitvoer.text = 'geen schrikkeljaar'
end
else
begin
if x1 mod 400 > 0
uitvoert.text = 'geen schrikkeljaar'
end
else
uitvoer.text = 'een schrikkeljaar'
end;

end.

Ik zal er wel compleet naast zitten ( dat verneem ik uit de talloze foutmeldingen ).
Zou iemand mij een zetje in de goeie richting kunnen geven?

en asjb geen site met tuts, want ik heb er al behoorlijk wat doorgespit.

[whoami]

Welke foutmeldingen?
Krijg je syntax-errors? Zoja, interpreteer de errors die de compiler geeft goed, en bekijk de help of evt een syntax-reference. Compiler-errors kan je -als je enige moeite wilt doen- makkelijk zelf oplossen. Dat is ook de beste manier om iets bij te leren ipv dat anderen het voor jou fixen.

[vandijk]

begin ... if ... end ... else leuk geprobeerd... dat werkt dus nooit.

[whoami]

code:

if <conditie> then begin
end
else begin
end;

moet het zijn.

Zoals ik al zei, syntax - errors zijn dingend ie je zelf makkelijk kunt oplossen. Je moet natuurlijk wel ff de moeite doen.

[ Voor 51% gewijzigd door whoami op 27-05-2003 19:06 ]