Модератор: Модераторы
S_Gur писал(а): А что это за пакет поддержки? Это ваша разработка, я так понимаю?
program AR_BrowserMode;
{$mode objfpc}{$H+}
uses
{$IFDEF UNIX}{$IFDEF UseCThreads}
cthreads,
{$ENDIF}{$ENDIF}
Interfaces, // this includes the LCL widgetset
Forms, u1_AR_BrowserMode,
{ you can add units after this }
uCEFApplication;
{$R *.res}
{$IFDEF MSWINDOWS}
// CEF3 needs to set the LARGEADDRESSAWARE flag which allows 32-bit processes to use up to 3GB of RAM.
{$SetPEFlags $20}
{$ENDIF}
begin
GlobalCEFApp := TCefApplication.Create;
if GlobalCEFApp.StartMainProcess then
begin
RequireDerivedFormResource:=True;
Application.Initialize;
Application.CreateForm(TAR_MainForm, AR_MainForm);
Application.Run;
end;
GlobalCEFApp.Free;
GlobalCEFApp := nil;
end.
S_Gur писал(а):Alex2013, спасибо, попробую
Добавлено спустя 2 часа 51 минуту 39 секунд:
Alex2013, я правильно понимаю, что для вышеописанной задачи мне гораздо проще использовать Инди?
Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 9