[ pijavica. @ 10.12.2010. 19:58 ] @
Imam problem oko pretrazivanja. Ovaj kod koji sam napisao omogucuje da pretrazi u Tabel1 a kolona PREZIME samo onako kako je zapisano u koloni. Npr. Ako koloni PREZIME stoji: Aleksic, Peric itd. Ja moram tako da ukucam Edit1 polje prvo veliko slovo 'A' za Aleksic i posle mala slova. Medjutim ako stavim malo slovo 'a' za Aleksic nemogu da nadjem. Molim vas, kako da napisem kod kada zelim nesto da pretrazujem u koloni nebitno dali je velika ili mala slova da nadje sto zelim. Ako stoji Aleksic kada ukucam u Edit1 malo slovo 'a' da nadje sve koji pocilju sa slovom 'a' nebitno dali u koloni ima velika ili mala slova. Hvala Vam puno oko pomoci. Code: procedure TForm1.Edit1Change(Sender: TObject); begin if Edit1.Text <> '' then begin Table1.Filtered := False; Table1.Filter := 'PREZIME = ' + #39 + Edit1.Text + '*' + #39; Table1.Filtered := True; end else Table1.Filtered := False; end; |