Added resource strings unit from Laurent Jacques.

git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@192 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
tomb0
2007-06-25 13:37:09 +00:00
parent 0d3a0a126b
commit 1410cdab42
9 changed files with 2543 additions and 2597 deletions

View File

@ -0,0 +1,57 @@
{
***************************************************************************
* *
* This source is free software; you can redistribute it and/or modify *
* it under the terms of the GNU General Public License as published by *
* the Free Software Foundation; either version 2 of the License, or *
* (at your option) any later version. *
* *
* This code is distributed in the hope that it will be useful, but *
* WITHOUT ANY WARRANTY; without even the implied warranty of *
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU *
* General Public License for more details. *
* *
* A copy of the GNU General Public License is available on the World *
* Wide Web at <http://www.gnu.org/copyleft/gpl.html>. You can also *
* obtain it by writing to the Free Software Foundation, *
* Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. *
* *
***************************************************************************
Author: Laurent Jacques
Abstract:
This unit contains all resource strings.
Note: All resource strings should be prefixed with 'lie' (Lazarus Icon Editor)
}
unit IconStrConsts;
{$mode objfpc}{$H+}
interface
uses
Classes, SysUtils;
resourcestring
//Messages
lieSaveChanges = 'Save changes to %s?';
// main bar menu
lieMenuFile = '&File';
lieMenuEdit = '&Edit';
lieMenuPicture = '&Picture';
lieMenuMask = '&Mask';
lieMenuView = '&View';
lieMenuHelp = '&Help';
// Action Lists
lieFileNew = '&New...';
implementation
end.

View File

