Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Как скопировать текст из листбокса?


Yonic ©   (2002-02-12 04:40:00) 

Здраствуйте, мастера. Не подскажете какие должны быть 2 последних параметра у функции sendmessage(handle,LB_GETTEXT,X,Y), чтобы скопировать текст из листбокса?


MBo   (2002-02-14 07:07:00) [1]

а в хелп посмотреть?
var p:pchar;
len,num:integer;

num:=0;
len:=sendmessage(listbox1.handle,LB_GETTEXTLEN,num,0);
//num=0- первая строчка
if len<>LB_ERR then begin
getmem(p,len+1);
sendmessage(listbox1.handle,LB_GETTEXT,num,integer(p));
edit1.text:=p;
freemem(p,len+1);
end;


Yonic   (2002-02-14 05:43:00) [2]

Мда...
А можно привести пример???Пожалуста!


MBo   (2002-02-12 07:40:00) [3]

LB_GETTEXT
wParam = (WPARAM) index; // item index
lParam = (LPARAM) (LPCTSTR) lpszBuffer; // address of buffer


Наверх

Титульная страница Поиск, карта сайта Написать письмо