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

Kada radim search u dbgrid-u sve radi osim........

[es] :: Pascal / Delphi / Kylix :: Kada radim search u dbgrid-u sve radi osim........

[ Pregleda: 1046 | Odgovora: 8 ]

Postavi temu Odgovori

Autor

Pretraga teme: Traži
Markiranje Štampanje RSS

boban__2006

Član broj: 85852
Poruke: 53
*.dynamic.sbb.co.yu.



Profil

icon Kada radim search u dbgrid-u sve radi osim........28.04.2006. u 02:38

Kada radim search u dbgrid-u sve radi, osim sto kad obrisem ono sto sam uneo u edit polje, ostane prazan dbgrid. Kako mogu da vratim na staro dbgrid ako je prazno edit polje? Hvala unapred.
28.04.2006. u 02:38 

savkic
Igor Savkić

Moderator
Član broj: 92186
Poruke: 1151
*.adsl.sezampro.yu.



Profil

icon Re: Kada radim search u dbgrid-u sve radi osim........28.04.2006. u 09:11
> Kada radim search u dbgrid-u sve radi, osim sto kad obrisem ono sto sam uneo u edit polje, ostane prazan dbgrid. Kako mogu da vratim na
> staro dbgrid ako je prazno edit polje? Hvala unapred.

Nije mi jasno pitanje. Koju DBGrid komponentu koristiš, kako radiš search i čemu služi edit polje.
28.04.2006. u 09:11 

Miloš Baić

Član broj: 72468
Poruke: 1123
*.dialup.neobee.net.

Sajt: www.2advanced.com


Profil

icon Re: Kada radim search u dbgrid-u sve radi osim........28.04.2006. u 10:44
Verovatno nisi search odradio kako treba?!
Probaj search ovako:
Code:
ADOTable1.Filter := 'Naziv_kolone = ' + QuotedStr(Edit1.Text);
ADOTable1.Filtered := true;

ili
Code:
ADOTable1.Filter := 'Naziv_Kolone LIKE ' + QuotedStr(Edit1.Text + '%');
ADOTable1.Filtered := true;

ili sa ADOQuery:
Code:
filter:='';
ADOQuery1.Close;
ADOQuery1.SQL.Clear;
ADOQuery1.SQL.Add('SELECT * FROM Naziv_Tabele ');
  if Edit1.Text<>'' then
     if filter='' then
        filter:='WHERE Naziv_Kolone LIKE ''' + Edit1.Text + '%'' '
     else
        filter:='WHERE Naziv_Kolone LIKE ''' + Edit1.Text + '%'' ';
ADOQuery1.SQL.Add(filter);
ADOQuery1.Open;

S tim sto moras izvrsiti deklaraciju promenljive filter:
Code:
var
    filter: String;


pozzz
If you go out of your mind, do it quietly, so as not to disturb those around you...
28.04.2006. u 10:44 

boban__2006

Član broj: 85852
Poruke: 53
..taman-bg.customer.sbb.co.yu.



Profil

icon Re: Kada radim search u dbgrid-u sve radi osim........02.05.2006. u 21:01
drugi nacin mi radi, ali mi kada upisem nesto u edit polje, pa obrisem, dbgrid ostane prazan. a ovaj treci uopste nista ne radi. :( A da nema mozda neka opcija da kada mi je prazno edit polje, ponovo ucitam sve u dbgrid. Ako mozda imas kod bio bih ti zahvalan.
02.05.2006. u 21:01 

Miloš Baić

Član broj: 72468
Poruke: 1123
*.neobee.net.

Sajt: www.2advanced.com


Profil

icon Re: Kada radim search u dbgrid-u sve radi osim........02.05.2006. u 23:23
Probaj ovako:
Code:
ADOTable1.Filter := 'Naziv_Kolone LIKE ' + QuotedStr(Edit1.Text + '%');
ADOTable1.Filtered := true;
Edit1.Clear;


Ovo:
Code:
filter:='';
ADOQuery1.Close;
ADOQuery1.SQL.Clear;
ADOQuery1.SQL.Add('SELECT * FROM Naziv_Tabele ');
  if Edit1.Text<>'' then
     if filter='' then
        filter:='WHERE Naziv_Kolone LIKE ''' + Edit1.Text + '%'' '
     else
        filter:='WHERE Naziv_Kolone LIKE ''' + Edit1.Text + '%'' ';
ADOQuery1.SQL.Add(filter);
ADOQuery1.Open;
Edit1.Clear;

koristis kad radis s ADOQuery komponentom! Verovatno je nisi dobro povezao s BP?!

[Ovu poruku je menjao loshmiscg dana 03.05.2006. u 00:53 GMT+1]
If you go out of your mind, do it quietly, so as not to disturb those around you...
02.05.2006. u 23:23 

boban__2006

Član broj: 85852
Poruke: 53
..taman-bg.customer.sbb.co.yu.



Profil

icon Re: Kada radim search u dbgrid-u sve radi osim........03.05.2006. u 10:36
Ne mogu da stavim edit1.clear, jer radim search na dogadjaj edit1.change, probao sam da uradim refresh adotable, ali ni to ne reaguje. Probao sam sa ovim kodom, ali mi ne uspeva:

if edit1.text<>'' then begin
form1.ADOTable1.Filter := 'RobaNaziv LIKE ' + QuotedStr(Edit1.Text + '%');
form1.ADOTable1.Filtered := true;
end;

Molim vas, ako mozete da probate, pa da mi ukazete gde gresim.
03.05.2006. u 10:36 

marcha
Nikola Marcic
Beograd/Leskovac

Član broj: 6454
Poruke: 105
213.137.123.*

ICQ: 156892888


Profil

icon Re: Kada radim search u dbgrid-u sve radi osim........04.05.2006. u 11:27
AKo sam dobro razumeo sta te muci, ovo bi trebalo da ti resi problem:
Code:

with form1.ADOTable1 do
begin
  Filter := 'NazivPolja LIKE ' + QuotedStr(Edit1.Text + '%');
  Filtered := Edit1.Text<>'';
end;


Marcha
-----------------------------------
Pretpostavka je majka za***a.
04.05.2006. u 11:27 

boban__2006

Član broj: 85852
Poruke: 53
..taman-bg.customer.sbb.co.yu.



Profil

icon Re: Kada radim search u dbgrid-u sve radi osim........04.05.2006. u 16:50
Nije resilo problem. I dalje kada ukucam nesto u edit polje, pa obrisem on ne vrati celu listu proizvoda u dbgrid.:(
04.05.2006. u 16:50 

boban__2006

Član broj: 85852
Poruke: 53
..taman-bg.customer.sbb.co.yu.



Profil

icon Re: Kada radim search u dbgrid-u sve radi osim........04.05.2006. u 17:09
skontao sam. hvala na pomoci.
04.05.2006. u 17:09 

[es] :: Pascal / Delphi / Kylix :: Kada radim search u dbgrid-u sve radi osim........

[ Pregleda: 1046 | Odgovora: 8 ]

Postavi temu Odgovori

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