Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.08.29;
Скачать: 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 вся ветка

Текущий архив: 2004.08.29;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.038 c
3-1091687674
РВА
2004-08-05 10:34
2004.08.29
Постаничное суммирование в FRep


3-1091648519
gonta
2004-08-04 23:41
2004.08.29
Инсталяция компонентов ODAC


1-1092155018
Magistr
2004-08-10 20:23
2004.08.29
Перемещение объекта


4-1090268200
shooter
2004-07-20 00:16
2004.08.29
Почтовые аттрибуты


1-1092157520
new developer
2004-08-10 21:05
2004.08.29
Фокусы