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

Obrada uslova za pretragu sa porukom.

[es] :: Pascal / Delphi / Kylix :: Obrada uslova za pretragu sa porukom.

[ Pregleda: 2001 | Odgovora: 4 ] > FB > Twit

Postavi temu Odgovori

Autor

Pretraga teme: Traži
Markiranje Štampanje RSS

inherited
Novi Sad

Član broj: 95516
Poruke: 219
212.200.180.*



Profil

icon Obrada uslova za pretragu sa porukom.14.02.2007. u 17:59 - pre 208 meseci
Interesuje me, kako profesionalno odraditi sledece:
Nakon unosa broja tekuceg racuna, npr., ukoliko takav ne postoji ili nije po nekom osnovu aktivan, oznaka za neaktivnost je npr. 0, spreciti dalji unos podataka (uz odgovarajucu poruku), u suprotnom ispisati podatke vezane za taj tekuci racun.

Polazim od if petlje posle pretrage, tipa:
Code:

if ADOQuery.RecordCount = 0 then 
 ShowMessage('Neki text!')
else
 if ADOQuery.FieldByName('status').AsInteger = 0 then
  ShowMessage('Neki text!')


???
 
Odgovor na temu

savkic
Igor Savkić

Moderator
Član broj: 92186
Poruke: 2739



+92 Profil

icon Re: Obrada uslova za pretragu sa porukom.14.02.2007. u 21:16 - pre 208 meseci
> Nakon unosa broja tekuceg racuna, npr., ukoliko takav ne postoji ili nije po nekom osnovu aktivan, oznaka za neaktivnost je npr. 0, spreciti dalji
> unos podataka (uz odgovarajucu poruku), u suprotnom ispisati podatke vezane za taj tekuci racun.

Code:

if Greska then
  raise Exception.Create('Greska')
else
  Caption := 'Sve je u redu';


 
Odgovor na temu

Miloš Baić
Miloš Baić
ERP (Dynamics NAV) programer
Beograd

Član broj: 72468
Poruke: 1155
*.kalik.info.



Profil

icon Re: Obrada uslova za pretragu sa porukom.14.02.2007. u 23:38 - pre 208 meseci
Nije loše koristiti try - except blok:
Code:

...
try
//neka obrada (filter podataka)
except
 on e: Exception do
 MessageDlg(e.Message, mtError, [mbOK], 0);
end;//end except
...

Naravno, ovo iza except može biti neka tvoja poruka.
Someone's sitting in the shade today because someone planted a tree a long time ago.
 
Odgovor na temu

bondja

Član broj: 10286
Poruke: 167
*.adsl.static.sezampro.yu.



+3 Profil

icon Re: Obrada uslova za pretragu sa porukom.15.02.2007. u 07:54 - pre 208 meseci
Malo je nezgodno kada se pojavi message box, ili nesto slicno kao poruka korisniku, zato sto tada korisnik
MORA da klikne na ono OK dugme itd... Bolje je napisati ispod edit konotrole u koju unosi podatke,
neki tekst (labela) i obojiti tu edit kontrolu (npr crveno). Moze na bilo koji drugi nacin da se oboji/obelezi
prozor, labela, caption, da uneta vrednost nije validna. Dakle izbegavati showmessage dialoge itd.

BTW: Ne postoji "profesionalan" kod koji to resava. Bilo kakav kod koji napises je sasvim ok, ako je
korisnik zadovoljan (podrazumeva se da SVE radi bez greske :)

poz.
 
Odgovor na temu

inherited
Novi Sad

Član broj: 95516
Poruke: 219
212.200.179.*



Profil

icon Re: Obrada uslova za pretragu sa porukom.15.02.2007. u 10:15 - pre 208 meseci
Hvala vam na odgovorima.
Iskombinovacu try ... except blok, sa porukom o gresci u nekoj labeli ili slicno.
 
Odgovor na temu

[es] :: Pascal / Delphi / Kylix :: Obrada uslova za pretragu sa porukom.

[ Pregleda: 2001 | Odgovora: 4 ] > FB > Twit

Postavi temu Odgovori

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