IfThen -funktion käyttö

ifthen kysymys

Kun uses lauseeseen lisää math,StrUtils -unitit niin voi käyttää IfThen-funktiota. Mikä on tämän funktion käyttötarkoitus?

7

465

    Vastaukset

    Anonyymi (Kirjaudu / Rekisteröidy)
    5000
    • ...

      max:=IfThen(a>b,a,b);
      on sama kuin
      If a>b Then Max:=a Else max:=b;

      • Ei hitsi?

        Tämä oli uutta mulle? Vaikka olen koodaillut Delphillä jo vuodesta 1996. Ikinä ei voi tietää kaikkea :D


    • TesTeRi

      Tee uusi sovellus

      Laita ensin tyhjälle Form:lle (Form1)
      - kaksi Edit-komponenttia (Edit1 ja Edit2)
      - Label-komponentti (Label1)
      - Button-komponentti (Button1)

      Tee Form:lle OnCreate tapahtuma. Täydennä sen "runkoa"
      niin että se näyttää tältä

      procedure TForm1.FormCreate(Sender: TObject);
      begin
      Edit1.Text := IntToStr(100);
      Edit2.Text := IntToStr(200);
      end;

      Tee Button:lle (Button1) vastaavasti OnClick-tapahtuma.
      Täydennä sitä että se näyttää tältä

      procedure TForm1.Button1Click(Sender: TObject);
      var a,b:integer;
      begin
      a := StrToInt(Edit1.Text);
      b := StrToInt(Edit2.Text);
      Label1.Caption :='Luvut ovat ' IfThen(a=b,'yhtäsuuria','erisuuria');
      end;


      Lisää uses-lauseen myös StrUtils, Math jonon jatkoksi samanlailla pilkulla erotettunakuin muutkin. Uses-lause löytyy koodin alkuosasta.

    • niinkö teilläkin

      Täytyy olla provo, mut siitä huolimatta kielen perusrakenteet eivät ole funktioita.

      • ...

        Delphin IfThen taitaa olla funktio
        IfThen(f>0,1/f,0) ilmoittanee nollalla jakovirheestä,
        mutta javan vastaava ei ilmoita
        (f>0 ? 1/f:0)


      • Tiellä kulkija
        ... kirjoitti:

        Delphin IfThen taitaa olla funktio
        IfThen(f>0,1/f,0) ilmoittanee nollalla jakovirheestä,
        mutta javan vastaava ei ilmoita
        (f>0 ? 1/f:0)

        On ihan hyvä huomioda tuollaiset seikat.
        Millä Pascal-versiolla testatsit tuon toimivuutta?

        Muista että eri kielet on toteutettu vähän eritavalla!


      • ...
        Tiellä kulkija kirjoitti:

        On ihan hyvä huomioda tuollaiset seikat.
        Millä Pascal-versiolla testatsit tuon toimivuutta?

        Muista että eri kielet on toteutettu vähän eritavalla!

        Pascalia en kokeillut ollenkaan, javan testasin.


    Ketjusta on poistettu 0 sääntöjenvastaista viestiä.

    Luetuimmat keskustelut

    1. Ihanasti alkoi aamu: SDP:n kaula kokoomukseen jo 6,9 %-yks

      Lindtmanin I hallitus on tukevasti jytkyttämässä laittamaan Suomi kuntoon Orvon täystuhohallituksen jäljiltä, jonka kann
      Maailman menoa
      545
      3686
    2. Minkä ikäinen

      Minkä ikäinen on kaipauksesi kohde?
      Ikävä
      171
      2700
    3. Teidän persujen pitäisi välillä miettiä kuinka Suomen talous saataisiin kuntoon

      Ja lopettaa tuo tyhjänpäiväinen maahanmuuttajista höpöttäminen. Teillä on sentään rahaministerin salkku tällä kierroksel
      Maailman menoa
      186
      2682
    4. Persujen VigeIius noIasi taas itsensä

      Kun uhriutui vuonna 2024 (siis persujen "vahtivuorolla") Tampereella aloittaneen perheryhmäkodin toiminnasta. ”Leviää k
      Maailman menoa
      29
      2177
    5. Persut ei kestä heidän johtajistaan tehtyä huumoria

      Laajalti tiedostettu tosiasia on, että autoritaariset johtajat ja erinäiset diktaattorit eivät kestä heidän kustannuksel
      Maailman menoa
      48
      1990
    6. Kuka omistaa entisen Veljeskodin?

      Kenellä on varaa pitää hiljattain remontoitua rakennusta tyhjillään? Tehdäänkö siitä Suomen kallein kirpputori vai mikä
      Ähtäri
      8
      1902
    7. Vasemmistoliitto peruisi sosiaaliturvan heikennykset

      He palauttaisivat työttömyysturvan ja asumstuen suojaosat, eli saisi jälleen tienata 300 euroa kuukaudessa ilman tukien
      Maailman menoa
      42
      1641
    8. Martina ei mennyt naimisiin

      IS 17.9: Martinan häät peruuntui, tajusi, ettei ollut oikea aika. Rahat meni hevosiin. On edelleen parisuhteessa Yhdysva
      Kotimaiset julkkisjuorut
      183
      1573
    9. Kaninkolojen vaikutus?

      Vinkki sinkkumiehille: jos haluatte kunnollisen täysijärkisen naisen, niin kaivautukaa ulos kaninkoloistanne ja parantak
      Sinkut
      217
      1568
    10. Kuka opettaja, mikä koulu

      Minkä koulun opettaja saanut potkut
      Nivala
      14
      1486
    Aihe