Скачать: CL | DM;

Поиск + Подставление зап.   Найти похожие ветки 

← →
Пантелеев Иван   (2005-09-07 15:37) [0]

Как сделать чтобы при печати в Edit"е программа автоматом смотрела в таблице в определённой колонке значение и если есть похожее подставляла его. ну например:
Я начинаю печатать в Edit"е - ВЛА, а в таблице уже есть слово ВЛАДИМИР и ДИМИР автоматически должно подставляться.

---

← →
Savek   (2005-09-07 16:51) [1]

Пишешь в обработчике события OnKeyPress

if Table.Locate(Field,Edit1.Text,[]) then Edit1.Text:=...

и далее подсвечиваешь вставку

---

← →
Пантелеев Иван   (2005-09-07 19:09) [2]

>и далее подсвечиваешь вставку
А как?

---

← →
Signate ©   (2005-09-07 19:20) [3]


edit1.SelStart := 2; // Откуда выделяем
edit1.SelLength := 2;  // Сколько символов от SelStart надо выделить


---

← →
Пантелеев Иван   (2005-09-07 19:32) [4]

А можно весь код полностью?
И как я узнаю сколько мне нужно символов выделять?

---

← →
Signate ©   (2005-09-07 19:59) [5]

Я в базах не силен...
А Узнаешь как... Ну после того как ты нашел слово по куску, то выделять тебе надо ВЛАДИМИР-ВЛА (т.е. вычитать из всего слова столько символом сколько уже введено

---

← →
Dilmo   (2005-09-09 08:29) [6]

var
 s: string;

s :=  edit1.text;
edit1.text := FullWord;
edit1.SelStart := Length(s)+1;
edit1.SelLength := Length(FullWord)-Length(s);

FullWord - полное слово которое нашел

---

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

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.026 c