Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Начинающим";
Текущий архив: 2010.08.27;
Скачать: [xml.tar.bz2];

Вниз

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

 
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 вся ветка

Форум: "Начинающим";
Текущий архив: 2010.08.27;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.46 MB
Время: 0.067 c
15-1264741981
Урсулапов_
2010-01-29 08:13
2010.08.27
Можно ли так забивать?


4-1235818874
Denied
2009-02-28 14:01
2010.08.27
Хуки и PostMessage в Vista


2-1273821484
Виктор
2010-05-14 11:18
2010.08.27
Открытие документа Word по записи из таблицы


15-1273868996
Юрий
2010-05-15 00:29
2010.08.27
С днем рождения ! 15 мая 2010 суббота


15-1269725156
pleasure
2010-03-28 00:25
2010.08.27
Role-Based Security Rules UI





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский