pascal/lazarus-ccr
1
0
Fork 0
Code Issues Releases Activity

LazImageEditor: Fix compilation.

Browse Source 
git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@7019 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
wp_xxyyzz
2019-06-29 20:10:29 +00:00
parent b7442222f8
commit 44d2b2a31f
5 changed files with 16 additions and 31 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
applications/lazimageeditor/DLBitmap.pas
View File

@ -283,7 +283,7 @@ var
begin begin
oBmp := TPicture.Create; oBmp := TPicture.Create;
try try
oBmp.LoadFromClipboardFormat(PredefinedClipboardFormat(pcfDelphiBitmap)); oBmp.LoadFromClipboardFormat(PredefinedClipboardFormat(pcfBitmap));
Width := oBmp.Width; Width := oBmp.Width;
Height := oBmp.Height; Height := oBmp.Height;
Canvas.Draw(0, 0, oBmp.Graphic); Canvas.Draw(0, 0, oBmp.Graphic);

2
applications/lazimageeditor/lazimageeditor.ini
View File

@ -2,4 +2,4 @@
Language=0 Language=0
[UNIX] [UNIX]
MyDirectory=T:\ImageEditor\ MyDirectory=D:\Prog_Lazarus\svn\lazarus-ccr\applications\lazimageeditor\

41
applications/lazimageeditor/lazimageeditor.lpi
View File

