Перейти из форума на сайт.

НовостиФайловые архивы
ПоискАктивные темыТоп лист
ПравилаКто в on-line?
Вход Забыли пароль? Первый раз на этом сайте? Регистрация
Компьютерный форум Ru.Board » Компьютеры » Прикладное программирование » Вопросы по Embarcadero RAD Studio XE2 (Pulsar)

Модерирует : ShIvADeSt

 Версия для печати • ПодписатьсяДобавить в закладки
На первую страницук этому сообщениюк последнему сообщению

Открыть новую тему     Написать ответ в эту тему

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
Открыть новую тему     Написать ответ в эту тему

На первую страницук этому сообщениюк последнему сообщению

Компьютерный форум Ru.Board » Компьютеры » Прикладное программирование » Вопросы по Embarcadero RAD Studio XE2 (Pulsar)


Реклама на форуме Ru.Board.

Powered by Ikonboard "v2.1.7b" © 2000 Ikonboard.com
Modified by Ru.Board
© Ru.Board 2000-2020

BitCoin: 1NGG1chHtUvrtEqjeerQCKDMUi6S6CG4iC

Рейтинг.ru

Рейтинг.ru