Navigacija
Lista poslednjih: 16, 32, 64, 128 poruka.

Problem sa maskedit i sa pretvaranjem strtoint?!

[es] :: Pascal / Delphi / Kylix :: Problem sa maskedit i sa pretvaranjem strtoint?!

[ Pregleda: 3090 | Odgovora: 12 ] > FB > Twit

Postavi temu Odgovori

Autor

Pretraga teme: Traži
Markiranje Štampanje RSS

MatezYU

Član broj: 4114
Poruke: 1586
*.adanet.co.yu.



+17 Profil

icon Problem sa maskedit i sa pretvaranjem strtoint?!09.03.2006. u 06:24 - pre 198 meseci
Trebalo bi da sa maskedit polja koje sam ogranicio na 13 polja maksimalno ucitam JMBG broj koji je integer. Tj pretvaram string od 13 karaktera u pojedinacne brojeve i onda pomocu formule proveravam ispravnost. Sve to radi lepo jedino kada ne unesem do kraja broj, tj. ostane blanko mesta u toj masci izbaci mi poruku da ne moze da konvertuje " " polje u integer... Kako bih mogao da izbegnem tu gresku i da mi se izbaci upozorenje da se unese do kraja ceo broj?
 
Odgovor na temu

Srki_82
Srdjan Tot
Me @ My Home
Ljubljana

Član broj: 28226
Poruke: 1403
82.208.201.*

ICQ: 246436949


+10 Profil

icon Re: Problem sa maskedit i sa pretvaranjem strtoint?!09.03.2006. u 07:12 - pre 198 meseci
Imas nekoliko funkcija za prevodjenje stringa u broj.

StrToInt prevodi string u broj, a ako se u stringu nalazi neki karakter koji se ne moze prevesti u broj javlja se exception. Mozes uz pomoc try except bloka da, umesto standardne poruke o gresci, ispises neku svoju.

StrToIntDef prevodi string u broj, a u slucaju greske broj koji vraca ima Default vrednost koju navedes prilikom pozivanja funkcije. Default vrednost mozes staviti na npr. -1. Kada se funkcija zavrsi, proveris rezultet i ako je -1 znaci da je doslo do greske.

TryStrToInt prevodi string u broj (promenljiva u kojoj treba da je rezultat se daje kao parametar) i vraca True ili False u zavisnosti da li je operacija uspela. Ako vrati False znaci da nije.

Nadam se da je pomoglo... i pogledaj help pre nego sto pitas jer tamo sve lepo pise.
 
Odgovor na temu

MatezYU

Član broj: 4114
Poruke: 1586
*.ru
Via: [es] mailing liste



+17 Profil

icon Re: Problem sa maskedit i sa pretvaranjem strtoint?!09.03.2006. u 13:55 - pre 198 meseci
Hvala ti puno!!!
 
Odgovor na temu

MatezYU

Član broj: 4114
Poruke: 1586
*.ru
Via: [es] mailing liste



+17 Profil

icon Re: Problem sa maskedit i sa pretvaranjem strtoint?!09.03.2006. u 16:21 - pre 198 meseci
Probao sam onu prvu i drugu varijantu i ne radi opet... Izbaci mi istu
gresku...

Probao sam ovako:

try
broj:=strtoint(maskedit1.Text);

except

on exception do

halt;
end;

Primera radi samo da stane program ali nece... Stalno to predje i
izbaci gresku...
 
Odgovor na temu

Srki_82
Srdjan Tot
Me @ My Home
Ljubljana

Član broj: 28226
Poruke: 1403
82.208.201.*

ICQ: 246436949


+10 Profil

icon Re: Problem sa maskedit i sa pretvaranjem strtoint?!09.03.2006. u 16:57 - pre 198 meseci
Ne znam sta da ti kazem, ali meni ovo radi
Code:
try
  I := StrToInt('Proba');
except
  Greska;
end;

I := StrToIntDef('Proba', -1);
if I = -1 then
  Greska;

if not TryStrToInt('Proba', I) then
  Greska;


Sva tri nacina lepo rade.
 
Odgovor na temu

martinj
Martin Jeremic
Nis

Član broj: 39299
Poruke: 86
*.smin.sezampro.yu.

Sajt: www.onedevteam.com


+2 Profil

