Помогите сделать поиск в базе типа
procedure TForm1.bsSkinButton1Click(Sender: TObject);
begin
with Table1 do begin
IndexName:= 'NUM_TEL';
SetRangeStart;
FieldByName('NUM_TEL').AsString:= bsSkinEdit1.Text;
SetRangeEnd;
FieldByName('NUM_TEL').AsString:= bsSkinEdit1.Text+'999999';
ApplyRange;
end;
end;
но чтоб выводились данные не только которые начинается на bsSkinEdit1.Text но и производился внутренний поиск в словах .
например: в телефонах 214365 234253 645342 найти все телефоны с цифрой 34 и вывести только их.
Зарание спасибо...
Здравствуйте, x-net, Вы писали:
Хм. Дивлюсь я — и почему никто хелп не читает?
Попробуй так:
procedure TForm1.bsSkinButton1Click(Sender: TObject);
begin
with Table1 do begin
Filter:= 'NUM_TEL=''*'+bsSkinEdit1.Text+'*''';
Filtered:= True;
end;
end;
... << RSDN@Home 1.0 beta 6 >>
Здравствуйте, Sinclair, Вы писали:
нет не работает .. программа долго думает .. и потом показывает одну пустую строку ..
Здравствуйте, x-net, Вы писали:
XN>Здравствуйте, Sinclair, Вы писали:
XN>нет не работает .. программа долго думает .. и потом показывает одну пустую строку ..
А БД-то какая ?
Здравствуйте, x-net, Вы писали:
XN>например: в телефонах 214365 234253 645342 найти все телефоны с цифрой 34 и вывести только их.
XN>Зарание спасибо...
SELECT * FROM Table1 WHERE NUM_TEL='%43%'
Здравствуйте, AngeL B., Вы писали:
AB>Здравствуйте, x-net, Вы писали:
XN>>например: в телефонах 214365 234253 645342 найти все телефоны с цифрой 34 и вывести только их.
XN>>Зарание спасибо...
AB>AB>SELECT * FROM Table1 WHERE NUM_TEL='%43%'
AB>
SELECT * FROM Table1 WHERE NUM_TEL LIKE '%43%'
Любая проблема проектирования может быть решена введением дополнительного абстрактного слоя, за исключением проблемы слишком большого количества дополнительных абстрактных слоев.
Здравствуйте, Strannic, Вы писали:
S>S>SELECT * FROM Table1 WHERE NUM_TEL LIKE '%43%'
S>
Естественно.