@ -8,10 +8,9 @@
<IconPath Value="./"/>
<TargetFileExt Value=".exe"/>
<Title Value="Lazarus Icon Editor"/>
<ActiveEditorIndexAtStart Value="6"/>
<ActiveEditorIndexAtStart Value="2"/>
</General>
<VersionInfo>
<UseVersionInfo Value="True"/>
<CurrentMajorRevNr Value="1"/>
<ProjectVersion Value="0.1.0.0"/>
</VersionInfo>
@ -30,26 +29,28 @@
</RunParams>
<RequiredPackages Count="4">
<Item1>
<PackageName Value="LazColorPalette"/>
<PackageName Value="LCL"/>
</Item1>
<Item2>
<PackageName Value="LCL"/>
<PackageName Value="LazRGBGraphics"/>
</Item2>
<Item3>
<PackageName Value="LazRGBGraphics"/>
<PackageName Value="LazColorPalette"/>
</Item3>
<Item4>
<PackageName Value="JPEGForLazarus"/>
</Item4>
</RequiredPackages>
<Units Count="129">
<Units Count="136">
<Unit0>
<Filename Value="laziconeditor.lpr"/>
<IsPartOfProject Value="True"/>
<UnitName Value="laziconeditor"/>
<CursorPos X="32" Y="28"/>
<TopLine Value="1"/>
<CursorPos X="8" Y="27"/>
<TopLine Value="4"/>
<EditorIndex Value="2"/>
<UsageCount Value="146"/>
<Loaded Value="True"/>
</Unit0>
<Unit1>
<Filename Value="main.pas"/>
@ -57,8 +58,8 @@
<IsPartOfProject Value="True"/>
<ResourceFilename Value="main.lrs"/>
<UnitName Value="Main"/>
<CursorPos X="36" Y="8"/>
<TopLine Value="1"/>
<CursorPos X="88" Y="843"/>
<TopLine Value="831"/>
<EditorIndex Value="0"/>
<UsageCount Value="146"/>
<Loaded Value="True"/>
@ -78,7 +79,7 @@
<UnitName Value="Preview"/>
<CursorPos X="37" Y="38"/>
<TopLine Value="15"/>
<EditorIndex Value="2"/>
<EditorIndex Value="5"/>
<UsageCount Value="146"/>
<Loaded Value="True"/>
</Unit3>
@ -86,9 +87,9 @@
<Filename Value="picturemanager.pas"/>
<IsPartOfProject Value="True"/>
<UnitName Value="PictureManager"/>
<CursorPos X="1" Y="364"/>
<TopLine Value="333"/>
<EditorIndex Value="3"/>
<CursorPos X="31" Y="260"/>
<TopLine Value="234"/>
<EditorIndex Value="6"/>
<UsageCount Value="146"/>
<Loaded Value="True"/>
</Unit4>
@ -118,7 +119,7 @@
<UnitName Value="PictureCtrls"/>
<CursorPos X="3" Y="358"/>
<TopLine Value="337"/>
<EditorIndex Value="6"/>
<EditorIndex Value="9"/>
<UsageCount Value="144"/>
<Loaded Value="True"/>
</Unit8>
@ -140,7 +141,7 @@
<UnitName Value="Controls"/>
<CursorPos X="22" Y="1623"/>
<TopLine Value="1607"/>
<EditorIndex Value="7"/>
<EditorIndex Value="10"/>
<UsageCount Value="10"/>
<Loaded Value="True"/>
</Unit11>
@ -175,9 +176,11 @@
<IsPartOfProject Value="True"/>
<ResourceFilename Value="test.lrs"/>
<UnitName Value="Test"/>
<CursorPos X="52" Y="60"/>
<TopLine Value="36"/>
<CursorPos X="11" Y="79"/>
<TopLine Value="64"/>
<EditorIndex Value="3"/>
<UsageCount Value="143"/>
<Loaded Value="True"/>
</Unit16>
<Unit17>
<Filename Value="..\lazarus\lcl\graphics.pp"/>
@ -422,9 +425,9 @@
<IsPartOfProject Value="True"/>
<ResourceFilename Value="newdialog.lrs"/>
<UnitName Value="NewDialog"/>
<CursorPos X="30" Y="18"/>
<TopLine Value="1"/>
<EditorIndex Value="4"/>
<CursorPos X="31" Y="34"/>
<TopLine Value="20"/>
<EditorIndex Value="7"/>
<UsageCount Value="104"/>
<Loaded Value="True"/>
</Unit53>
@ -436,7 +439,7 @@
<UnitName Value="ResizeDialog"/>
<CursorPos X="1" Y="1"/>
<TopLine Value="1"/>
<EditorIndex Value="5"/>
<EditorIndex Value="8"/>
<UsageCount Value="102"/>
<Loaded Value="True"/>
</Unit54>
@ -446,9 +449,9 @@
<IsPartOfProject Value="True"/>
<ResourceFilename Value="resizepaperdialog.lrs"/>
<UnitName Value="ResizePaperDialog"/>
<CursorPos X="59" Y="163"/>
<TopLine Value="144"/>
<EditorIndex Value="12"/>
<CursorPos X="25" Y="38"/>
<TopLine Value="171"/>
<EditorIndex Value="11"/>
<UsageCount Value="102"/>
<Loaded Value="True"/>
</Unit55>
@ -716,8 +719,8 @@
<ResourceFilename Value="aboutdialog.lrs"/>
<UnitName Value="AboutDialog"/>
<CursorPos X="40" Y="27"/>
<TopLine Value="12"/>
<EditorIndex Value="1"/>
<TopLine Value="1"/>
<EditorIndex Value="4"/>
<UsageCount Value="66"/>
<Loaded Value="True"/>
</Unit94>
@ -737,11 +740,9 @@
<Unit97>
<Filename Value="..\packages\LazRGBGraphics\rgbgraphics.pas"/>
<UnitName Value="RGBGraphics"/>
<CursorPos X="1" Y="28"/>
<TopLine Value="1"/>
<EditorIndex Value="8"/>
<CursorPos X="20" Y="38"/>
<TopLine Value="19"/>
<UsageCount Value="29"/>
<Loaded Value="True"/>
</Unit97>
<Unit98>
<Filename Value="home\tombo\lazarus-svn\lcl\graphmath.pp"/>
@ -753,11 +754,9 @@
<Unit99>
<Filename Value="..\packages\LazRGBGraphics\rgbroutines.pas"/>
<UnitName Value="RGBRoutines"/>
<CursorPos X="24" Y="878"/>
<TopLine Value="867"/>
<EditorIndex Value="9"/>
<CursorPos X="1" Y="1"/>
<TopLine Value="1"/>
<UsageCount Value="27"/>
<Loaded Value="True"/>
</Unit99>
<Unit100>
<Filename Value="..\lazarus\lcl\lresources.pp"/>
@ -796,9 +795,7 @@
<UnitName Value="RGBTypes"/>
<CursorPos X="76" Y="628"/>
<TopLine Value="484"/>
<EditorIndex Value="10"/>
<UsageCount Value="27"/>
<Loaded Value="True"/>
</Unit105>
<Unit106>
<Filename Value="..\lazarus\lcl\include\tabsheet.inc"/>
@ -849,9 +846,7 @@
<UnitName Value="RGBUtils"/>
<CursorPos X="11" Y="170"/>
<TopLine Value="154"/>
<EditorIndex Value="11"/>
<UsageCount Value="23"/>
<Loaded Value="True"/>
</Unit113>
<Unit114>
<Filename Value="..\fpc\fcl\image\fppen.inc"/>
@ -947,105 +942,66 @@
<TopLine Value="10"/>
<UsageCount Value="10"/>
</Unit128>
<Unit129>
<Filename Value="..\packages\LazRGBGraphics\lazrgbgraphics.pas"/>
<UnitName Value="LazRGBGraphics"/>
<CursorPos X="1" Y="1"/>
<TopLine Value="1"/>
<UsageCount Value="10"/>
</Unit129>
<Unit130>
<Filename Value="..\packages\LazRGBGraphics_svn\rgbutils.pas"/>
<UnitName Value="RGBUtils"/>
<CursorPos X="4" Y="27"/>
<TopLine Value="13"/>
<UsageCount Value="10"/>
</Unit130>
<Unit131>
<Filename Value="..\packages\LazRGBGraphics_svn\rgbtypes.pas"/>
<UnitName Value="RGBTypes"/>
<CursorPos X="4" Y="31"/>
<TopLine Value="16"/>
<UsageCount Value="10"/>
</Unit131>
<Unit132>
<Filename Value="..\packages\LazRGBGraphics_svn\rgbroutines.pas"/>
<UnitName Value="RGBRoutines"/>
<CursorPos X="84" Y="27"/>
<TopLine Value="20"/>
<UsageCount Value="10"/>
</Unit132>
<Unit133>
<Filename Value="..\packages\LazRGBGraphics_svn\rgbgraphics.pas"/>
<UnitName Value="RGBGraphics"/>
<CursorPos X="1" Y="1"/>
<TopLine Value="13"/>
<UsageCount Value="10"/>
</Unit133>
<Unit134>
<Filename Value="..\packages\LazRGBGraphics_svn\lazrgbgraphics.pas"/>
<UnitName Value="LazRGBGraphics"/>
<CursorPos X="1" Y="1"/>
<TopLine Value="1"/>
<UsageCount Value="10"/>
</Unit134>
<Unit135>
<Filename Value="iconstrconsts.pas"/>
<UnitName Value="IconStrConsts"/>
<CursorPos X="33" Y="47"/>
<TopLine Value="29"/>
<EditorIndex Value="1"/>
<UsageCount Value="10"/>
<Loaded Value="True"/>
</Unit135>
</Units>
<JumpHistory Count="22" HistoryIndex="21">
<Position1>
<Filename Value="main.pas"/>
<Caret Line="19" Column="86" TopLine="1"/>
</Position1>
<Position2>
<Filename Value="main.pas"/>
<Caret Line="62" Column="43" TopLine="31"/>
</Position2>
<Position3>
<Filename Value="main.pas"/>
<Caret Line="19" Column="12" TopLine="18"/>
</Position3>
<Position4>
<Filename Value="main.pas"/>
<Caret Line="618" Column="3" TopLine="611"/>
</Position4>
<Position5>
<Filename Value="picturectrls.pas"/>
<Caret Line="1046" Column="37" TopLine="1035"/>
</Position5>
<Position6>
<Filename Value="picturectrls.pas"/>
<Caret Line="294" Column="18" TopLine="277"/>
</Position6>
<Position7>
<Filename Value="picturectrls.pas"/>
<Caret Line="322" Column="17" TopLine="309"/>
</Position7>
<Position8>
<Filename Value="main.pas"/>
<Caret Line="330" Column="17" TopLine="317"/>
</Position8>
<Position9>
<Filename Value="main.pas"/>
<Caret Line="8" Column="36" TopLine="1"/>
</Position9>
<Position10>
<Filename Value="picturectrls.pas"/>
<Caret Line="465" Column="44" TopLine="453"/>
</Position10>
<Position11>
<Filename Value="picturectrls.pas"/>
<Caret Line="1" Column="1" TopLine="1"/>
</Position11>
<Position12>
<Filename Value="picturectrls.pas"/>
<Caret Line="57" Column="29" TopLine="41"/>
</Position12>
<Position13>
<Filename Value="picturectrls.pas"/>
<Caret Line="58" Column="29" TopLine="46"/>
</Position13>
<Position14>
<Filename Value="picturectrls.pas"/>
<Caret Line="428" Column="25" TopLine="412"/>
</Position14>
<Position15>
<Filename Value="picturectrls.pas"/>
<Caret Line="456" Column="44" TopLine="440"/>
</Position15>
<Position16>
<Filename Value="picturectrls.pas"/>
<Caret Line="465" Column="44" TopLine="449"/>
</Position16>
<Position17>
<Filename Value="picturectrls.pas"/>
<Caret Line="635" Column="23" TopLine="619"/>
</Position17>
<Position18>
<Filename Value="picturectrls.pas"/>
<Caret Line="644" Column="39" TopLine="628"/>
</Position18>
<Position19>
<Filename Value="picturectrls.pas"/>
<Caret Line="27" Column="57" TopLine="1"/>
</Position19>
<Position20>
<Filename Value="picturectrls.pas"/>
<Caret Line="57" Column="29" TopLine="41"/>
</Position20>
<Position21>
<Filename Value="picturectrls.pas"/>
<Caret Line="58" Column="29" TopLine="42"/>
</Position21>
<Position22>
<Filename Value="picturectrls.pas"/>
<Caret Line="358" Column="19" TopLine="336"/>
</Position22>
</JumpHistory>
<JumpHistory Count="0" HistoryIndex="-1"/>
</ProjectOptions>
<CompilerOptions>
<Version Value="5"/>
<PathDelim Value="\"/>
<SearchPaths>
<OtherUnitFiles Value="..\Packages\LazRGBGraphics\;..\Packages\LazColorPalette\"/>
<OtherUnitFiles Value="..\packages\LazRGBGraphics_svn\;..\packages\LazColorPalette\"/>
<UnitOutputDirectory Value="Units\$(LCLWidgetType)"/>
<SrcPath Value="$(LazarusDir)\lcl\;$(LazarusDir)\lcl\interfaces\$(LCLWidgetType)\"/>
</SearchPaths>
<CodeGeneration>
<Generate Value="Faster"/>

File diff suppressed because it is too large Load Diff

File diff suppressed because it is too large Load Diff

View File

@ -303,7 +303,7 @@ var
implementation
uses Test;
uses Test, IconStrConsts;
procedure SetControlsEnabled(AControl: TControl; AEnabled: Boolean);
var
@ -414,7 +414,7 @@ begin
if ActivePictureEdit.Modified then
begin
case MessageDlg(Application.Title,
Format('Save changes to %s?', [ActivePicturePage.Caption]), mtWarning,
Format(lieSaveChanges, [ActivePicturePage.Caption]), mtWarning,
mbYesNoCancel, 0) of
mrYes:
begin
@ -829,11 +829,21 @@ begin
UpdateToolSettings;
Palette.LoadPalette('../../default.pal');
MenuItemFile.Caption := lieMenuFile;
MenuItemEdit.Caption := lieMenuEdit;
MenuItemPicture.Caption := lieMenuPicture;
MenuItemMask.Caption := lieMenuMask;
MenuItemView.Caption := lieMenuView;
MenuItemHelp.Caption := lieMenuHelp;
FileNew.Caption := lieFileNew;
end;
procedure TMainForm.FormShow(Sender: TObject);
begin
{$IFDEF EnableTestForm}
TestForm.Show;
{$ENDIF}
end;
procedure TMainForm.MaskInvertExecute(Sender: TObject);
@ -1036,3 +1046,4 @@ initialization
end.

View File

