Вопрос о 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]

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

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

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

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

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