Skip to content

Commit

Permalink
Lazarus (FPC) compatibility
Browse files Browse the repository at this point in the history
  • Loading branch information
juliosenha committed Oct 22, 2020
1 parent 09ccde4 commit 87eca27
Show file tree
Hide file tree
Showing 14 changed files with 835 additions and 10 deletions.
4 changes: 4 additions & 0 deletions .gitignore
Original file line number Diff line number Diff line change
Expand Up @@ -67,3 +67,7 @@ __recovery/

# Boss dependency manager vendor folder https://github.com/HashLoad/boss
modules/

# Backup folder Lazarus IDE
backup/
lib/
4 changes: 2 additions & 2 deletions samples/Samples.dpr → samples/delphi/Samples.dpr
Original file line number Diff line number Diff line change
Expand Up @@ -3,8 +3,8 @@ program Samples;
uses
Vcl.Forms,
View.Samples in 'src\view\View.Samples.pas' {FrmSamples},
Mail4Delphi in '..\src\Mail4Delphi.pas',
Mail4Delphi.Intf in '..\src\Mail4Delphi.Intf.pas';
Mail4Delphi.Intf in '..\..\src\Mail4Delphi.Intf.pas',
Mail4Delphi in '..\..\src\Mail4Delphi.pas';

{$R *.res}

Expand Down
4 changes: 2 additions & 2 deletions samples/Samples.dproj → samples/delphi/Samples.dproj
Original file line number Diff line number Diff line change
Expand Up @@ -104,8 +104,8 @@
<Form>FrmSamples</Form>
<FormType>dfm</FormType>
</DCCReference>
<DCCReference Include="..\src\Mail4Delphi.pas"/>
<DCCReference Include="..\src\Mail4Delphi.Intf.pas"/>
<DCCReference Include="..\..\src\Mail4Delphi.Intf.pas"/>
<DCCReference Include="..\..\src\Mail4Delphi.pas"/>
<BuildConfiguration Include="Release">
<Key>Cfg_2</Key>
<CfgParent>Base</CfgParent>
Expand Down
File renamed without changes.
Original file line number Diff line number Diff line change
Expand Up @@ -124,7 +124,7 @@ object FrmSamples: TFrmSamples
end
object Label4: TLabel
Left = 9
Top = 37
Top = 36
Width = 29
Height = 13
Caption = 'Name'
Expand Down Expand Up @@ -153,6 +153,7 @@ object FrmSamples: TFrmSamples
Top = 194
Width = 269
Height = 21
CharCase = ecLowerCase
TabOrder = 6
end
object edtPassword: TEdit
Expand Down Expand Up @@ -201,9 +202,9 @@ object FrmSamples: TFrmSamples
'Yes')
end
object edtNameFrom: TEdit
Left = 10
Top = 56
Width = 459
Left = 9
Top = 55
Width = 496
Height = 21
Anchors = [akLeft, akTop, akRight]
TabOrder = 0
Expand Down Expand Up @@ -246,6 +247,7 @@ object FrmSamples: TFrmSamples
BevelOuter = bvNone
ParentBackground = False
TabOrder = 1
ExplicitTop = -2
DesignSize = (
510
445)
Expand Down
File renamed without changes.
Binary file added samples/lazarus/Samples.ico
Binary file not shown.
91 changes: 91 additions & 0 deletions samples/lazarus/Samples.lpi
Original file line number Diff line number Diff line change
@@ -0,0 +1,91 @@
<?xml version="1.0" encoding="UTF-8"?>
<CONFIG>
<ProjectOptions>
<Version Value="11"/>
<PathDelim Value="\"/>
<General>
<SessionStorage Value="InProjectDir"/>
<MainUnit Value="0"/>
<Title Value="Samples"/>
<Scaled Value="True"/>
<ResourceType Value="res"/>
<UseXPManifest Value="True"/>
<XPManifest>
<DpiAware Value="True"/>
</XPManifest>
<Icon Value="0"/>
</General>
<BuildModes Count="1">
<Item1 Name="Default" Default="True"/>
</BuildModes>
<PublishOptions>
<Version Value="2"/>
<UseFileFilters Value="True"/>
</PublishOptions>
<RunParams>
<FormatVersion Value="2"/>
<Modes Count="0"/>
</RunParams>
<RequiredPackages Count="2">
<Item1>
<PackageName Value="indylaz"/>
</Item1>
<Item2>
<PackageName Value="LCL"/>
</Item2>
</RequiredPackages>
<Units Count="4">
<Unit0>
<Filename Value="Samples.lpr"/>
<IsPartOfProject Value="True"/>
</Unit0>
<Unit1>
<Filename Value="src\view\view.samples.pas"/>
<IsPartOfProject Value="True"/>
<ComponentName Value="FrmSamples"/>
<ResourceBaseClass Value="Form"/>
<UnitName Value="View.Samples"/>
</Unit1>
<Unit2>
<Filename Value="..\..\src\Mail4Delphi.Intf.pas"/>
<IsPartOfProject Value="True"/>
</Unit2>
<Unit3>
<Filename Value="..\..\src\Mail4Delphi.pas"/>
<IsPartOfProject Value="True"/>
</Unit3>
</Units>
</ProjectOptions>
<CompilerOptions>
<Version Value="11"/>
<PathDelim Value="\"/>
<Target>
<Filename Value="Samples"/>
</Target>
<SearchPaths>
<IncludeFiles Value="$(ProjOutDir)"/>
<OtherUnitFiles Value="src\view;..\..\src"/>
<UnitOutputDirectory Value="lib\$(TargetCPU)-$(TargetOS)"/>
</SearchPaths>
<Linking>
<Options>
<Win32>
<GraphicApplication Value="True"/>
</Win32>
</Options>
</Linking>
</CompilerOptions>
<Debugging>
<Exceptions Count="3">
<Item1>
<Name Value="EAbort"/>
</Item1>
<Item2>
<Name Value="ECodetoolError"/>
</Item2>
<Item3>
<Name Value="EFOpenError"/>
</Item3>
</Exceptions>
</Debugging>
</CONFIG>
24 changes: 24 additions & 0 deletions samples/lazarus/Samples.lpr
Original file line number Diff line number Diff line change
@@ -0,0 +1,24 @@
program Samples;