@ -1,129 +1,125 @@
object NewDialogForm: TNewDialogForm
Left = 478
Height = 185
Top = 79
Width = 249
HorzScrollBar.Page = 248
VertScrollBar.Page = 184
ActiveControl = EditWidth
BorderIcons = [biSystemMenu]
BorderStyle = bsDialog
Caption = 'New picture'
ClientHeight = 185
ClientWidth = 249
PixelsPerInch = 96
Position = poMainFormCenter
HorzScrollBar.Page = 248
VertScrollBar.Page = 184
Left = 478
Height = 185
Top = 79
Width = 249
object GroupBoxProperties: TGroupBox
Left = 6
Height = 136
Top = 6
Width = 236
Anchors = [akTop, akLeft, akRight, akBottom]
Caption = 'Properties'
ClientHeight = 118
ClientWidth = 232
TabOrder = 0
Left = 6
Height = 136
Top = 6
Width = 236
object LabelWidth: TLabel
Caption = 'Width:'
Color = clNone
ParentColor = False
Left = 16
Height = 14
Top = 14
Width = 33
Caption = 'Width:'
ParentColor = False
end
object LabelHeight: TLabel
Caption = 'Height:'
Color = clNone
ParentColor = False
Left = 16
Height = 14
Top = 50
Width = 36
Caption = 'Height:'
ParentColor = False
end
object LabelPaperColor: TLabel
Caption = 'Paper color:'
Color = clNone
ParentColor = False
Left = 16
Height = 14
Top = 86
Width = 59
Caption = 'Paper color:'
ParentColor = False
end
object ColorButtonPaper: TColorButton
Left = 118
Height = 25
Top = 82
Width = 80
BorderWidth = 2
ButtonColorSize = 16
ButtonColor = clWhite
Caption = 'Change...'
Color = clBtnFace
Left = 118
Height = 25
Top = 82
Width = 80
end
object EditWidth: TEdit
OnKeyDown = nil
TabOrder = 0
Text = '512'
Left = 118
Height = 23
Top = 8
Width = 80
OnKeyDown = nil
TabOrder = 0
Text = '512'
end
object EditHeight: TEdit
OnKeyDown = nil
TabOrder = 1
Text = '512'
Left = 118
Height = 23
Top = 44
Width = 80
OnKeyDown = nil
TabOrder = 1
Text = '512'
end
object UpDownWidth: TUpDown
Left = 198
Height = 23
Top = 8
Width = 17
Associate = EditWidth
Min = 1
Max = 4096
Position = 512
Thousands = False
Left = 198
Height = 23
Top = 8
Width = 17
end
object UpDownHeight: TUpDown
Left = 198
Height = 23
Top = 44
Width = 17
Associate = EditHeight
Min = 1
Max = 4096
Position = 512
Thousands = False
Left = 198
Height = 23
Top = 44
Width = 17
end
end
object ButtonCancel: TButton
Left = 167
Height = 25
Top = 149
Width = 75
Anchors = [akRight, akBottom]
BorderSpacing.InnerBorder = 4
Cancel = True
Caption = 'Cancel'
ModalResult = 2
TabOrder = 1
Left = 167
end
object ButtonOK: TButton
Left = 85
Height = 25
Top = 149
Width = 75
end
object ButtonOK: TButton
Anchors = [akRight, akBottom]
BorderSpacing.InnerBorder = 4
Caption = 'OK'
Default = True
ModalResult = 1
TabOrder = 2
Left = 85
Height = 25
Top = 149
Width = 75
end
end

View File

