home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
C!T ROM 5
/
ctrom5b.zip
/
ctrom5b
/
PROGRAM
/
DIVERSEN
/
EDITH13
/
SAMPLE.PAS
< prev
next >
Wrap
Pascal/Delphi Source File
|
1995-03-11
|
265b
|
16 lines
library sample;
uses WObjects, WinTypes, WinProcs, misc;
procedure func1(i: integer); export;
begin
MyMessageBox(0,'The number is '+numstr(i,1),
'Sample.DLL', mb_OK + mb_IconExclamation);
end;
exports
func1 name 'FUNC1';
begin
end.