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

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

ListView.OnChanging [D5, NT4]


XShura ©   (2002-08-05 16:50:00) 

Всем привет! Возникла по моему туповатая проблема с событием ListView.OnChanging ... Пишу такой код :

procedure Tform1.LVChanging(Sender: TObject; Item: TListItem;
Change: TItemChange; var AllowChange: Boolean);
begin
AllowChange:=false;
end;

Вопрос : почему это событие возникает иногда 2 или 3 раза для одного и тоже Item ??


XShura   (2002-08-05 17:20:00) [1]

хм... когда я писал что событие возникает 2 или 3 раза, я имел ввиду что Change было всегда ctState ...


Ученик   (2002-08-05 17:17:00) [2]

А если проще, то Change: ItemChange у них разный


Ученик   (2002-08-05 17:14:00) [3]

В ComCtrls.pas

procedure TCustomListView.CNNotify(var Message: TWMNotify);
...
LVN_ITEMCHANGING:
with PNMListView(NMHdr)^ do
if not CanChange(Items[iItem], uChanged) then Result := 1;
...

function TCustomListView.CanChange(Item: TListItem; Change: Integer): Boolean;
var
ItemChange: TItemChange;
begin
Result := True;
case Change of
LVIF_TEXT: ItemChange := ctText;
LVIF_IMAGE: ItemChange := ctImage;
LVIF_STATE: ItemChange := ctState;
else
Exit;
end;
if Assigned(FOnChanging) then
FOnChanging(Self, Item, ItemChange, Result);
end;



LVN_ITEMCHANGING


Notifies a list view control"s parent window that an item is changing. This notification message is sent in the form of a WM_NOTIFY message.

LVN_ITEMCHANGING
pnmv = (LPNMLISTVIEW) lParam;

Parameters
pnmv
Address of an NMLISTVIEW structure that identifies the item and specifies which of its attributes are changing.
Return Values
Returns TRUE to prevent the change, or FALSE to allow the change.

Remarks
If the list view control has the LVS_OWNERDATA style, LVN_ITEMCHANGING notifications are not sent.

Requirements
Windows NT/2000: Requires Windows NT 3.51 or later
Windows 95/98: Requires Windows 95 or later
Windows CE: Requires version 1.0 or later.
Header: Declared in commctrl.h.


XShura   (2002-08-05 17:09:00) [4]

А можно поподробнее?


Ученик   (2002-08-05 17:06:00) [5]

Свойств у TListItem несколько


Наверх

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