![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Сохранить текст из ListBox на чужой форме [D6, D7, WinXP]
LOX © (2003-12-30 13:51:00)
Имеется TListBox, на чужой форме, я знаю его Handle, Window Proc.
Как мне сохранить из этого ListBox"a текст в файл или хотябы в буфер обмена(в текстовом виде).
LOX (2003-12-30 15:50:00) [21]
Оказывается, что я неправильно узнал handle listbox"a.
Плиз, подскажите как узнать.
А так всё работает с моим Listbox.
YuRock (2003-12-30 14:28:00) [22]
var
i: Integer;
pStr: PChar;
...
for i := 0 to SendMessge(hList, LB_GETCOUNT, 0, 0) - 1 do begin
pStr := StrAlloc(SendMessge(hList, LB_GETTEXTLEN, i, 0));
SendMessge(hList, LB_GETTEXT, i, Integer(pStr))
...
// Работай со строкой pStr, как хочешь
...
StrDispose(pStr);
end;
P.S. Можно для скорости выделить статический массив (типа pStr: Array[0..1023] of Char), тогда не нужно выделять/удалять память и получать размер строки (только надо быть уверенным, что текст в итемах будет меньше)