teresva
Junior Member | Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
library CreoExStamp;
uses
System.SysUtils,
System.Classes,
Vcl.Forms,
Winapi.Windows,
Vcl.Dialogs,
CreoExStamp_U in 'CreoExStamp_U.pas' {CreoExStamp_Form};
{$R *.res}
//******************************************************************************
procedure CreateCreoExStamp_Form();cdecl;export;
begin
if (Application.Handle = 0) then
begin
Application.Initialize;
Application.CreateForm(TCreoExStamp_Form, CreoExStamp_Form);
Application.Run;
end
else
CreoExStamp_Form.Show;
end;
//******************************************************************************
procedure DestroyCreoExStamp_Form();cdecl;export;
begin
CreoExStamp_Form.Free;
CreoExStamp_Form:=nil;
end;
//******************************************************************************
exports
CreateCreoExStamp_Form,
DestroyCreoExStamp_Form;
begin
end. |
Всего записей: 79 | Зарегистр. 04-12-2008 | Отправлено: 20:29 11-06-2012 | Исправлено: teresva, 20:53 11-06-2012 |
|
