lazarus/components/anchordocking/minide/miniide1.lpr
2012-12-22 21:13:56 +00:00

23 lines
413 B
ObjectPascal

program miniide1;
{$mode objfpc}{$H+}
uses
{$IFDEF UNIX}{$IFDEF UseCThreads}
cthreads,
{$ENDIF}{$ENDIF}
Interfaces, // this includes the LCL widgetset
Forms, Unit1, Controls, FileUtil
{ you can add units after this };
{$R *.res}
begin
Application.Initialize;
Application.CreateForm(TMainIDE, MainIDE);
if (Paramcount>0) then
MainIDE.LoadLayout(ParamStrUTF8(1));
Application.Run;
end.