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;

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