Skip to content

Commit

Permalink
Added OSX support
Browse files Browse the repository at this point in the history
  • Loading branch information
Anthony Walter committed Jun 1, 2019
1 parent 9269a50 commit 63e1b13
Show file tree
Hide file tree
Showing 10 changed files with 184 additions and 76 deletions.
50 changes: 50 additions & 0 deletions Backer.app/Contents/Info.plist
Original file line number Diff line number Diff line change
@@ -0,0 +1,50 @@
<?xml version="1.0" encoding="UTF-8"?>
<!DOCTYPE plist PUBLIC "-//Apple Computer//DTD PLIST 1.0//EN" "http://www.apple.com/DTDs/PropertyList-1.0.dtd">
<plist version="1.0">
<dict>
<key>CFBundleIconFile</key>
<string>backer.icns</string>
<key>CFBundleTypeIconFile</key>
<string>backer.icns</string>
<key>CFBundleDevelopmentRegion</key>
<string>English</string>
<key>CFBundleExecutable</key>
<string>Backer</string>
<key>CFBundleName</key>
<string>Backer</string>
<key>CFBundleIdentifier</key>
<string>com.company.Backer</string>
<key>CFBundleInfoDictionaryVersion</key>
<string>6.0</string>
<key>CFBundlePackageType</key>
<string>APPL</string>
<key>CFBundleSignature</key>
<string>Back</string>
<key>CFBundleShortVersionString</key>
<string>0.1</string>
<key>CFBundleVersion</key>
<string>1</string>
<key>CSResourcesFileMapped</key>
<true/>
<key>CFBundleDocumentTypes</key>
<array>
<dict>
<key>CFBundleTypeRole</key>
<string>Viewer</string>
<key>CFBundleTypeExtensions</key>
<array>
<string>*</string>
</array>
<key>CFBundleTypeOSTypes</key>
<array>
<string>fold</string>
<string>disk</string>
<string>****</string>
</array>
</dict>
</array>

