ListView i SendMessgae

ListView i SendMessgae
agnieszka
  • Rejestracja:ponad 19 lat
  • Ostatnio:około 15 lat
  • Postów:97
0

Witam.
Wydaje mi się że drugi raz to piszę. No ale dobra. Czy wie ktoś jak dodać do ListView Text za pomocą SendMessage.
Dodatkowo powiem że ListView jest w stylu vsReport i jest tworzone w IDE. a poza tym to mam trzy kolumny.

SZ
  • Rejestracja:ponad 21 lat
  • Ostatnio:ponad 15 lat
  • Postów:3356
0

Problem jest w tym, że to TListView z IDE nie jest całkiem zgodne z tym ListView z WinAPI.

W WINAPI powinno wyglądać to tak:

Kopiuj
var lvi:LV_ITEM;
begin
ZeroMemory(@lvi, sizeof(lvi));
lvi.mask:=LVIF_TEXT or LVIF_PARAM;
lvi.pszText:='Text1';
SendMessage(ListView1.Handle, LVM_INSERTITEM, 0, integer(@lvi));
lvi.mask:=LVIF_TEXT;
lvi.pszText:='Text2';
lvi.iSubItem:=1;
SendMessage(ListView1.Handle, LVM_SETITEM, 0, integer(@lvi));
//..
end;

Aby upewnić się, jak powinno wyglądać w środowisku Delphi, polecam przejrzeć unit ComCtrls.


Dzięki wszystkim forumowiczom za lata wspólnych dyskusji; miłej zabawy w programowanie!
Sławomir "Szczawik" Włodkowski

Zarejestruj się i dołącz do największej społeczności programistów w Polsce.

Otrzymaj wsparcie, dziel się wiedzą i rozwijaj swoje umiejętności z najlepszymi.