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

Как сделать чтобы текс выбранного итема из листбокса попадал в   Найти похожие ветки 

← →
Gnec ©   (2004-08-13 19:06) [0]

Приветствую всех.
Люди, пожалуйсто помогите. У меня есть лист бокс с кучей разных итемов, я хочу чтобы если клацнуть два раза по итему, его текст попадал в Memo, или RichEdit. Вобщем в любой компонент где можно текст редактить. Заранее благодарен.

---

← →
GEN++ ©   (2004-08-13 19:26) [1]


procedure TForm1.ListBox1DblClick(Sender: TObject);
var
n:integer;
begin
   n:=ListBox1.ItemIndex;
    Edit1.text:=ListBox1.Items.Strings[n];
 //или
      Memo1.Lines.Add(ListBox1.Items.Strings[n]);
end;


---

← →
Gnec ©   (2004-08-13 19:50) [2]

Спасибо огромное! Я только начинаю прогить, поэтому мало знаю. У меня проблема была с Strings[n]; я про н забывал ;)

---

← →
Gnec ©   (2004-08-13 19:58) [3]

Ой, опять вопросец. А как сделать чтоб этот текст ещё помещался не на новую строку, а в положение текстового курсора??? Может быть заменить лист бокс на чтонибудь другое?

---

← →
begin...end ©   (2004-08-13 20:04) [4]

> [3] Gnec ©   (13.08.04 19:58)

MemoName.SetSelTextBuf(PChar(ListBoxName.Items[n]));

---

← →
Palladin ©   (2004-08-13 20:13) [5]

Никогда не говори "прогить"... прогят ламеры...

---

← →
Gnec ©   (2004-08-13 20:52) [6]

Спасибо за то что просветили. А как говорят нормальные прогрмамисты???

---

← →
GEN++ ©   (2004-08-13 23:52) [7]

>Gnec ©  
>А как говорят нормальные прогрмамисты???
Нормальные - пишут.
>А как сделать чтоб этот текст ещё помещался не на новую строку, >а в положение текстового курсора??? Может быть заменить лист >бокс на чтонибудь другое?
Можно использовать Items.Insert, если помещать перед строкой,
где стоит курсор.

---

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

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



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