Форум: "Основная";
Текущий архив: 2004.09.05;
Скачать: [xml.tar.bz2];
ВнизЧто делать с локальными типизироваными константами в Делфи 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;
Скачать: [xml.tar.bz2];
Память: 0.45 MB
Время: 0.034 c