Вниз
Скачать: CL | DM;

Прокоментируйте метод   Найти похожие ветки 

← →
Priest ©   (2005-10-27 11:55) [0]

Вот нашёл метод в Menus.pas

procedure TMenu.SetImages(Value: TCustomImageList);
begin
 if FImages <> nil then FImages.UnRegisterChanges(FImageChangeLink);
 FImages := Value;
 if FImages <> nil then
 begin
   FImages.RegisterChanges(FImageChangeLink);
   FImages.FreeNotification(Self);
 end;
 UpdateItems;
end;

Мне кажется там не хватает вызова
FImages.RemoveFreeNotification(Self);

Я прав или этот вызов можно опускать?


← →
jack128 ©   (2005-10-27 11:59) [1]

Priest ©   (27.10.05 11:55)
Я прав или этот вызов можно опускать?

ты прав, но этот метод можно опускать ;)


← →
Priest ©   (2005-10-27 12:16) [2]

А вот если я сначало присвою ImageList1, а потом ImageList2. То в случае удаления ImageList1 с формы я буду в меню получать оповещение....А оно то мне не нужно...



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

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.024 c
2-1131029615
DelphiLexx
2005-11-03 17:53
2005.11.20
class function


11-1112012463
BigMic
2005-03-28 16:21
2005.11.20
Установка в системе шрифта по-умолчанию


3-1128673276
Kacnep
2005-10-07 12:21
2005.11.20
Последовательное открытие в АДОTABLE нескольких таблиц.


10-1108124068
PVOzerski
2005-02-11 15:14
2005.11.20
R6025 - pure virtual function call


1-1129799131
Layner
2005-10-20 13:05
2005.11.20
Вводится ли шрифт балтийских языков в поле, где CHARSET=




   Наверх