Hi,
This worked before in a late revision 0.9.25, but since I updated to 0.9.27 two days ago I noticed the following. I select "File | New... | fpGUI Project" and Lazarus now creates the following program unit shown below. "fpGUI Application" doesn't rely on anything LCL. Yet the uses clause now contains LResources unit. There's a new reference to project.rc and there is a include project.lrs in the main begin..end block.
I just checked, the same thing happen when you create a "free pascal" application. Again, nothing related to LCL based applications. "File | New.." and select "Program" in the "Project" node.
-----------------------[ project.lpr ]------------------------------------
program Project1;
{$mode objfpc}{$H+}
uses
{$IFDEF UNIX}{$IFDEF UseCThreads}
cthreads,
{$ENDIF}{$ENDIF}
Classes, fpg_main, fpg_form, LResources;
type
TMainForm = class(TfpgForm)
public
MainForm}
MainForm}
procedure AfterCreate; override;
end;
procedure TMainForm.AfterCreate;
begin
MainForm}
Name := 'MainForm';
SetPosition(316, 186, 300, 250);
WindowTitle := 'MainForm';
MainForm}
end;
procedure MainProc;
var
frm: TMainForm;
begin
fpgApplication.Initialize;
frm := TMainForm.Create(nil);
try
frm.Show;
fpgApplication.Run;
finally
frm.Free;
end;
end;
{$IFDEF WINDOWS}{$R project1.rc}{$ENDIF}
begin
{$I project1.lrs}
MainProc;
end.-----------------------[ end ]-----------------------------
Regards,
- Graeme -
_______________________________________________
fpGUI - a cross-platform Free Pascal GUI toolkit
http://opensoft.homeip.net/fpgui/