![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Умный ComboBox [D7, Paradox]
RomanH © (2006-03-03 16:25:00)Доброго дня мастера.Хочу сделать так чтобы при вводе в ComboBox текст ,получал SQL запрос типа
SQL.ADD('where Name Like"'+ComboBox.text+'%"');
DBLookUpComboBox не подходит так как колличество записей более 15000.
Вопрос :может существует какой-нибудь компонент для этой цели.
Desdechado (2006-03-03 18:59:00) [1]RomanH © (03.03.06 18:22) [4]
а теперь ПОНЯТНЫМ языком
кстати, ради интереса попробуй ввести кавычку в комбо
ANB © (03.03.06 16:48) [3]
судя по тексту, ты прав
бедные пользователи
RomanH (2006-03-03 18:22:00) [2]Как сделать так чтобы после этой процедуры курсор в ComboBox переместился после текста в этом ComboBox, а то он перескакивет перед
ComboBox1.Text.
procedure TForm1.ComboBox1Change(Sender: TObject);
var
i:integer;
begin
with Query1 do
begin
Close;
SQL.Clear;
SQL.Add('Select Name');
SQL.Add('From ":KLADR:street.db"');
SQL.Add('Where');
SQL.Add('(Name Like "'+ComboBox1.Text+'%")');
Open;
end;
Edit1.Text:=inttostr(Query1.RecordCount);
ComboBox1.Items.Clear;
for i:=1 to Query1.RecordCount do
begin
ComboBox1.Items.Add(Query1.FieldValues['Name']);
Query1.Next;
end;
end;
ANB (2006-03-03 16:48:00) [3]
> RomanH © (03.03.06 16:25)
И на каждуй нажатие кнопки ты будешь базу переопрашивать ?
Desdechado (2006-03-03 16:47:00) [4]а комбо тут зачем? эдит, имхо, для этого нужен
Ega23 (2006-03-03 16:32:00) [5]
> Вопрос :может существует какой-нибудь компонент для этой
> цели.
Ну я только один пока вижу: TComboBox