Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2006.04.30;
Скачать: CL | DM;

Вниз

Table1.FindKey   Найти похожие ветки 

 
nastyok::   (2006-04-14 11:07) [0]

у меня возник такая проблема.
есть база dbf,есть ещо 2 Edit-a. и там два столбика,на одном слова а на другом ихний перевод. так вот,задача состоит в том что когда вводиш слово на Edit1 и клик на кнопку, прога находит слова в базе,а слова перед найденным(перевод его) должно появится на Edit2. первую часть я уже зделал,но зделать так чтобы перевод появился на Edit2-это у меня никак не получается.

Var
s: String;
begin
s:= Edit1.Text;
Table1.FindKey([s]);
If Table1.FindKey([s]) Then ShowMessage("result found")  else ShowMessage("no result");
end;


 
vovnuke ©   (2006-04-14 11:15) [1]

ну как нибудь так:
var
 s: string;
begin
 s := Edit1.Text;
 if Table1.FindKey([s]) then
   Edit2.Text := Table1.FieldByName("translate").asString
 else
   Edit2.Text := "не найдено";
end;



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

Текущий архив: 2006.04.30;
Скачать: CL | DM;

Наверх




Память: 0.46 MB
Время: 0.034 c
15-1143407609
Наиль
2006-03-27 01:13
2006.04.30
Головоломки в редакторе кода


9-1129012672
Top
2005-10-11 10:37
2006.04.30
delphix вывести текст полупрозрачно


2-1145028230
elfebet
2006-04-14 19:23
2006.04.30
как при помощи IdHTTP запустить браузер по умолчанию?


3-1141306264
Dosfalcon
2006-03-02 16:31
2006.04.30
Извлечение системного номера записи DBF


15-1144151706
alles
2006-04-04 15:55
2006.04.30
По Аске получил, забавно