@ -1,36 +1,35 @@
{ This is an automatically generated lazarus resource file }
LazarusResources.Add('TNewDialogForm','FORMDATA',[
'TPF0'#14'TNewDialogForm'#13'NewDialogForm'#13'ActiveControl'#7#9'EditWidth'
+#11'BorderIcons'#11#12'biSystemMenu'#0#11'BorderStyle'#7#8'bsDialog'#7'Capti'
+'on'#6#11'New picture'#12'ClientHeight'#3#185#0#11'ClientWidth'#3#249#0#13'P'
+'ixelsPerInch'#2'`'#8'Position'#7#16'poMainFormCenter'#18'HorzScrollBar.Page'
+#3#248#0#18'VertScrollBar.Page'#3#184#0#4'Left'#3#222#1#6'Height'#3#185#0#3
+'Top'#2'O'#5'Width'#3#249#0#0#9'TGroupBox'#18'GroupBoxProperties'#7'Anchors'
+#11#5'akTop'#6'akLeft'#7'akRight'#8'akBottom'#0#7'Caption'#6#10'Properties'
+#12'ClientHeight'#2'v'#11'ClientWidth'#3#232#0#8'TabOrder'#2#0#4'Left'#2#6#6
+'Height'#3#136#0#3'Top'#2#6#5'Width'#3#236#0#0#6'TLabel'#10'LabelWidth'#7'Ca'
+'ption'#6#6'Width:'#5'Color'#7#6'clNone'#11'ParentColor'#8#4'Left'#2#16#6'He'
+'ight'#2#14#3'Top'#2#14#5'Width'#2'!'#0#0#6'TLabel'#11'LabelHeight'#7'Captio'
+'n'#6#7'Height:'#5'Color'#7#6'clNone'#11'ParentColor'#8#4'Left'#2#16#6'Heigh'
+'t'#2#14#3'Top'#2'2'#5'Width'#2'$'#0#0#6'TLabel'#15'LabelPaperColor'#7'Capti'
+'on'#6#12'Paper color:'#5'Color'#7#6'clNone'#11'ParentColor'#8#4'Left'#2#16#6
+'Height'#2#14#3'Top'#2'V'#5'Width'#2';'#0#0#12'TColorButton'#16'ColorButtonP'
+'aper'#11'BorderWidth'#2#2#15'ButtonColorSize'#2#16#11'ButtonColor'#7#7'clWh'
+'ite'#7'Caption'#6#9'Change...'#5'Color'#7#9'clBtnFace'#4'Left'#2'v'#6'Heigh'
+'t'#2#25#3'Top'#2'R'#5'Width'#2'P'#0#0#5'TEdit'#9'EditWidth'#9'OnKeyDown'#13
+#8'TabOrder'#2#0#4'Text'#6#3'512'#4'Left'#2'v'#6'Height'#2#23#3'Top'#2#8#5'W'
+'idth'#2'P'#0#0#5'TEdit'#10'EditHeight'#9'OnKeyDown'#13#8'TabOrder'#2#1#4'Te'
+'xt'#6#3'512'#4'Left'#2'v'#6'Height'#2#23#3'Top'#2','#5'Width'#2'P'#0#0#7'TU'
+'pDown'#11'UpDownWidth'#9'Associate'#7#9'EditWidth'#3'Min'#2#1#3'Max'#3#0#16
+#8'Position'#3#0#2#9'Thousands'#8#4'Left'#3#198#0#6'Height'#2#23#3'Top'#2#8#5
+'Width'#2#17#0#0#7'TUpDown'#12'UpDownHeight'#9'Associate'#7#10'EditHeight'#3
+'Min'#2#1#3'Max'#3#0#16#8'Position'#3#0#2#9'Thousands'#8#4'Left'#3#198#0#6'H'
+'eight'#2#23#3'Top'#2','#5'Width'#2#17#0#0#0#7'TButton'#12'ButtonCancel'#7'A'
+'nchors'#11#7'akRight'#8'akBottom'#0#25'BorderSpacing.InnerBorder'#2#4#6'Can'
+'cel'#9#7'Caption'#6#6'Cancel'#11'ModalResult'#2#2#8'TabOrder'#2#1#4'Left'#3
+#167#0#6'Height'#2#25#3'Top'#3#149#0#5'Width'#2'K'#0#0#7'TButton'#8'ButtonOK'
+#7'Anchors'#11#7'akRight'#8'akBottom'#0#25'BorderSpacing.InnerBorder'#2#4#7
+'Caption'#6#2'OK'#7'Default'#9#11'ModalResult'#2#1#8'TabOrder'#2#2#4'Left'#2
+'U'#6'Height'#2#25#3'Top'#3#149#0#5'Width'#2'K'#0#0#0
'TPF0'#14'TNewDialogForm'#13'NewDialogForm'#4'Left'#3#222#1#6'Height'#3#185#0
+#3'Top'#2'O'#5'Width'#3#249#0#18'HorzScrollBar.Page'#3#248#0#18'VertScrollBa'
+'r.Page'#3#184#0#13'ActiveControl'#7#9'EditWidth'#11'BorderIcons'#11#12'biSy'
+'stemMenu'#0#11'BorderStyle'#7#8'bsDialog'#7'Caption'#6#11'New picture'#12'C'
+'lientHeight'#3#185#0#11'ClientWidth'#3#249#0#8'Position'#7#16'poMainFormCen'
+'ter'#0#9'TGroupBox'#18'GroupBoxProperties'#4'Left'#2#6#6'Height'#3#136#0#3
+'Top'#2#6#5'Width'#3#236#0#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#8'akB'
+'ottom'#0#7'Caption'#6#10'Properties'#12'ClientHeight'#2'v'#11'ClientWidth'#3
+#232#0#8'TabOrder'#2#0#0#6'TLabel'#10'LabelWidth'#4'Left'#2#16#6'Height'#2#14
+#3'Top'#2#14#5'Width'#2'!'#7'Caption'#6#6'Width:'#11'ParentColor'#8#0#0#6'TL'
+'abel'#11'LabelHeight'#4'Left'#2#16#6'Height'#2#14#3'Top'#2'2'#5'Width'#2'$'
+#7'Caption'#6#7'Height:'#11'ParentColor'#8#0#0#6'TLabel'#15'LabelPaperColor'
+#4'Left'#2#16#6'Height'#2#14#3'Top'#2'V'#5'Width'#2';'#7'Caption'#6#12'Paper'
+' color:'#11'ParentColor'#8#0#0#12'TColorButton'#16'ColorButtonPaper'#4'Left'
+#2'v'#6'Height'#2#25#3'Top'#2'R'#5'Width'#2'P'#11'BorderWidth'#2#2#15'Button'
+'ColorSize'#2#16#11'ButtonColor'#7#7'clWhite'#7'Caption'#6#9'Change...'#5'Co'
+'lor'#7#9'clBtnFace'#0#0#5'TEdit'#9'EditWidth'#4'Left'#2'v'#6'Height'#2#23#3
+'Top'#2#8#5'Width'#2'P'#9'OnKeyDown'#13#8'TabOrder'#2#0#4'Text'#6#3'512'#0#0
+#5'TEdit'#10'EditHeight'#4'Left'#2'v'#6'Height'#2#23#3'Top'#2','#5'Width'#2
+'P'#9'OnKeyDown'#13#8'TabOrder'#2#1#4'Text'#6#3'512'#0#0#7'TUpDown'#11'UpDow'
+'nWidth'#4'Left'#3#198#0#6'Height'#2#23#3'Top'#2#8#5'Width'#2#17#9'Associate'
+#7#9'EditWidth'#3'Min'#2#1#3'Max'#3#0#16#8'Position'#3#0#2#9'Thousands'#8#0#0
+#7'TUpDown'#12'UpDownHeight'#4'Left'#3#198#0#6'Height'#2#23#3'Top'#2','#5'Wi'
+'dth'#2#17#9'Associate'#7#10'EditHeight'#3'Min'#2#1#3'Max'#3#0#16#8'Position'
+#3#0#2#9'Thousands'#8#0#0#0#7'TButton'#12'ButtonCancel'#4'Left'#3#167#0#6'He'
+'ight'#2#25#3'Top'#3#149#0#5'Width'#2'K'#7'Anchors'#11#7'akRight'#8'akBottom'
+#0#25'BorderSpacing.InnerBorder'#2#4#6'Cancel'#9#7'Caption'#6#6'Cancel'#11'M'
+'odalResult'#2#2#8'TabOrder'#2#1#0#0#7'TButton'#8'ButtonOK'#4'Left'#2'U'#6'H'
+'eight'#2#25#3'Top'#3#149#0#5'Width'#2'K'#7'Anchors'#11#7'akRight'#8'akBotto'
+'m'#0#25'BorderSpacing.InnerBorder'#2#4#7'Caption'#6#2'OK'#7'Default'#9#11'M'
+'odalResult'#2#1#8'TabOrder'#2#2#0#0#0
]);

View File

