Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.01.27;
Скачать: CL | DM;

Вниз

Мастера, подскажите   Найти похожие ветки 

 
boolean   (2003-01-16 17:59) [0]

Есть ListView в режиме Report. Ткнул в ячейку. Как узнать номер столбца?


 
MBo ©   (2003-01-16 18:41) [1]

пробеги по columns[].width


 
boolean   (2003-01-19 10:26) [2]

Так не получится. Когда колонок много, то сделав гор. прокрутку, колонки будут отображаться не с первой, а например, с 3.


 
boolean   (2003-01-20 12:29) [3]

Короче, все таки сделал. Написана Builder, но кому надо перепишут.

В классе формы

private:
....
void __fastcall __ListView(TMessage& Msg);
....

Сама реализация

void __fastcall TFormMain::__ListView(TMessage& Msg)
{
//---Процедура отлавливания DblClick на ListView и определение номера колонки
if (Msg.Msg == WM_NOTIFY)
{
NM_LISTVIEW* lplv = (NM_LISTVIEW*)Msg.LParam;

if((HWND)lpLV->Handle == lplv->hdr.hwndFrom)
{
if(lplv->hdr.code == NM_DBLCLK)
{
ShowMessage("Колонка " + IntToStr(lplv->iSubItem));
}
}
}

WndProc(Msg);
}
//---------------------------------------------------------------------------
void __fastcall TFormMain::FormCreate(TObject *Sender)
{
WindowProc = __ListView;
}
//---------------------------------------------------------------------------
void __fastcall TFormMain::FormDestroy(TObject *Sender)
{
WindowProc = WndProc;
}
//---------------------------------------------------------------------------







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

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

Наверх




Память: 0.47 MB
Время: 0.017 c
14-87054
harismatik
2003-01-08 14:02
2003.01.27
Эдакий себе комбо-бокс


14-87073
Карлсон
2003-01-08 13:18
2003.01.27
помогите перевести в pascal!


7-87163
BJValentine
2002-11-14 17:42
2003.01.27
Ура COM приложению


1-86747
laser
2003-01-17 15:05
2003.01.27
помогите пожалуйста разобрать (что-то не работает)


1-86901
Vladk
2003-01-16 13:07
2003.01.27
нажатие