Приветствую Вас Гость | RSS

Меню сайта

Реклама

Категории раздела
CD-ROM [11]
DLL и PlugIns [75]
Help файлы [20]
INI файлы [16]
RS232 [2]
Активные директории [1]
Директории [0]
Диски [0]
Корзина [5]
Порты [26]
Ресурсы [0]
Файлы [0]
Форматы файлов [15]
Ярлыки [0]

Наш опрос
Какие компоненты добавлять больше?
Всего ответов: 49

Статистика

Онлайн всего: 1
Гостей: 1
Пользователей: 0

Форма входа

Главная » Статьи » Файловая система » DLL и PlugIns

Вызов Delphi DLL из MS Visual C++ 2

Во-первых, создайте в Delphi простую DLL:


{ Начало кода DLL }

library MinMax;

function Min(X, Y: Integer): Integer; export;
begin
 if X < Y then
 Min := X
 else
 Min := Y;
end;

function Max(X, Y: Integer): Integer; export;
begin
 if X > Y then
 Max := X
 else
 Max := Y;
end;

exports

 Min index 1,
 Max index 2;

begin
end.

{ Конец кода DLL }

Затем, для вызова этих функций из вашего C кода, сделайте следующее:

В вашем .DEF-файле добавьте следующие строки:


IMPORTS
 Min =MINMAX.Min
 Max =MINMAX.Max

Объявите в вашем C-приложени прототип функций, как показано ниже:

 int FAR PASCAL Min(int x, y);
 int FAR PASCAL Min(int x, y);

Теперь из любого места вашего приложения вы можете вызвать функции Min и Max.

Категория: DLL и PlugIns | Добавил: Angel (06.07.2008)
Просмотров: 383 | Рейтинг: 0.0/0
  Delphi Lab   Главная   Регистрация   Вход  
Интересная Цитата

Поиск

Магазин


Copyright MyCorp © 2025 Хостинг от uCoz