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

Вниз

взять текст из чужого ListBox-a   Найти похожие ветки 

← →
Muchacho   (2005-11-02 08:25) [0]

Здравствуйте.
Нашел хендл чужого ListBox-а,  теперь как взять его Items?

---

← →
begin...end ©   (2005-11-02 08:33) [1]

LB_GETTEXTLEN + LB_GETTEXT

---

← →
Muchacho   (2005-11-02 08:41) [2]

спасибо. а как нажать кнопку? :)

---

← →
Muchacho   (2005-11-02 08:43) [3]

пожалуйста напишите функцию полным  для ListBox и Button

---

← →
begin...end ©   (2005-11-02 08:56) [4]

> Muchacho

var
 hLB: Cardinal;
 Len: Cardinal;
 P: PChar;
begin
 ...
 Len := SendMessage(hLB, LB_GETTEXTLEN, 0, 0);
 if Len > 0 then
 begin
   GetMem(P, Len + 1);
   try
     SendMessage(hLB, LB_GETTEXT, 0, Integer(P));
     ShowMessage(P)
   finally
     FreeMem(P)
   end
 end
end

> а как нажать кнопку?

Не скажу.
:-)))

---

← →
Muchacho   (2005-11-02 09:09) [5]

это берет только первую строку. А взять другие?

---

← →
begin...end ©   (2005-11-02 09:12) [6]

> Muchacho   (02.11.05 09:09) [5]

Третий параметр в обоих вызовах SendMessage -- это индекс строки в listbox"е.

---

← →
Muchacho   (2005-11-02 09:15) [7]

thanx a million :)

---

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

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

Наверх

Память: 0.47 MB
Время: 0.04 c