<key>NSHighResolutionCapable</key>
<true/>
</dict>
</plist>
1 change: 1 addition & 0 deletions Backer.app/Contents/MacOS/Backer
1 change: 1 addition & 0 deletions Backer.app/Contents/PkgInfo
Original file line number Diff line number Diff line change
@@ -0,0 +1 @@
APPL????
Binary file added Backer.app/Contents/Resources/backer.icns
Binary file not shown.
10 changes: 5 additions & 5 deletions Backer.lpi
Original file line number Diff line number Diff line change
@@ -1,12 +1,11 @@
<?xml version="1.0" encoding="UTF-8"?>
<CONFIG>
<ProjectOptions>
<Version Value="11"/>
<Version Value="9"/>
<General>
<SessionStorage Value="InProjectDir"/>
<MainUnit Value="0"/>
<Title Value="Backer"/>
<Scaled Value="True"/>
<ResourceType Value="res"/>
<UseXPManifest Value="True"/>
<XPManifest>
Expand All @@ -19,11 +18,11 @@
</BuildModes>
<PublishOptions>
<Version Value="2"/>
<UseFileFilters Value="True"/>
</PublishOptions>
<RunParams>
<FormatVersion Value="2"/>
<Modes Count="0"/>
<local>
<FormatVersion Value="1"/>
</local>
</RunParams>
<RequiredPackages Count="1">
<Item1>
Expand All @@ -39,6 +38,7 @@
<Filename Value="main.pas"/>
<IsPartOfProject Value="True"/>
<ComponentName Value="BackupForm"/>
<HasResources Value="True"/>
<ResourceBaseClass Value="Form"/>
<UnitName Value="Main"/>
</Unit1>
Expand Down
109 changes: 68 additions & 41 deletions Backer.lps
Original file line number Diff line number Diff line change
Expand Up @@ -3,165 +3,192 @@
<ProjectSession>
<Version Value="11"/>
<BuildModes Active="Default"/>
<Units Count="5">
<Units Count="9">
<Unit0>
<Filename Value="Backer.lpr"/>
<IsPartOfProject Value="True"/>
<IsVisibleTab Value="True"/>
<EditorIndex Value="1"/>
<CursorPos Y="16"/>
<UsageCount Value="20"/>
<CursorPos X="29" Y="15"/>
<UsageCount Value="22"/>
<Loaded Value="True"/>
</Unit0>
<Unit1>
<Filename Value="main.pas"/>
<IsPartOfProject Value="True"/>
<ComponentName Value="BackupForm"/>
<HasResources Value="True"/>
<ResourceBaseClass Value="Form"/>
<UnitName Value="Main"/>
<UsageCount Value="20"/>
<IsVisibleTab Value="True"/>
<TopLine Value="354"/>
<CursorPos X="35" Y="273"/>
<UsageCount Value="22"/>
<Loaded Value="True"/>
<LoadedDesigner Value="True"/>
</Unit1>
<Unit2>
<Filename Value="../../../../../Development/FreePascal/lazarus/components/lazutils/laztracer.pas"/>
<Filename Value="/Development/FreePascal/lazarus/components/lazutils/laztracer.pas"/>
<UnitName Value="LazTracer"/>
<EditorIndex Value="-1"/>
<TopLine Value="26"/>
<CursorPos Y="50"/>
<UsageCount Value="10"/>
</Unit2>
<Unit3>
<Filename Value="../../../../../Development/FreePascal/fpc/packages/fcl-process/src/process.pp"/>
<Filename Value="/Development/FreePascal/fpc/packages/fcl-process/src/process.pp"/>
<EditorIndex Value="-1"/>
<TopLine Value="16"/>
<CursorPos X="48" Y="24"/>
<UsageCount Value="10"/>
</Unit3>
<Unit4>
<Filename Value="../../../../../Development/FreePascal/fpc/rtl/objpas/sysutils/osutilsh.inc"/>
<Filename Value="/Development/FreePascal/fpc/rtl/objpas/sysutils/osutilsh.inc"/>
<EditorIndex Value="-1"/>
<CursorPos X="94" Y="32"/>
<UsageCount Value="10"/>
</Unit4>
<Unit5>
<Filename Value="../../FreePascal/fpc/rtl/objpas/sysutils/osutilsh.inc"/>
<EditorIndex Value="-1"/>
<TopLine Value="22"/>
<CursorPos X="10" Y="41"/>
<UsageCount Value="10"/>
</Unit5>
<Unit6>
<Filename Value="../../FreePascal/fpc/rtl/unix/sysutils.pp"/>
<EditorIndex Value="-1"/>
<TopLine Value="1441"/>
<CursorPos X="3" Y="1444"/>
<UsageCount Value="10"/>
</Unit6>
<Unit7>
<Filename Value="../../FreePascal/fpc/rtl/objpas/sysutils/osutil.inc"/>
<EditorIndex Value="-1"/>
<TopLine Value="88"/>
<CursorPos X="10" Y="107"/>
<UsageCount Value="10"/>
</Unit7>
<Unit8>
<Filename Value="../../FreePascal/fpc/rtl/objpas/classes/classesh.inc"/>
<EditorIndex Value="-1"/>
<TopLine Value="657"/>
<CursorPos X="3" Y="603"/>
<UsageCount Value="10"/>
</Unit8>
</Units>
<JumpHistory Count="28" HistoryIndex="27">
<JumpHistory Count="27" HistoryIndex="26">
<Position1>
<Filename Value="main.pas"/>
<Caret Line="219" Column="28" TopLine="191"/>
<Caret Line="91" Column="18" TopLine="76"/>
</Position1>
<Position2>
<Filename Value="main.pas"/>
<Caret Line="109" Column="26" TopLine="214"/>
<Caret Line="248" TopLine="236"/>
</Position2>
<Position3>
<Filename Value="main.pas"/>
<Caret Line="250" Column="110" TopLine="208"/>
<Caret Line="250" TopLine="236"/>
</Position3>
<Position4>
<Filename Value="main.pas"/>
<Caret Line="137" TopLine="109"/>
<Caret Line="251" TopLine="236"/>
</Position4>
<Position5>
<Filename Value="main.pas"/>
<Caret Line="227" Column="13" TopLine="196"/>
<Caret Line="252" TopLine="236"/>
</Position5>
<Position6>
<Filename Value="main.pas"/>
<Caret Line="245" Column="15" TopLine="217"/>
<Caret Line="254" TopLine="236"/>
</Position6>
<Position7>
<Filename Value="main.pas"/>
<Caret Line="253" Column="109" TopLine="221"/>
<Caret Line="255" TopLine="236"/>
</Position7>
<Position8>
<Filename Value="main.pas"/>
<Caret Line="250" Column="30" TopLine="227"/>
<Caret Line="236" TopLine="220"/>
</Position8>
<Position9>
<Filename Value="main.pas"/>
<Caret Line="54" Column="22" TopLine="36"/>
<Caret Line="237" TopLine="220"/>
</Position9>
<Position10>
<Filename Value="main.pas"/>
<Caret Line="233" Column="47" TopLine="208"/>
<Caret Line="238" TopLine="220"/>
</Position10>
<Position11>
<Filename Value="main.pas"/>
<Caret Line="231" Column="36" TopLine="209"/>
<Caret Line="239" TopLine="220"/>
</Position11>
<Position12>
<Filename Value="main.pas"/>
<Caret Line="233" Column="25" TopLine="210"/>
<Caret Line="240" TopLine="220"/>
</Position12>
<Position13>
<Filename Value="main.pas"/>
<Caret Line="234" Column="36" TopLine="220"/>
<Caret Line="241" TopLine="220"/>
</Position13>
<Position14>
<Filename Value="main.pas"/>
<Caret Line="236" TopLine="220"/>
<Caret Line="252" TopLine="225"/>
</Position14>
<Position15>
<Filename Value="main.pas"/>
<Caret Line="54" TopLine="47"/>
<Caret Line="254" TopLine="227"/>
</Position15>
<Position16>
<Filename Value="main.pas"/>
<Caret Line="46" Column="31"/>
<Caret Line="255" TopLine="228"/>
</Position16>
<Position17>
<Filename Value="main.pas"/>
<Caret Line="316" TopLine="205"/>
<Caret Line="236" TopLine="228"/>
</Position17>
<Position18>
<Filename Value="main.pas"/>
<Caret Line="226" TopLine="205"/>
<Caret Line="237" TopLine="228"/>
</Position18>
<Position19>
<Filename Value="main.pas"/>
<Caret Line="79" Column="53" TopLine="46"/>
<Caret Line="238" TopLine="228"/>
</Position19>
<Position20>
<Filename Value="main.pas"/>
<Caret Line="66" Column="30" TopLine="43"/>
<Caret Line="239" TopLine="228"/>
</Position20>
<Position21>
<Filename Value="main.pas"/>
<Caret Line="127" TopLine="127"/>
<Caret Line="240" TopLine="228"/>
</Position21>
<Position22>
<Filename Value="main.pas"/>
<Caret Line="100" TopLine="65"/>
<Caret Line="241" TopLine="228"/>
</Position22>
<Position23>
<Filename Value="main.pas"/>
<Caret Line="353" Column="25" TopLine="314"/>
<Caret Line="252" TopLine="228"/>
</Position23>
<Position24>
<Filename Value="main.pas"/>
<Caret Line="355" TopLine="318"/>
<Caret Line="248" TopLine="228"/>
</Position24>
<Position25>
<Filename Value="main.pas"/>
<Caret Line="81" Column="24" TopLine="46"/>
<Caret Line="258" TopLine="231"/>
</Position25>
<Position26>
<Filename Value="main.pas"/>
<Caret Line="353" Column="10" TopLine="320"/>
<Caret Line="297" Column="23" TopLine="281"/>
</Position26>
<Position27>
<Filename Value="main.pas"/>
<Caret Line="355" Column="43" TopLine="320"/>
<Caret Line="93" Column="12" TopLine="72"/>
</Position27>
<Position28>
<Filename Value="main.pas"/>
<Caret Line="363" TopLine="319"/>
</Position28>
</JumpHistory>
<RunParams>
<FormatVersion Value="2"/>
<Modes Count="0" ActiveMode=""/>
<Modes Count="0" ActiveMode="default"/>
</RunParams>
</ProjectSession>
</CONFIG>
Binary file added backer.icns
Binary file not shown.
Binary file added backer.png
Loading
Sorry, something went wrong. Reload?
Sorry, we cannot display this file.
Sorry, this file is invalid so it cannot be displayed.
17 changes: 7 additions & 10 deletions main.lfm
Original file line number Diff line number Diff line change
Expand Up @@ -10,6 +10,7 @@ object BackupForm: TBackupForm
OnCreate = FormCreate
OnShow = FormShow
Position = poScreenCenter
LCLVersion = '2.0.2.0'
object AddSourceButton: TButton
Left = 8
Height = 25
Expand All @@ -26,7 +27,7 @@ object BackupForm: TBackupForm
Width = 256
FileSortType = fstNone
ReadOnly = True
Root = '/home'
Root = '/'
ShowLines = False
TabOrder = 0
Options = [tvoAutoItemHeight, tvoHideSelection, tvoKeepCollapsedNodes, tvoReadOnly, tvoShowButtons, tvoShowRoot, tvoToolTips, tvoThemedDraw]
Expand All @@ -39,17 +40,17 @@ object BackupForm: TBackupForm
Width = 256
FileSortType = fstNone
ReadOnly = True
Root = '/media'
Root = '/'
ShowLines = False
TabOrder = 4
Options = [tvoAutoItemHeight, tvoHideSelection, tvoKeepCollapsedNodes, tvoReadOnly, tvoShowButtons, tvoShowRoot, tvoToolTips, tvoThemedDraw]
ObjectTypes = [otFolders]
end
object SourceLabel: TLabel
Left = 8
Height = 17
Height = 16
Top = 8
Width = 168
Width = 156
Caption = 'Select folders to backup:'
ParentColor = False
end
Expand All @@ -60,9 +61,7 @@ object BackupForm: TBackupForm
Width = 256
ItemHeight = 0
OnDblClick = BoxDblClick
ScrollWidth = 254
TabOrder = 2
TopIndex = -1
end
object RemoveSourceButton: TButton
Left = 8
Expand All @@ -75,9 +74,9 @@ object BackupForm: TBackupForm
end
object DestLabel: TLabel
Left = 272
Height = 17
Height = 16
Top = 8
Width = 233
Width = 217
Caption = 'Select location to use for backups:'
ParentColor = False
end
Expand All @@ -97,9 +96,7 @@ object BackupForm: TBackupForm
Width = 256
ItemHeight = 0
OnDblClick = BoxDblClick
ScrollWidth = 254
TabOrder = 6
TopIndex = -1
end
object RemoveDestButton: TButton
Left = 272
Expand Down
Loading

0 comments on commit 63e1b13

Please sign in to comment.