@ -1,132 +1,130 @@
inherited ResizePaperDialogForm: TResizePaperDialogForm
Height = 507
Width = 276
HorzScrollBar.Page = 275
VertScrollBar.Page = 506
ActiveControl = EditHeight
Caption = 'Resize paper'
ClientHeight = 507
ClientWidth = 276
OnCreate = FormCreate
OnDestroy = FormDestroy
PixelsPerInch = 96
HorzScrollBar.Page = 275
VertScrollBar.Page = 506
Height = 507
Width = 276
object PanelPreview: TPanel
Anchors = [akTop, akLeft, akRight, akBottom]
BevelOuter = bvNone
ClientHeight = 264
ClientWidth = 264
Color = clBlack
FullRepaint = False
ParentColor = False
TabOrder = 0
Left = 6
Height = 264
Top = 6
Width = 264
Anchors = [akTop, akLeft, akRight, akBottom]
BevelOuter = bvNone
Color = clBlack
FullRepaint = False
ParentColor = False
TabOrder = 0
end
object GroupBoxProperties: TGroupBox
Left = 6
Height = 186
Top = 280
Width = 264
Anchors = [akLeft, akRight, akBottom]
Caption = 'Properties'
ClientHeight = 168
ClientWidth = 260
TabOrder = 1
Left = 6
Height = 186
Top = 280
Width = 264
object LabelWidth: TLabel
Caption = 'Paper width:'
Color = clNone
ParentColor = False
Left = 16
Height = 14
Top = 44
Width = 62
Caption = 'Paper width:'
ParentColor = False
end
object LabelHeight: TLabel
Caption = 'Paper height:'
Color = clNone
ParentColor = False
Left = 16
Height = 14
Top = 80
Width = 66
Caption = 'Paper height:'
ParentColor = False
end
object LabelPaperColor: TLabel
Caption = 'Paper color:'
Color = clNone
ParentColor = False
Left = 16
Height = 14
Top = 140
Width = 59
Caption = 'Paper color:'
ParentColor = False
end
object LabelPicturePosition: TLabel
Caption = 'Picture position:'
Color = clNone
ParentColor = False
Left = 16
Height = 14
Top = 13
Width = 78
Caption = 'Picture position:'
ParentColor = False
end
object ColorButtonPaper: TColorButton
Left = 148
Height = 25
Top = 135
Width = 80
BorderWidth = 2
ButtonColorSize = 16
ButtonColor = clWhite
Caption = 'Change...'
Color = clBtnFace
OnColorChanged = ColorButtonPaperColorChanged
Left = 148
Height = 25
Top = 135
Width = 80
end
object EditHeight: TEdit
OnChange = EditHeightChange
OnKeyDown = nil
TabOrder = 0
Text = '512'
Left = 148
Height = 23
Top = 74
Width = 80
OnChange = EditHeightChange
OnKeyDown = nil
TabOrder = 0
Text = '512'
end
object UpDownWidth: TUpDown
Left = 228
Height = 23
Top = 38
Width = 17
Associate = EditWidth
Min = 1
Max = 4096
Position = 512
Thousands = False
Left = 228
Height = 23
Top = 38
Width = 17
end
object UpDownHeight: TUpDown
Left = 228
Height = 23
Top = 74
Width = 17
Associate = EditHeight
Min = 1
Max = 4096
Position = 512
Thousands = False
Left = 228
Height = 23
Top = 74
Width = 17
end
object CheckBoxAspectRatio: TCheckBox
Left = 16
Height = 13
Top = 110
Width = 120
Caption = 'Preserve aspect ratio'
Checked = True
OnChange = CheckBoxAspectRatioChange
State = cbChecked
TabOrder = 1
Left = 16
Height = 13
Top = 110
Width = 120
end
object ComboBoxPicturePosition: TComboBox
Left = 148
Height = 21
Top = 8
Width = 96
AutoCompleteText = [cbactEndOfLineComplete, cbactSearchAscending]
ItemHeight = 13
ItemIndex = 0
Items.Strings = (
'Top Left'
@ -144,44 +142,40 @@ inherited ResizePaperDialogForm: TResizePaperDialogForm
Style = csDropDownList
TabOrder = 2
Text = 'Top Left'
Left = 148
Height = 21
Top = 8
Width = 96
end
object EditWidth: TEdit
OnChange = EditWidthChange
OnKeyDown = nil
TabOrder = 3
Text = '512'
Left = 148
Height = 23
Top = 38
Width = 80
OnChange = EditWidthChange
OnKeyDown = nil
TabOrder = 3
Text = '512'
end
end
object ButtonOK: TButton
Left = 112
Height = 25
Top = 474
Width = 75
Anchors = [akRight, akBottom]
BorderSpacing.InnerBorder = 4
Caption = 'OK'
Default = True
ModalResult = 1
TabOrder = 2
Left = 112
end
object ButtonCancel: TButton
Left = 193
Height = 25
Top = 474
Width = 75
end
object ButtonCancel: TButton
Anchors = [akRight, akBottom]
BorderSpacing.InnerBorder = 4
Cancel = True
Caption = 'Cancel'
ModalResult = 2
TabOrder = 3
Left = 193
Height = 25
Top = 474
Width = 75
end
end

View File

@ -1,53 +1,51 @@
{ This is an automatically generated lazarus resource file }
LazarusResources.Add('TResizePaperDialogForm','FORMDATA',[
'TPF0'#241#22'TResizePaperDialogForm'#21'ResizePaperDialogForm'#13'ActiveCont'
+'rol'#7#10'EditHeight'#7'Caption'#6#12'Resize paper'#12'ClientHeight'#3#251#1
+#11'ClientWidth'#3#20#1#8'OnCreate'#7#10'FormCreate'#9'OnDestroy'#7#11'FormD'
+'estroy'#13'PixelsPerInch'#2'`'#18'HorzScrollBar.Page'#3#19#1#18'VertScrollB'
+'ar.Page'#3#250#1#6'Height'#3#251#1#5'Width'#3#20#1#0#6'TPanel'#12'PanelPrev'
+'iew'#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#8'akBottom'#0#10'BevelOute'
+'r'#7#6'bvNone'#12'ClientHeight'#3#8#1#11'ClientWidth'#3#8#1#5'Color'#7#7'cl'
+'Black'#11'FullRepaint'#8#11'ParentColor'#8#8'TabOrder'#2#0#4'Left'#2#6#6'He'
+'ight'#3#8#1#3'Top'#2#6#5'Width'#3#8#1#0#0#9'TGroupBox'#18'GroupBoxPropertie'
+'s'#7'Anchors'#11#6'akLeft'#7'akRight'#8'akBottom'#0#7'Caption'#6#10'Propert'
+'ies'#12'ClientHeight'#3#168#0#11'ClientWidth'#3#4#1#8'TabOrder'#2#1#4'Left'
+#2#6#6'Height'#3#186#0#3'Top'#3#24#1#5'Width'#3#8#1#0#6'TLabel'#10'LabelWidt'
+'h'#7'Caption'#6#12'Paper width:'#5'Color'#7#6'clNone'#11'ParentColor'#8#4'L'
+'eft'#2#16#6'Height'#2#14#3'Top'#2','#5'Width'#2'>'#0#0#6'TLabel'#11'LabelHe'
+'ight'#7'Caption'#6#13'Paper height:'#5'Color'#7#6'clNone'#11'ParentColor'#8
+#4'Left'#2#16#6'Height'#2#14#3'Top'#2'P'#5'Width'#2'B'#0#0#6'TLabel'#15'Labe'
+'lPaperColor'#7'Caption'#6#12'Paper color:'#5'Color'#7#6'clNone'#11'ParentCo'
+'lor'#8#4'Left'#2#16#6'Height'#2#14#3'Top'#3#140#0#5'Width'#2';'#0#0#6'TLabe'
+'l'#20'LabelPicturePosition'#7'Caption'#6#17'Picture position:'#5'Color'#7#6
+'clNone'#11'ParentColor'#8#4'Left'#2#16#6'Height'#2#14#3'Top'#2#13#5'Width'#2
+'N'#0#0#12'TColorButton'#16'ColorButtonPaper'#11'BorderWidth'#2#2#15'ButtonC'
+'olorSize'#2#16#11'ButtonColor'#7#7'clWhite'#7'Caption'#6#9'Change...'#5'Col'
+'or'#7#9'clBtnFace'#14'OnColorChanged'#7#28'ColorButtonPaperColorChanged'#4
+'Left'#3#148#0#6'Height'#2#25#3'Top'#3#135#0#5'Width'#2'P'#0#0#5'TEdit'#10'E'
+'ditHeight'#8'OnChange'#7#16'EditHeightChange'#9'OnKeyDown'#13#8'TabOrder'#2
+#0#4'Text'#6#3'512'#4'Left'#3#148#0#6'Height'#2#23#3'Top'#2'J'#5'Width'#2'P'
+#0#0#7'TUpDown'#11'UpDownWidth'#9'Associate'#7#9'EditWidth'#3'Min'#2#1#3'Max'
+#3#0#16#8'Position'#3#0#2#9'Thousands'#8#4'Left'#3#228#0#6'Height'#2#23#3'To'
+'p'#2'&'#5'Width'#2#17#0#0#7'TUpDown'#12'UpDownHeight'#9'Associate'#7#10'Edi'
+'tHeight'#3'Min'#2#1#3'Max'#3#0#16#8'Position'#3#0#2#9'Thousands'#8#4'Left'#3
+#228#0#6'Height'#2#23#3'Top'#2'J'#5'Width'#2#17#0#0#9'TCheckBox'#19'CheckBox'
+'AspectRatio'#7'Caption'#6#21'Preserve aspect ratio'#7'Checked'#9#8'OnChange'
+#7#25'CheckBoxAspectRatioChange'#5'State'#7#9'cbChecked'#8'TabOrder'#2#1#4'L'
+'eft'#2#16#6'Height'#2#13#3'Top'#2'n'#5'Width'#2'x'#0#0#9'TComboBox'#23'Comb'
+'oBoxPicturePosition'#16'AutoCompleteText'#11#22'cbactEndOfLineComplete'#20
+'cbactSearchAscending'#0#9'ItemIndex'#2#0#13'Items.Strings'#1#6#8'Top Left'#6
+#10'Top Center'#6#9'Top Right'#6#11'Center Left'#6#8'Centered'#6#12'Center R'
+'ight'#6#11'Bottom Left'#6#13'Bottom Center'#6#12'Bottom Right'#0#9'MaxLengt'
+'h'#2#0#8'OnChange'#7#29'ComboBoxPicturePositionChange'#5'Style'#7#14'csDrop'
+'DownList'#8'TabOrder'#2#2#4'Text'#6#8'Top Left'#4'Left'#3#148#0#6'Height'#2
+#21#3'Top'#2#8#5'Width'#2'`'#0#0#5'TEdit'#9'EditWidth'#8'OnChange'#7#15'Edit'
+'WidthChange'#9'OnKeyDown'#13#8'TabOrder'#2#3#4'Text'#6#3'512'#4'Left'#3#148
+#0#6'Height'#2#23#3'Top'#2'&'#5'Width'#2'P'#0#0#0#7'TButton'#8'ButtonOK'#7'A'
+'nchors'#11#7'akRight'#8'akBottom'#0#25'BorderSpacing.InnerBorder'#2#4#7'Cap'
+'tion'#6#2'OK'#7'Default'#9#11'ModalResult'#2#1#8'TabOrder'#2#2#4'Left'#2'p'
+#6'Height'#2#25#3'Top'#3#218#1#5'Width'#2'K'#0#0#7'TButton'#12'ButtonCancel'
+#7'Anchors'#11#7'akRight'#8'akBottom'#0#25'BorderSpacing.InnerBorder'#2#4#6
+'Cancel'#9#7'Caption'#6#6'Cancel'#11'ModalResult'#2#2#8'TabOrder'#2#3#4'Left'
+#3#193#0#6'Height'#2#25#3'Top'#3#218#1#5'Width'#2'K'#0#0#0
'TPF0'#241#22'TResizePaperDialogForm'#21'ResizePaperDialogForm'#6'Height'#3
+#251#1#5'Width'#3#20#1#18'HorzScrollBar.Page'#3#19#1#18'VertScrollBar.Page'#3
+#250#1#13'ActiveControl'#7#10'EditHeight'#7'Caption'#6#12'Resize paper'#12'C'
+'lientHeight'#3#251#1#11'ClientWidth'#3#20#1#8'OnCreate'#7#10'FormCreate'#9
+'OnDestroy'#7#11'FormDestroy'#0#6'TPanel'#12'PanelPreview'#4'Left'#2#6#6'Hei'
+'ght'#3#8#1#3'Top'#2#6#5'Width'#3#8#1#7'Anchors'#11#5'akTop'#6'akLeft'#7'akR'
+'ight'#8'akBottom'#0#10'BevelOuter'#7#6'bvNone'#5'Color'#7#7'clBlack'#11'Ful'
+'lRepaint'#8#11'ParentColor'#8#8'TabOrder'#2#0#0#0#9'TGroupBox'#18'GroupBoxP'
+'roperties'#4'Left'#2#6#6'Height'#3#186#0#3'Top'#3#24#1#5'Width'#3#8#1#7'Anc'
+'hors'#11#6'akLeft'#7'akRight'#8'akBottom'#0#7'Caption'#6#10'Properties'#12
+'ClientHeight'#3#168#0#11'ClientWidth'#3#4#1#8'TabOrder'#2#1#0#6'TLabel'#10
+'LabelWidth'#4'Left'#2#16#6'Height'#2#14#3'Top'#2','#5'Width'#2'>'#7'Caption'
+#6#12'Paper width:'#11'ParentColor'#8#0#0#6'TLabel'#11'LabelHeight'#4'Left'#2
+#16#6'Height'#2#14#3'Top'#2'P'#5'Width'#2'B'#7'Caption'#6#13'Paper height:'
+#11'ParentColor'#8#0#0#6'TLabel'#15'LabelPaperColor'#4'Left'#2#16#6'Height'#2
+#14#3'Top'#3#140#0#5'Width'#2';'#7'Caption'#6#12'Paper color:'#11'ParentColo'
+'r'#8#0#0#6'TLabel'#20'LabelPicturePosition'#4'Left'#2#16#6'Height'#2#14#3'T'
+'op'#2#13#5'Width'#2'N'#7'Caption'#6#17'Picture position:'#11'ParentColor'#8
+#0#0#12'TColorButton'#16'ColorButtonPaper'#4'Left'#3#148#0#6'Height'#2#25#3
+'Top'#3#135#0#5'Width'#2'P'#11'BorderWidth'#2#2#15'ButtonColorSize'#2#16#11
+'ButtonColor'#7#7'clWhite'#7'Caption'#6#9'Change...'#5'Color'#7#9'clBtnFace'
+#14'OnColorChanged'#7#28'ColorButtonPaperColorChanged'#0#0#5'TEdit'#10'EditH'
+'eight'#4'Left'#3#148#0#6'Height'#2#23#3'Top'#2'J'#5'Width'#2'P'#8'OnChange'
+#7#16'EditHeightChange'#9'OnKeyDown'#13#8'TabOrder'#2#0#4'Text'#6#3'512'#0#0
+#7'TUpDown'#11'UpDownWidth'#4'Left'#3#228#0#6'Height'#2#23#3'Top'#2'&'#5'Wid'
+'th'#2#17#9'Associate'#7#9'EditWidth'#3'Min'#2#1#3'Max'#3#0#16#8'Position'#3
+#0#2#9'Thousands'#8#0#0#7'TUpDown'#12'UpDownHeight'#4'Left'#3#228#0#6'Height'
+#2#23#3'Top'#2'J'#5'Width'#2#17#9'Associate'#7#10'EditHeight'#3'Min'#2#1#3'M'
+'ax'#3#0#16#8'Position'#3#0#2#9'Thousands'#8#0#0#9'TCheckBox'#19'CheckBoxAsp'
+'ectRatio'#4'Left'#2#16#6'Height'#2#13#3'Top'#2'n'#5'Width'#2'x'#7'Caption'#6
+#21'Preserve aspect ratio'#7'Checked'#9#8'OnChange'#7#25'CheckBoxAspectRatio'
+'Change'#5'State'#7#9'cbChecked'#8'TabOrder'#2#1#0#0#9'TComboBox'#23'ComboBo'
+'xPicturePosition'#4'Left'#3#148#0#6'Height'#2#21#3'Top'#2#8#5'Width'#2'`'#16
+'AutoCompleteText'#11#22'cbactEndOfLineComplete'#20'cbactSearchAscending'#0
+#10'ItemHeight'#2#13#9'ItemIndex'#2#0#13'Items.Strings'#1#6#8'Top Left'#6#10
+'Top Center'#6#9'Top Right'#6#11'Center Left'#6#8'Centered'#6#12'Center Righ'
+'t'#6#11'Bottom Left'#6#13'Bottom Center'#6#12'Bottom Right'#0#9'MaxLength'#2
+#0#8'OnChange'#7#29'ComboBoxPicturePositionChange'#5'Style'#7#14'csDropDownL'
+'ist'#8'TabOrder'#2#2#4'Text'#6#8'Top Left'#0#0#5'TEdit'#9'EditWidth'#4'Left'
+#3#148#0#6'Height'#2#23#3'Top'#2'&'#5'Width'#2'P'#8'OnChange'#7#15'EditWidth'
+'Change'#9'OnKeyDown'#13#8'TabOrder'#2#3#4'Text'#6#3'512'#0#0#0#7'TButton'#8
+'ButtonOK'#4'Left'#2'p'#6'Height'#2#25#3'Top'#3#218#1#5'Width'#2'K'#7'Anchor'
+'s'#11#7'akRight'#8'akBottom'#0#25'BorderSpacing.InnerBorder'#2#4#7'Caption'
+#6#2'OK'#7'Default'#9#11'ModalResult'#2#1#8'TabOrder'#2#2#0#0#7'TButton'#12
+'ButtonCancel'#4'Left'#3#193#0#6'Height'#2#25#3'Top'#3#218#1#5'Width'#2'K'#7
+'Anchors'#11#7'akRight'#8'akBottom'#0#25'BorderSpacing.InnerBorder'#2#4#6'Ca'
+'ncel'#9#7'Caption'#6#6'Cancel'#11'ModalResult'#2#2#8'TabOrder'#2#3#0#0#0
]);