Главная страница
    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.061 c
15-1269080805
tippa
2010-03-20 13:26
2010.08.27
английский и программирование


15-1268308626
12
2010-03-11 14:57
2010.08.27
EEP WR1A форматы файлаов. Кто нибудь, что-нибудь делал?


2-1266744427
Тима
2010-02-21 12:27
2010.08.27
передача массива в функцию


15-1269859658
AlexDan
2010-03-29 14:47
2010.08.27
Volvo теперь китайский автомобиль..!


4-1217672834
DeadMeat
2008-08-02 14:27
2010.08.27
Отключение скринсейвера





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский