Недавно добавленные исходники

•  DeLiKaTeS Tetris (Тетрис)  4 448

•  TDictionary Custom Sort  6 480

•  Fast Watermark Sources  6 277

•  3D Designer  9 221

•  Sik Screen Capture  6 610

•  Patch Maker  6 993

•  Айболит (remote control)  6 996

•  ListBox Drag & Drop  5 865

•  Доска для игры Реверси  97 047

•  Графические эффекты  7 195

•  Рисование по маске  6 498

•  Перетаскивание изображений  5 363

•  Canvas Drawing  5 740

•  Рисование Луны  5 451

•  Поворот изображения  4 979

•  Рисование стержней  3 535

•  Paint on Shape  2 803

•  Генератор кроссвордов  3 668

•  Головоломка Paletto  2 959

•  Теорема Монжа об окружностях  3 762

•  Пазл Numbrix  2 481

•  Заборы и коммивояжеры  3 166

•  Игра HIP  2 132

•  Игра Go (Го)  2 066

•  Симулятор лифта  2 438

•  Программа укладки плитки  2 111

•  Генератор лабиринта  2 583

•  Проверка числового ввода  2 263

•  HEX View  2 590

•  Физический маятник  2 202

 
скрыть

Вызов 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.