paweld/lazarus-ccr
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

iconeditor, fixes compilation under linux/windows

Browse Source 
git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@286 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
jesusr 2007-11-23 06:46:07 +00:00
parent 56ce4246c0
commit e76bd25f1c
4 changed files with 6 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
applications/iconeditor/laziconeditor.lpi
View File

@ -1017,8 +1017,7 @@
<Version Value="5"/>
<PathDelim Value="\"/>
<SearchPaths>
<OtherUnitFiles Value="..\packages\LazRGBGraphics_svn\;..\packages\LazColorPalette\"/>
<UnitOutputDirectory Value="Units\$(LCLWidgetType)"/>
<UnitOutputDirectory Value="units\$(LCLWidgetType)"/>
</SearchPaths>
<CodeGeneration>
<Generate Value="Faster"/>

4
applications/iconeditor/laziconeditor.lpr
View File

@ -11,8 +11,10 @@ uses
{ add your units here }, main, Preview, PictureManager, PictureCtrls, Test, JPEGForLazarus,
NewDialog, ResizeDialog, ResizePaperDialog, PictureDialog, AboutDialog,
LazRGBGraphics, LazColorPalette;
{$IFDEF WINDOWS}
{$R laziconeditor.res}
{$ENDIF}
begin
Application.Title:='Lazarus Icon Editor';

BIN
applications/iconeditor/laziconeditor.res Normal file
View File

Binary file not shown.

4
applications/iconeditor/resizepaperdialog.pas
View File

@ -198,11 +198,11 @@ begin
SW := Max(1, Round(Picture.Width * FPreviewFactor));
SH := Max(1, Round(Picture.Height * FPreviewFactor));
Preview.PaperColor := ColorButtonPaper.ButtonColor;
Preview.Color := ColorButtonPaper.ButtonColor;
Preview.Picture.Free;
Preview.Picture := TPictureBitmap.CreateAsCopy(Picture);
Preview.Picture.StretchTrunc(SW, SH);
Preview.ResizePaper(W, H, TPicturePos(ComboBoxPicturePosition.ItemIndex));
//Preview.ResizePaper(W, H, TPicturePos(ComboBoxPicturePosition.ItemIndex));
end;
procedure TResizePaperDialogForm.Apply;