VPF::MakeProcInstance - Форум программистов

Burka

Дата 30.11.2010, 14:19 (ссылка)

(нет голосов)

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 429
Регистрация: 11.5.2007

Репутация: нет
Всего: 2

Подскажите как использовать функцию MakeProcInstance?
Я не понимаю что подставлять в качестве второго параметра gInstance.

Код


Function CheckStation(lParam:longint; lIndex: longint):boolean;
begin
...
end;

Procedure Click()..
var callBackProc: TFarProc;

callBackProc:=MakeProcInstance(@CheckStation),gInstance);

--------------------

Великие умы обсуждают идеи; средние умы обсуждают события; мелкие умы обсуждают людей.

Snowy

Дата 30.11.2010, 14:38 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Модератор
Сообщений: 11363
Регистрация: 13.10.2004
Где: Питер

Репутация: 192
Всего: 484

Цитата(Burka @ 30.11.2010, 14:19

)

Подскажите как использовать функцию MakeProcInstance?

Никак.
Она не нужна.

Цитата

Obsolete Windows Programming Elements
MakeProcInstance - Not necessary and has no effect. Windows can call entry points directly.

Цитата(Burka @ 30.11.2010, 14:19

)

Я не понимаю что подставлять в качестве второго параметра gInstance.

hInstance
Только смысл... Данная функция всё равно ничего не делает.
В качестве колбэка прямо и назначай свою функцию.

Добавлено через 3 минуты и 40 секунд
Кстати, вот и реализация:

Код

function MakeProcInstance(Proc: FARPROC; Instance: THandle): FARPROC;
begin
  Result := Proc;
end;

Как видно, второй параметр вообще не испльзуется.
Единственное, что делает функция - возвращает обратно первый параметр.

Burka

Дата 30.11.2010, 14:56 (ссылка)

(нет голосов)

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 429
Регистрация: 11.5.2007

Репутация: нет
Всего: 2

В руководстве к длл функциям написано использовать MakeProcInstance для передачи адреса функции. А откуда брать hInstance? Просто передача адреса не помогает, ошибка выскакивает, я пока не разобрался почему.

--------------------

Великие умы обсуждают идеи; средние умы обсуждают события; мелкие умы обсуждают людей.

Snowy

Дата 30.11.2010, 15:22 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Модератор
Сообщений: 11363
Регистрация: 13.10.2004
Где: Питер

Репутация: 192
Всего: 484

hInstance не откуда брать не нужно.
Это глобальная переменная - хэндл процесса. Прямо так и пиши второй параметр - hInstance.
Но ничего тебе это не даст - я ж показал тебе код MakeProcInstance.
Всё, что оно делает - возвращает тебе первый параметр.
На второй ей вообще плевать. Хоть что туда передавай.
Возможно в Delphi 1 было по другому.
Но для Windows 95 и выше, эта функция не делает вообще ничего.

Добавлено через 5 минут и 52 секунды
Погуглил. Так и есть. Эта функция использовалась в Windows 3.11
Была в Delphi 1.
В настоящее время существует лишь такая заглушка для обеспечения совместимости со старым кодом.
Вобщем она уже 15 лет, как ничего не делает.

Burka

Дата 30.11.2010, 15:44 (ссылка)

(нет голосов)

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 429
Регистрация: 11.5.2007

Репутация: нет
Всего: 2

Понятно спасибо. Да действительно функция не помогла smile

--------------------

Великие умы обсуждают идеи; средние умы обсуждают события; мелкие умы обсуждают людей.

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Delphi: Общие вопросы \| Следующая тема »