@ -1,11 +1,13 @@
<?xml version="1.0"?> <?xml version="1.0" encoding="UTF-8"?>
<CONFIG> <CONFIG>
<ProjectOptions> <ProjectOptions>
<Version Value="9"/> <Version Value="12"/>
<PathDelim Value="\"/> <PathDelim Value="\"/>
<General> <General>
<Flags>
<CompatibilityMode Value="True"/>
</Flags>
<SessionStorage Value="InProjectDir"/> <SessionStorage Value="InProjectDir"/>
<MainUnit Value="0"/>
<Title Value="lazimageeditor"/> <Title Value="lazimageeditor"/>
<ResourceType Value="res"/> <ResourceType Value="res"/>
<UseXPManifest Value="True"/> <UseXPManifest Value="True"/>
@ -14,9 +16,6 @@
<i18n> <i18n>
<EnableI18N LFM="False"/> <EnableI18N LFM="False"/>
</i18n> </i18n>
<VersionInfo>
<StringTable ProductVersion=""/>
</VersionInfo>
<BuildModes Count="2"> <BuildModes Count="2">
<Item1 Name="Debug" Default="True"/> <Item1 Name="Debug" Default="True"/>
<Item2 Name="Release"> <Item2 Name="Release">
@ -43,25 +42,24 @@
</Win32> </Win32>
</Options> </Options>
</Linking> </Linking>
<Other>
<CompilerMessages>
<UseMsgFile Value="True"/>
</CompilerMessages>
<CompilerPath Value="$(CompPath)"/>
</Other>
</CompilerOptions> </CompilerOptions>
</Item2> </Item2>
</BuildModes> </BuildModes>
<PublishOptions> <PublishOptions>
<Version Value="2"/> <Version Value="2"/>
<IncludeFileFilter Value="*.(pas|pp|inc|lfm|lpr|lrs|lpi|lpk|sh|xml)"/>
<ExcludeFileFilter Value="*.(bak|ppu|o|so);*~;backup"/>
</PublishOptions> </PublishOptions>
<RunParams> <RunParams>
<local> <local>
<FormatVersion Value="1"/> <LaunchingApplication PathPlusParams="\usr\bin\xterm -T &apos;Lazarus Run Output&apos; -e $(LazarusDir)\tools\runwait.sh $(TargetCmdLine)"/>
<LaunchingApplication PathPlusParams="\usr\bin\xterm -T 'Lazarus Run Output' -e $(LazarusDir)\tools\runwait.sh $(TargetCmdLine)"/>
</local> </local>
<FormatVersion Value="2"/>
<Modes Count="1">
<Mode0 Name="default">
<local>
<LaunchingApplication PathPlusParams="\usr\bin\xterm -T &apos;Lazarus Run Output&apos; -e $(LazarusDir)\tools\runwait.sh $(TargetCmdLine)"/>
</local>
</Mode0>
</Modes>
</RunParams> </RunParams>
<RequiredPackages Count="3"> <RequiredPackages Count="3">
<Item1> <Item1>
@ -80,7 +78,6 @@
<Unit0> <Unit0>
<Filename Value="lazimageeditor.pas"/> <Filename Value="lazimageeditor.pas"/>
<IsPartOfProject Value="True"/> <IsPartOfProject Value="True"/>
<UnitName Value="lazimageeditor"/>
</Unit0> </Unit0>
<Unit1> <Unit1>
<Filename Value="main.pas"/> <Filename Value="main.pas"/>
@ -151,7 +148,6 @@
<Unit10> <Unit10>
<Filename Value="DLBitmap.pas"/> <Filename Value="DLBitmap.pas"/>
<IsPartOfProject Value="True"/> <IsPartOfProject Value="True"/>
<UnitName Value="DLBitmap"/>
</Unit10> </Unit10>
<Unit11> <Unit11>
<Filename Value="DLBmpUtils.inc"/> <Filename Value="DLBmpUtils.inc"/>
@ -165,19 +161,16 @@
<Unit13> <Unit13>
<Filename Value="appsettings.pas"/> <Filename Value="appsettings.pas"/>
<IsPartOfProject Value="True"/> <IsPartOfProject Value="True"/>
<UnitName Value="appsettings"/>
</Unit13> </Unit13>
<Unit14> <Unit14>
<Filename Value="lieconstants.pas"/> <Filename Value="lieconstants.pas"/>
<IsPartOfProject Value="True"/> <IsPartOfProject Value="True"/>
<UnitName Value="lieconstants"/>
</Unit14> </Unit14>
<Unit15> <Unit15>
<Filename Value="iconsizeselection.pas"/> <Filename Value="iconsizeselection.pas"/>
<IsPartOfProject Value="True"/> <IsPartOfProject Value="True"/>
<ComponentName Value="SelectIconSizeForm"/> <ComponentName Value="SelectIconSizeForm"/>
<ResourceBaseClass Value="Form"/> <ResourceBaseClass Value="Form"/>
<UnitName Value="iconsizeselection"/>
</Unit15> </Unit15>
</Units> </Units>
</ProjectOptions> </ProjectOptions>
@ -202,12 +195,6 @@
</Win32> </Win32>
</Options> </Options>
</Linking> </Linking>
<Other>
<CompilerMessages>
<UseMsgFile Value="True"/>
</CompilerMessages>
<CompilerPath Value="$(CompPath)"/>
</Other>
</CompilerOptions> </CompilerOptions>
<Debugging> <Debugging>
<Exceptions Count="3"> <Exceptions Count="3">

BIN
applications/lazimageeditor/lazimageeditor.res
View File

Binary file not shown.

2
applications/lazimageeditor/resizepaperdialog.lrs
View File

@ -1,5 +1,3 @@
{ This is an automatically generated lazarus resource file }
LazarusResources.Add('TResizePaperDialogForm','FORMDATA',[ LazarusResources.Add('TResizePaperDialogForm','FORMDATA',[
'TPF0'#241#22'TResizePaperDialogForm'#21'ResizePaperDialogForm'#6'Height'#3 'TPF0'#241#22'TResizePaperDialogForm'#21'ResizePaperDialogForm'#6'Height'#3
+#251#1#5'Width'#3'j'#1#7'Caption'#6#12'Resize paper'#12'ClientHeight'#3#251#1 +#251#1#5'Width'#3'j'#1#7'Caption'#6#12'Resize paper'#12'ClientHeight'#3#251#1