Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Базы";
Текущий архив: 2004.11.07;
Скачать: [xml.tar.bz2];

Вниз

table1.Locate( Текст ,123,[])   Найти похожие ветки 

 
Samick ©   (2004-10-09 13:07) [0]

Я написал table1.Locate("Текст",123,[]);и Grid1 показывает только надпись 123 помогите пожалуста как сделать мне так чтобы при вводе  текста в Edit1, отображалась надпись в Grid


 
GanibalLector ©   (2004-10-09 14:24) [1]


procedure TForm1.Edit1KeyUp(Sender: TObject; var Key: Word;
 Shift: TShiftState);
begin
if query1.Active=true then
query1.locate("name",edit1.text,[lopartialkey]);
end;



Событие KeyUp


 
GanibalLector ©   (2004-10-09 14:35) [2]

Хотя,можно любые события использовать.Хоть тот-же Change


 
Deniz ©   (2004-10-09 14:36) [3]

Можно еще добавить

query1.locate("name",edit1.text,[loCaseInsensitive, loPartialKey]);


 
GanibalLector ©   (2004-10-09 14:39) [4]

loCaseInsensitive
Key fields and key values are matched without regard to case.

loPartialKey
Key values can include only part of the matching key field value; for example, "HAM" would match both "HAMM" and "HAMMER."



Страницы: 1 вся ветка

Форум: "Базы";
Текущий архив: 2004.11.07;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.44 MB
Время: 0.035 c
6-1093954630
Дядя
2004-08-31 16:17
2004.11.07
Цепочка прокси-серверов


1-1098184658
Mishenka
2004-10-19 15:17
2004.11.07
Компонент как в Outlook Express?


14-1098281223
XProger
2004-10-20 18:07
2004.11.07
Мастера Delphi - официальный IRC канал сайта www.delphimaster.ru


1-1098777268
BaDeVlad
2004-10-26 11:54
2004.11.07
Как обрезать WMF?


3-1096868940
Галинка
2004-10-04 09:49
2004.11.07
Как создать таблицу ADO+Access...





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский