Code:
with QPretraga do
begin
Close;
Sql.Text:='Select Broj,Ime,Prezime from Klijenti where Broj starting with '''+
Broj.Text+''' and Ime starting with '''+Ime.Text+''' and Prezime '+
'starting with '''+Prezime.Text+''' order by Broj';
Open;
end;
with QPretraga do
begin
Close;
Sql.Text:='Select Broj,Ime,Prezime from Klijenti where Broj starting with '''+
Broj.Text+''' and Ime starting with '''+Ime.Text+''' and Prezime '+
'starting with '''+Prezime.Text+''' order by Broj';
Open;
end;
Ime,Prezime i Broj su TEdit. Proceduru koja sadrzi ovaj kod pozivam na OnChange event sva tri Edit box-a. Sto se tice pretrazivanja i prikazivanja u DBGridu tu je sve OK. Medjutim cesto mi se desi da nakon sto obrisem sav text iz svih edit box-ova, da mi nestane vertikalni scroll od DBGrida. Nakon nekoliko ponovnih upisa i brisanja iz edit box-ova (bilo kojih) on se ponovo pojavi,ali isto tako i ponovo nestane nakon odredjenog vremena.
Sta da radim ????
Tnx unapred
The truth shall set you free