{$mode objfpc}{$H+}

uses
{$IFDEF UNIX}{$IFDEF UseCThreads}
cthreads,
{$ENDIF}{$ENDIF}
Interfaces,
Forms, indylaz,
View.Samples in 'src\view\View.Samples.pas' {FrmSamples},
Mail4Delphi.Intf in '..\..\src\Mail4Delphi.Intf.pas',
Mail4Delphi in '..\..\src\Mail4Delphi.pas';

{$R *.res}

begin
RequireDerivedFormResource:=True;
Application.Scaled:=True;
Application.Initialize;
Application.CreateForm(TFrmSamples, FrmSamples);
Application.Run;
end.

97 changes: 97 additions & 0 deletions samples/lazarus/Samples.lps
Original file line number Diff line number Diff line change
@@ -0,0 +1,97 @@
<?xml version="1.0" encoding="UTF-8"?>
<CONFIG>
<ProjectSession>
<PathDelim Value="\"/>
<Version Value="11"/>
<BuildModes Active="Default"/>
<Units Count="4">
<Unit0>
<Filename Value="Samples.lpr"/>
<IsPartOfProject Value="True"/>
<EditorIndex Value="1"/>
<CursorPos X="18" Y="10"/>
<UsageCount Value="20"/>
<Loaded Value="True"/>
</Unit0>
<Unit1>
<Filename Value="src\view\view.samples.pas"/>
<IsPartOfProject Value="True"/>
<ComponentName Value="FrmSamples"/>
<HasResources Value="True"/>
<ResourceBaseClass Value="Form"/>
<UnitName Value="View.Samples"/>
<IsVisibleTab Value="True"/>
<CursorPos X="156" Y="4"/>
<UsageCount Value="20"/>
<Loaded Value="True"/>
<LoadedDesigner Value="True"/>
</Unit1>
<Unit2>
<Filename Value="..\..\src\Mail4Delphi.Intf.pas"/>
<IsPartOfProject Value="True"/>
<EditorIndex Value="3"/>
<UsageCount Value="20"/>
<Loaded Value="True"/>
</Unit2>
<Unit3>
<Filename Value="..\..\src\Mail4Delphi.pas"/>
<IsPartOfProject Value="True"/>
<EditorIndex Value="2"/>
<TopLine Value="228"/>
<CursorPos X="52" Y="9"/>
<UsageCount Value="20"/>
<Loaded Value="True"/>
</Unit3>
</Units>
<JumpHistory Count="11" HistoryIndex="10">
<Position1>
<Filename Value="Samples.lpr"/>
<Caret Line="16" Column="64"/>
</Position1>
<Position2>
<Filename Value="src\view\view.samples.pas"/>
<Caret Line="80" Column="3" TopLine="49"/>
</Position2>
<Position3>
<Filename Value="src\view\view.samples.pas"/>
<Caret Line="122" Column="48" TopLine="88"/>
</Position3>
<Position4>
<Filename Value="src\view\view.samples.pas"/>
<Caret Line="8" Column="82"/>
</Position4>
<Position5>
<Filename Value="src\view\view.samples.pas"/>
<Caret Line="105" Column="5" TopLine="49"/>
</Position5>
<Position6>
<Filename Value="Samples.lpr"/>
<Caret Line="10" Column="9"/>
</Position6>
<Position7>
<Filename Value="src\view\view.samples.pas"/>
<Caret Line="3" Column="81"/>
</Position7>
<Position8>
<Filename Value="src\view\view.samples.pas"/>
<Caret Line="8" Column="98"/>
</Position8>
<Position9>
<Filename Value="Samples.lpr"/>
<Caret Line="10" Column="18"/>
</Position9>
<Position10>
<Filename Value="..\..\src\Mail4Delphi.pas"/>
<Caret Line="7" Column="53"/>
</Position10>
<Position11>
<Filename Value="..\..\src\Mail4Delphi.pas"/>
<Caret Line="15" Column="104"/>
</Position11>
</JumpHistory>
<RunParams>
<FormatVersion Value="2"/>
<Modes Count="0" ActiveMode=""/>
</RunParams>
</ProjectSession>
</CONFIG>
Binary file added samples/lazarus/Samples.res
Binary file not shown.
Loading

0 comments on commit 87eca27

Please sign in to comment.