if RadioButton1.Checked then
laskuri:=laskuri 1
else
laskuri2:=laskuri2 1;
end;
Olen juuri aloitellut Delphiä ja kiinnostaisi tietää, mikä tässä mättää. Tämä kyllä lisää laskuriin yhden, kun RadioButton1 on valittuna. Mutta miksei se lisää laskuri2:een yhtä, jos RadioButton1 ei ole valittuna.
Miten tämä pitäisi tehdä oikein.
laskuri:=laskuri 1
else
laskuri2:=laskuri2 1;
end;
Olen juuri aloitellut Delphiä ja kiinnostaisi tietää, mikä tässä mättää. Tämä kyllä lisää laskuriin yhden, kun RadioButton1 on valittuna. Mutta miksei se lisää laskuri2:een yhtä, jos RadioButton1 ei ole valittuna.
Miten tämä pitäisi tehdä oikein.
Vastaukset 3
Vanhimmat
Tässä on se kirjoitettuna oikein:
if RadioButton1.Checked then begin
laskuri:=laskuri 1;
end else begin
laskuri2:=laskuri2 1;
end;
Lisäsin siis ekalle riville begin loppuun, else rivi vaihtui end else begin iksi... Ja laskuri:=laskuri 1 riville lisäsin ; merkin.
Sen pitäisi toimia. Jos ei toimi, voit tehdä näin.
Tässä on samalla myös siistimpi muoto, saa paremmin selvää, mitä on tarkottanut:
if RadioButton1.Checked then laskuri:=laskuri 1;
if not RadioButton1.Checked then laskuri2:=laskuri2 1;
Tai:
if RadioButton1.Checked then laskuri:=laskuri 1 else laskuri2:=laskuri2 1;
HUOM! En testannut, että meneekö kääntäjästä läpi, mutta jos on kirjoitusvirheitä niin osannet varmaan korjata. Mutta ei toivottavasti ole...
beginin ja endin liääminen lausekkeiden väliin ei muuta koodia mitenkään koska siinä on vaan yksi lauseke thenin ja elsen välissä...
Kannattaa tarkistaa että Radiobutton1:en ja 2:en Radiogroup arvo on sama.
Molemmille vastaajille suuret kiitokset!