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

Вниз

Что делать с локальными типизироваными константами в Делфи 7   Найти похожие ветки 

 
nester   (2004-08-19 00:19) [0]

Есть компонента TKOLWebBrowser
В нем есть процедурка

procedure TWebBrowser_V1.InitControlData;
const
 CEventDispIDs: array [0..16] of DWORD = (
   $00000064, $00000065, $00000066, $0000006C, $00000068, $00000069,
   $0000006A, $0000006B, $00000071, $000000C8, $000000C9, $000000CC,
   $00000067, $0000006D, $0000006E, $0000006F, $00000070);
 CControlData: TControlData2 = (
   ClassID: "{EAB22AC3-30C1-11CF-A7EB-0000C05BAE0B}";
   EventIID: "{EAB22AC2-30C1-11CF-A7EB-0000C05BAE0B}";
   EventCount: 17;
   EventDispIDs: @CEventDispIDs;
   LicenseKey: nil (*HR:$80040154*);
   Flags: $00000000;
   Version: 401);
begin
 ControlData := @CControlData;
 TControlData2(CControlData).FirstEventOfs := Cardinal(@@FOnBeforeNavigate) - Cardinal(@Self);
end;

По идеологии Делфи 7 типизированые константы отменили а ввели предопределенные переменные. т.е. так объявленая константа не может быть изменена, нужно в том что я привел менять const на var. НО это нельзя сделать в процедуре!!!! кто как решил данную багофичу? кто смог поставит KOLWebBrowser под 7мой делфи?
Я както поставил(что-то пофиксил), все работало, переставил винду и не помню как я тогда тряс бубном чтобы получилось:(((


 
nester   (2004-08-19 00:46) [1]

Хм уточняю КОЛа 1,92


 
SPeller ©   (2004-08-19 06:37) [2]

А причем здесь KOL ???


 
TUser ©   (2004-08-19 06:45) [3]


> По идеологии Делфи 7 типизированые константы отменили а
> ввели предопределенные переменные.

Первый раз слышу. Посоянно использую типизированные константы, в т.ч. массивы, в т.ч. в поцедурах. Тут D7 ничем от ТР6/7, вроде бы, не отличается.


 
PVOzerski ©   (2004-08-19 11:12) [4]

А {$J+} в D7 не работает?


 
TUser ©   (2004-08-19 11:19) [5]

Работает. По умолчанию - минус (если не ошибаюсь).



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

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

Наверх




Память: 0.48 MB
Время: 0.024 c
14-1092340519
sk707
2004-08-12 23:55
2004.09.05
Что подарить человеку на день рождения у которого все есть...


4-1090566377
Form_1
2004-07-23 11:06
2004.09.05
Неправильное преобразование?


3-1092308100
Jaxtor
2004-08-12 14:55
2004.09.05
Видимость окон для пользователей


14-1092725070
VMcL
2004-08-17 10:44
2004.09.05
Конф. Media


14-1092505999
Guest
2004-08-14 21:53
2004.09.05
Вот такое дело....