Главная страница | назад





Article #17095: making a Delphi DLL with as little in the uses clause as possible

 Question and Answer Database
FAQ2095D.txt making a Delphi DLL with as little in the uses clause as possible
Category :VCL
Platform :All
Product :All 32 bit
Question:
I want to create a small dynamic link library that contains
only a few small functions. I do not need any additional
units, but Delphi insists that the uses clause is incorrect
if I remove the standard uses clause. The code does compile
to a very small dll if I do remove the uses clause. May I
disregard the error when I load the project?
Answer:
While it is ok to disregard the error, it would be better to
create a unit that would contain the code for your functions.
This way the main project file can have a uses statement
that will satisfy the IDE.
Example:
(* Main project file *)
library Project1;
uses
Unit1;
exports
AddLong index 1 name 'ADDLONG' resident;
begin
end.
(* unit1's code *)
unit Unit1;
interface
function AddLong(a : longint;
b : longint) : longint
{$IFDEF Win32} stdcall; {$ELSE} ; export; {$ENDIF}
implementation
function AddLong(a : longint;
b : longint) : longint;
begin
AddLong := a + b;
end;
end.
7/16/98 4:31:28 PM

Last Modified: 01-SEP-99