icon Re: Problem sa maskedit i sa pretvaranjem strtoint?!09.03.2006. u 20:13 - pre 198 meseci
u OnExit event za edit postavi proveru da li je duzina edit.text = 13 i ako nije nemoj da pozivas metodu za validaciju.
A da bi sprecio da se unose drugi znaci osim brojeva, postavi u onKeyDown (ili onKeyPress, ne znam tacno koja od njih ima char za parametar) nesto slicno ovome

if Key not in [1, 2, 3, ...] then MessageBox('greska, ovde je moguce uneti samo broj')

To bi trebalo da ti smanji muke oko validacije...
 
Odgovor na temu

martinj
Martin Jeremic
Nis

Član broj: 39299
Poruke: 86
*.yu
Via: [es] mailing liste

Sajt: www.onedevteam.com


+2 Profil

icon Re: Problem sa maskedit i sa pretvaranjem strtoint?!09.03.2006. u 20:15 - pre 198 meseci
edit: dupli post

[Ovu poruku je menjao martinj dana 09.03.2006. u 21:16 GMT+1]
 
Odgovor na temu

MatezYU

Član broj: 4114
Poruke: 1586
*.ru
Via: [es] mailing liste



+17 Profil

icon Re: Problem sa maskedit i sa pretvaranjem strtoint?!09.03.2006. u 20:36 - pre 198 meseci
Ok, hvala ti puno!
Problem je bio sto je kod maskedit-a bilo:

maskedit1.editmask:99999999999; a treba
maskedit1.editmask:=!9999999999999;
nije bilo znaka uzvika ali kada sam to stavio proradilo je. Nemam
pojma za cega ce taj znak uzvicnika ali sada radi...

Hvala ti!
 
Odgovor na temu

Toyo

Član broj: 45193
Poruke: 227
*.panet.co.yu.



+1 Profil

icon Re: Problem sa maskedit i sa pretvaranjem strtoint?!13.03.2006. u 17:05 - pre 198 meseci
A kako ti mislis da string od 13 polja pretvaras u int64 koji je maksimalne duzine 10 polja, ili 9 ako je prva cifra veca od 2?
 
Odgovor na temu

ivanho
slobodni umetnik
Beograd

Član broj: 28465
Poruke: 73
*.maksnet.net.



Profil

icon Re: Problem sa maskedit i sa pretvaranjem strtoint?!13.03.2006. u 17:56 - pre 198 meseci
Citat:
Toyo: A kako ti mislis da string od 13 polja pretvaras u int64 koji je maksimalne duzine 10 polja, ili 9 ako je prva cifra veca od 2?


Int64 ima opseg –2^63 do 2^63–1 sto je vece od 10 cifara (mislim da ima 19)
To o cemu ti pises je LongInt...
 
Odgovor na temu

Shadow Warrior
Vladimir Mitrovic
Vrachar, Beograd

Član broj: 15728
Poruke: 43
*.ptt.yu.



Profil

icon Re: Problem sa maskedit i sa pretvaranjem strtoint?!13.03.2006. u 20:47 - pre 198 meseci
ovaj, ja imam slican problem.
hocu da pretvorim real u string (i obrnuto), delphi mi javlja da RealToStr ne postoji, moze li se ovo?
hvala
 
Odgovor na temu

ivanho
slobodni umetnik
Beograd

Član broj: 28465
Poruke: 73
*.maksnet.net.



Profil

icon Re: Problem sa maskedit i sa pretvaranjem strtoint?!13.03.2006. u 21:19 - pre 198 meseci
real u string:
pogledaj u helpu sledece funkcije (sve rade ono sto hoces):
FloatToStr
FloatToStrF
FomatFloat
FloatToText

obrnuto:
StrToFloat
StrToFloatDef
 
Odgovor na temu

Shadow Warrior
Vladimir Mitrovic
Vrachar, Beograd

Član broj: 15728
Poruke: 43
*.ptt.yu.



Profil

icon Re: Problem sa maskedit i sa pretvaranjem strtoint?!14.03.2006. u 11:24 - pre 198 meseci
ok thankz!
 
Odgovor na temu

[es] :: Pascal / Delphi / Kylix :: Problem sa maskedit i sa pretvaranjem strtoint?!

[ Pregleda: 3090 | Odgovora: 12 ] > FB > Twit

Postavi temu Odgovori

Navigacija
Lista poslednjih: 16, 32, 64, 128 poruka.