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

Вопрос о TEdit   Найти похожие ветки 

← →
Greenchel ©   (2006-11-08 19:48) [0]

Можно ли (буду признателен за пример кода) сделать такую фишку:
В ListBox например есть слово "MAX", мы на него кликаем и это слово вставляется в Edit в конце всего написанного, при этом текст написанный в Edit НЕ ВЫДЕЛЯЕТСЯ и фокус передаётся тому же Edit в конец написанного текста. Заранее спс за ответ.

---

← →
evvcom ©   (2006-11-08 19:57) [1]

> Можно ли

Можно

---

← →
Calibr ©   (2006-11-08 19:58) [2]

Edit1.Text := Edit1.Text + ListBox1.Items.Strings[ListBox1.ItemIndex];
Edit1.SelStart := length(Edit1.text);

---

← →
Greenchel ©   (2006-11-08 20:00) [3]

Калибр, спасибо

---

← →
Greenchel ©   (2006-11-08 20:07) [4]

С вашей помощью намутил всё таки нужный мне код :)

Edit1.Text := Edit1.Text + ListBox1.Items.Strings[ListBox1.ItemIndex]+", ";
Form1.ActiveControl:= Edit1;
Edit1.SelStart := length(Edit1.text);

Вдруг кому пригодиться :))

---

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

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



Память: 0.45 MB
Время: 0.029 c