Главная страница
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.135 c
14-1091910277
Алекс_
2004-08-08 00:24
2004.08.29
Где бы скачать новые компоненты FastNet?


14-1092273388
Кириешки
2004-08-12 05:16
2004.08.29
Что случилось с Delphi


1-1092369646
inkarik
2004-08-13 08:00
2004.08.29
RadioGroup


1-1092466756
Андрей1
2004-08-14 10:59
2004.08.29
ANSI или ASCII


3-1091551873
jenbond
2004-08-03 20:51
2004.08.29
Контроль подключения к БД