Скачать: CL | DM;

написание библеотеки   Найти похожие ветки 

← →
Andrey925   (2010-04-22 23:01) [0]

Доброго времени суток. Появилась такая проблема. Написал небольшую програмку. Из нее надо сделать библеотеку.Некак немогу разобраться как это сделать. Знаю как создать проект для dll но некак немогу понять как обьявить все переменые и как реализовать метод программы в библиотеке. Подскажите пожалуйста как это сделать?

unit Unit1;

interface

uses
 Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
 Dialogs, StdCtrls;

type
 TForm1 = class(TForm)
   Memo1: TMemo;
 private
   { Private declarations }
   procedure WMDeviceChange(var Message: TMessage); message WM_DEVICECHANGE;

 public
   { Public declarations }
 end;

var
Form1: TForm1;

unique_number_in:boolean=false;
unique_number_out:boolean=false;
count_of_7_message:byte=0;

implementation

{$R *.dfm}

procedure TForm1.WMDeviceChange(var Message: TMessage);
begin
if (Message.wParam=7) then inc(count_of_7_message);
if (Message.wParam=32772) then unique_number_out:=true;
if (Message.wParam=32768) then unique_number_in:=true;
if (unique_number_out) and (count_of_7_message=3) then
begin
 unique_number_out:=false;
 count_of_7_message:=0;
 ShowMessage("Флешка была отключена");
end;

if (unique_number_in) and (count_of_7_message=6) then
begin
 unique_number_in:=false;
 count_of_7_message:=0;
 ShowMessage("Флешка была включена");
end;

Memo1.Lines.Add("Пришло сообщение с кодом "+IntToStr(Message.wParam));
Inherited;
end;
end.


---

← →
Jeer ©   (2010-04-22 23:11) [1]

Из программы библиотеку сделать невозможно.
Начинай думать.

---

← →
Andrey925   (2010-04-22 23:20) [2]

я понимаю что из программы нельзя сделать библиотеку. Но может можно метод программы реалтзовать в библиотеке или так нельзя сделать?

---

← →
Сергей М. ©   (2010-04-23 00:33) [3]

> можно метод программы


Нельзя.
У программы нет методов.
Начинай думать.

---

← →
Anatoly Podgoretsky ©   (2010-04-23 07:33) [4]

> Сергей М.  (23.04.2010 00:33:03)  [3]

Еще один желатель странного.

---

← →
Вася   (2010-04-24 05:28) [5]

м...поиск по фразе "форма в dll"?а потом + ещё winapi подучить?)

---

← →
_Юрий ©   (2010-04-24 09:44) [6]

Библиотека предполагает наличие некоего программного интерфейса.
Для того, чтобы библиотеку написать, надо для начала этот интерфейс определить - какие функции с какими сигнатурами будут экспортироваться.
Это первое, что надо сделать

---

← →
DVM ©   (2010-04-24 11:26) [7]

начнем с того, что это не программа, а модуль.

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.043 c