filtrowanie tabeli

0

Witam mam nastepujacy problem podana nizej procedura filtruje mi tylko gdy w edit wpisuje cyfry a umnie w tabeli akorat w w polu 'firma' sa cyfry i litery lub same cyfry lub same litery. Prosze o wskazowke co zmienic aby filtrowalo mi tez wg liter?

       procedure TForm1.Button10Click(Sender: TObject);
                var s:string;
                        begin
                               Table1.Filtered:=False;
                               s:= 'firma=' +Edit1.Text; // zmienna typu string
                               Table1.Filter:=s;
                               Table1.Filtered:=true;
                         end;

Pole 'firma' jest typem C -character. Prosze o pomoc THX

0

Oki juz spbie poradzilem oto rozwiazanie na jakie ja wpadlem moze komus sie przyda :)

Table1.Filtered:=False;
    Table1.OnFilterRecord:=nil;
    Table1.filter:='FIRMA=' +#39 + edit1.text +#39; // ja uzylem dblookupcombo.value 
    Table1.Filtered:=true;

OKI THX za zainteresowanie

1 użytkowników online, w tym zalogowanych: 0, gości: 1