Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Паскаль, Turbo Pascal, PascalABC.NET
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 04.05.2014, 01:22   #1
Nikitoska
 
Регистрация: 04.05.2014
Сообщений: 4
Печаль Использование библиотек DLL. Borland Pascal

Помогите пожалуйста
- Ввести два целых числа a и b.
- Произвести вычисления в подпрограммах. Оформить подпрограммы в библиотеке DLL.
1) функция - результат Х (целое число) передать в вызывающую программу в качестве возвращаемого значения. Использовать статический вызов.
2) процедура - результат Х (целое число) передать в вызывающую программу в виде параметра-переменной. Использовать динамический вызов.
- Ввод данных и вывод результатов на экран должны производиться в головной программе, все вычисления – в подпрограммах.

1. Функции

Функции.jpg

2. Процедуры
Процедуры.jpg
Nikitoska вне форума Ответить с цитированием
Старый 04.05.2014, 10:13   #2
Stilet
Белик Виталий :)
Старожил
 
Аватар для Stilet
 
Регистрация: 23.07.2007
Сообщений: 57,792
По умолчанию

Только в качестве подсказки:
Код:
library Project1;

{$mode objfpc}{$H+}

uses
  Classes
  { you can add units after this };

function x1(a,b:double):double;
begin
  if a>b then result:=b*a+1 else
    if a<b then result:=(a-5)/b else
      result:=-10;
end;

procedure x2(a,b:double,var result:double);
begin
  if a>b then result:=b*a+1 else
    if a<b then result:=(a-5)/b else
      result:=-10;
end;

exports x1,x2;
begin
end.
Идея понятна? Как импортировать функции знаешь?
I'm learning to live...
Stilet вне форума Ответить с цитированием
Старый 04.05.2014, 12:23   #3
Nikitoska
 
Регистрация: 04.05.2014
Сообщений: 4
По умолчанию

Погоди, но там же нужно работать в подпрограмме. Ну, в два окна. Основное, для программы, и отдельное, в котором создавать процедуру, а потом ее компилировать
Nikitoska вне форума Ответить с цитированием
Старый 04.05.2014, 15:28   #4
Stilet
Белик Виталий :)
Старожил
 
Аватар для Stilet
 
Регистрация: 23.07.2007
Сообщений: 57,792
По умолчанию

Цитата:
там же нужно работать в подпрограмме.
Смотри внимательно:
Цитата:
Оформить подпрограммы в библиотеке DLL.
А теперь обрати внимание на мой пример: Там оформлено две подпрограммы. Хотя вот вторую я не стал утруждать и просто скопипастил с первой.
I'm learning to live...
Stilet вне форума Ответить с цитированием
Старый 04.05.2014, 15:49   #5
Nikitoska
 
Регистрация: 04.05.2014
Сообщений: 4
По умолчанию

Аааа, тоесть, фактически, эта работа в 3 окна? 1 окно - головной программы, во втором создается функция, а в третьем - процедура?
Nikitoska вне форума Ответить с цитированием
Старый 04.05.2014, 18:40   #6
Stilet
Белик Виталий :)
Старожил
 
Аватар для Stilet
 
Регистрация: 23.07.2007
Сообщений: 57,792
По умолчанию

Это работа без окон. )
Цитата:
- Произвести вычисления в подпрограммах. Оформить подпрограммы в библиотеке DLL.
Это пример как сделать ДЛЛ, не более.
I'm learning to live...
Stilet вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
проект тянет за собой Borland DLL qtintf70.dll beegl Общие вопросы Delphi 5 23.12.2012 10:16
Использование библиотек (dll) в RAD Studio, написанных в Delphi 7 Jetro Общие вопросы Delphi 7 29.06.2011 15:30
Использование библиотек 13th Общие вопросы по Java, Java SE, Kotlin 2 09.03.2011 05:13
Использование библиотек в Delphi Konstantin_V Софт 31 22.02.2010 21:59
Создание\использование своих DLL библиотек Vol666 Общие вопросы Delphi 5 26.08.2009 11:55