Boolean instead of LongInt?
Hali, addot egy forráskód:
var
ev: integer;
ho: integer;
nap: integer;
begin
ev:=StrToint(Edit1.Text);
ho:=Strtoint(Edit2.Text);
nap:=Strtoint(Edit3.Text);
if ho=1 and nap<32 then
Showmessage('van ilyen dátum');
else
close;
end;
tovább is van de ebben van a hiba.
A if ho=2 kifejezéssel van gondja, Booleant kap integer helyett, az miért van?
egyébként ez egy oylan program lenne hogy beirnánk az évet, hónapot és napot, és kiírná, hogy létezik-e ilyen dátum (beleértve a szökőévet) Ha ezzel kapcsolatban is tudtok segiteni azt külön megköszönném
"if ho=1 and nap<32 then" helyett "if (ho=1) and (nap<32) then" kell.
(ho=1) and (nap<32) boolean logikai kifejezés true/false lehet az értéke. Hiszen if (logikai kif) then ...
Hiszen (ho=1) and (nap<32) vagy igaz vagy nem.
Magadtól megírni nem olyan egyszerű, elég sok kiritériumot kell ellenőrizni hogy helyes e a dátum. A beépített strtodate fgv-et lenne érdemes segítségül felhasználni, nem kell újra feltalálni a spanyolviaszt.
A kódod szerint akkor létezik egy ilyen dátum?
Edit2.Text := '1';
Edit3.Text := '-2';
Egyébként: [link]
További kérdések:
Minden jog fenntartva © 2024, www.gyakorikerdesek.hu
GYIK | Szabályzat | Jogi nyilatkozat | Adatvédelem | Cookie beállítások | WebMinute Kft. | Facebook | Kapcsolat: info(kukac)gyakorikerdesek.hu
Ha kifogással szeretne élni valamely tartalommal kapcsolatban, kérjük jelezze e-mailes elérhetőségünkön!