fixes after bitmap rewrite

git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@495 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
tomb0 2008-06-28 14:25:53 +00:00
parent 24c0de27b9
commit c50e7b7180
9 changed files with 10923 additions and 6289 deletions

View File

@ -2,13 +2,13 @@
<CONFIG>
<ProjectOptions>
<PathDelim Value="\"/>
<Version Value="5"/>
<Version Value="6"/>
<General>
<MainUnit Value="0"/>
<IconPath Value="./"/>
<TargetFileExt Value=".exe"/>
<Title Value="Lazarus Icon Editor"/>
<ActiveEditorIndexAtStart Value="11"/>
<ActiveEditorIndexAtStart Value="0"/>
</General>
<VersionInfo>
<CurrentMajorRevNr Value="1"/>
@ -27,26 +27,23 @@
<LaunchingApplication PathPlusParams="\usr\X11R6\bin\xterm -T 'Lazarus Run Output' -e $(LazarusDir)\tools\runwait.sh $(TargetCmdLine)"/>
</local>
</RunParams>
<RequiredPackages Count="4">
<RequiredPackages Count="3">
<Item1>
<PackageName Value="LCL"/>
<PackageName Value="LazColorPalette"/>
</Item1>
<Item2>
<PackageName Value="LazRGBGraphics"/>
</Item2>
<Item3>
<PackageName Value="LazColorPalette"/>
<PackageName Value="LCL"/>
</Item3>
<Item4>
<PackageName Value="JPEGForLazarus"/>
</Item4>
</RequiredPackages>
<Units Count="136">
<Units Count="137">
<Unit0>
<Filename Value="laziconeditor.lpr"/>
<IsPartOfProject Value="True"/>
<UnitName Value="laziconeditor"/>
<CursorPos X="8" Y="27"/>
<CursorPos X="77" Y="11"/>
<TopLine Value="4"/>
<EditorIndex Value="2"/>
<UsageCount Value="146"/>
@ -56,10 +53,11 @@
<Filename Value="main.pas"/>
<ComponentName Value="MainForm"/>
<IsPartOfProject Value="True"/>
<ResourceBaseClass Value="Form"/>
<ResourceFilename Value="main.lrs"/>
<UnitName Value="Main"/>
<CursorPos X="88" Y="843"/>
<TopLine Value="831"/>
<CursorPos X="27" Y="43"/>
<TopLine Value="33"/>
<EditorIndex Value="0"/>
<UsageCount Value="146"/>
<Loaded Value="True"/>
@ -75,6 +73,7 @@
<Filename Value="preview.pas"/>
<ComponentName Value="PreviewForm"/>
<IsPartOfProject Value="True"/>
<ResourceBaseClass Value="Form"/>
<ResourceFilename Value="preview.lrs"/>
<UnitName Value="Preview"/>
<CursorPos X="23" Y="66"/>
@ -87,8 +86,8 @@
<Filename Value="picturemanager.pas"/>
<IsPartOfProject Value="True"/>
<UnitName Value="PictureManager"/>
<CursorPos X="31" Y="260"/>
<TopLine Value="234"/>
<CursorPos X="35" Y="252"/>
<TopLine Value="238"/>
<EditorIndex Value="6"/>
<UsageCount Value="146"/>
<Loaded Value="True"/>
@ -117,9 +116,9 @@
<Filename Value="picturectrls.pas"/>
<IsPartOfProject Value="True"/>
<UnitName Value="PictureCtrls"/>
<CursorPos X="3" Y="358"/>
<TopLine Value="337"/>
<EditorIndex Value="9"/>
<CursorPos X="36" Y="516"/>
<TopLine Value="513"/>
<EditorIndex Value="10"/>
<UsageCount Value="144"/>
<Loaded Value="True"/>
</Unit8>
@ -141,7 +140,7 @@
<UnitName Value="Controls"/>
<CursorPos X="22" Y="1623"/>
<TopLine Value="1607"/>
<EditorIndex Value="10"/>
<EditorIndex Value="12"/>
<UsageCount Value="10"/>
<Loaded Value="True"/>
</Unit11>
@ -159,13 +158,13 @@
<UsageCount Value="10"/>
</Unit13>
<Unit14>
<Filename Value="..\..\Programs\lazarus\fpcsrc\rtl\inc\systemh.inc"/>
<Filename Value="..\Programs\lazarus\fpcsrc\rtl\inc\systemh.inc"/>
<CursorPos X="11" Y="415"/>
<TopLine Value="401"/>
<UsageCount Value="7"/>
</Unit14>
<Unit15>
<Filename Value="..\..\Programs\lazarus\fpcsrc\rtl\inc\generic.inc"/>
<Filename Value="..\Programs\lazarus\fpcsrc\rtl\inc\generic.inc"/>
<CursorPos X="3" Y="79"/>
<TopLine Value="40"/>
<UsageCount Value="7"/>
@ -174,6 +173,7 @@
<Filename Value="test.pas"/>
<ComponentName Value="TestForm"/>
<IsPartOfProject Value="True"/>
<ResourceBaseClass Value="Form"/>
<ResourceFilename Value="test.lrs"/>
<UnitName Value="Test"/>
<CursorPos X="11" Y="79"/>
@ -185,18 +185,20 @@
<Unit17>
<Filename Value="..\lazarus\lcl\graphics.pp"/>
<UnitName Value="Graphics"/>
<CursorPos X="3" Y="1897"/>
<TopLine Value="1895"/>
<CursorPos X="14" Y="1489"/>
<TopLine Value="1477"/>
<EditorIndex Value="7"/>
<UsageCount Value="12"/>
<Loaded Value="True"/>
</Unit17>
<Unit18>
<Filename Value="..\..\Programs\lazarus\fpcsrc\rtl\inc\system.inc"/>
<Filename Value="..\Programs\lazarus\fpcsrc\rtl\inc\system.inc"/>
<CursorPos X="3" Y="191"/>
<TopLine Value="189"/>
<UsageCount Value="7"/>
</Unit18>
<Unit19>
<Filename Value="..\..\Programs\lazarus\fpcsrc\rtl\inc\mathh.inc"/>
<Filename Value="..\Programs\lazarus\fpcsrc\rtl\inc\mathh.inc"/>
<CursorPos X="15" Y="50"/>
<TopLine Value="36"/>
<UsageCount Value="7"/>
@ -209,7 +211,7 @@
<UsageCount Value="53"/>
</Unit20>
<Unit21>
<Filename Value="..\..\Programs\lazarus\fpcsrc\rtl\win32\wininc\struct.inc"/>
<Filename Value="..\Programs\lazarus\fpcsrc\rtl\win32\wininc\struct.inc"/>
<CursorPos X="33" Y="225"/>
<TopLine Value="210"/>
<UsageCount Value="7"/>
@ -229,14 +231,14 @@
<UsageCount Value="10"/>
</Unit23>
<Unit24>
<Filename Value="..\..\Programs\lazarus\fpcsrc\fcl\image\fpimage.pp"/>
<Filename Value="..\Programs\lazarus\fpcsrc\fcl\image\fpimage.pp"/>
<UnitName Value="FPimage"/>
<CursorPos X="18" Y="107"/>
<TopLine Value="92"/>
<UsageCount Value="7"/>
</Unit24>
<Unit25>
<Filename Value="..\..\Programs\lazarus\fpcsrc\fcl\image\fpimage.inc"/>
<Filename Value="..\Programs\lazarus\fpcsrc\fcl\image\fpimage.inc"/>
<CursorPos X="3" Y="327"/>
<TopLine Value="325"/>
<UsageCount Value="7"/>
@ -270,19 +272,19 @@
<UsageCount Value="10"/>
</Unit29>
<Unit30>
<Filename Value="..\..\Programs\lazarus\fpcsrc\rtl\objpas\sysutils\sysstrh.inc"/>
<Filename Value="..\Programs\lazarus\fpcsrc\rtl\objpas\sysutils\sysstrh.inc"/>
<CursorPos X="11" Y="114"/>
<TopLine Value="99"/>
<UsageCount Value="7"/>
</Unit30>
<Unit31>
<Filename Value="..\..\Programs\lazarus\fpcsrc\rtl\objpas\sysutils\sysstr.inc"/>
<Filename Value="..\Programs\lazarus\fpcsrc\rtl\objpas\sysutils\sysstr.inc"/>
<CursorPos X="11" Y="863"/>
<TopLine Value="856"/>
<UsageCount Value="7"/>
</Unit31>
<Unit32>
<Filename Value="..\..\Programs\lazarus\fpcsrc\rtl\win32\wininc\defines.inc"/>
<Filename Value="..\Programs\lazarus\fpcsrc\rtl\win32\wininc\defines.inc"/>
<CursorPos X="18" Y="2578"/>
<TopLine Value="2565"/>
<UsageCount Value="7"/>
@ -352,13 +354,13 @@
<UsageCount Value="10"/>
</Unit42>
<Unit43>
<Filename Value="..\..\Programs\lazarus\fpcsrc\rtl\objpas\sysutils\sysformt.inc"/>
<Filename Value="..\Programs\lazarus\fpcsrc\rtl\objpas\sysutils\sysformt.inc"/>
<CursorPos X="1" Y="1"/>
<TopLine Value="306"/>
<UsageCount Value="7"/>
</Unit43>
<Unit44>
<Filename Value="..\..\Programs\lazarus\fpcsrc\fcl\inc\contnrs.pp"/>
<Filename Value="..\Programs\lazarus\fpcsrc\fcl\inc\contnrs.pp"/>
<UnitName Value="contnrs"/>
<CursorPos X="20" Y="126"/>
<TopLine Value="114"/>
@ -423,11 +425,12 @@
<Filename Value="newdialog.pas"/>
<ComponentName Value="NewDialogForm"/>
<IsPartOfProject Value="True"/>
<ResourceBaseClass Value="Form"/>
<ResourceFilename Value="newdialog.lrs"/>
<UnitName Value="NewDialog"/>
<CursorPos X="31" Y="34"/>
<TopLine Value="20"/>
<EditorIndex Value="7"/>
<EditorIndex Value="8"/>
<UsageCount Value="104"/>
<Loaded Value="True"/>
</Unit53>
@ -435,11 +438,12 @@
<Filename Value="resizedialog.pas"/>
<ComponentName Value="ResizeDialogForm"/>
<IsPartOfProject Value="True"/>
<ResourceBaseClass Value="Form"/>
<ResourceFilename Value="resizedialog.lrs"/>
<UnitName Value="ResizeDialog"/>
<CursorPos X="1" Y="1"/>
<TopLine Value="1"/>
<EditorIndex Value="8"/>
<EditorIndex Value="9"/>
<UsageCount Value="102"/>
<Loaded Value="True"/>
</Unit54>
@ -447,11 +451,12 @@
<Filename Value="resizepaperdialog.pas"/>
<ComponentName Value="ResizePaperDialogForm"/>
<IsPartOfProject Value="True"/>
<ResourceBaseClass Value="Form"/>
<ResourceFilename Value="resizepaperdialog.lrs"/>
<UnitName Value="ResizePaperDialog"/>
<CursorPos X="24" Y="75"/>
<CursorPos X="50" Y="83"/>
<TopLine Value="69"/>
<EditorIndex Value="11"/>
<EditorIndex Value="13"/>
<UsageCount Value="102"/>
<Loaded Value="True"/>
</Unit55>
@ -500,6 +505,7 @@
<ComponentName Value="PictureDialogForm"/>
<HasResources Value="True"/>
<IsPartOfProject Value="True"/>
<ResourceBaseClass Value="Form"/>
<ResourceFilename Value="picturedialog.lrs"/>
<UnitName Value="PictureDialog"/>
<CursorPos X="65" Y="60"/>
@ -716,6 +722,7 @@
<Filename Value="aboutdialog.pas"/>
<ComponentName Value="AboutDialogForm"/>
<IsPartOfProject Value="True"/>
<ResourceBaseClass Value="Form"/>
<ResourceFilename Value="aboutdialog.lrs"/>
<UnitName Value="AboutDialog"/>
<CursorPos X="40" Y="27"/>
@ -993,24 +1000,137 @@
<UsageCount Value="10"/>
<Loaded Value="True"/>
</Unit135>
<Unit136>
<Filename Value="..\LazRGBGraphics\rgbgraphics.pas"/>
<UnitName Value="RGBGraphics"/>
<CursorPos X="27" Y="300"/>
<TopLine Value="296"/>
<EditorIndex Value="11"/>
<UsageCount Value="10"/>
<Loaded Value="True"/>
</Unit136>
</Units>
<JumpHistory Count="4" HistoryIndex="3">
<JumpHistory Count="30" HistoryIndex="29">
<Position1>
<Filename Value="preview.pas"/>
<Caret Line="55" Column="31" TopLine="38"/>
<Filename Value="picturemanager.pas"/>
<Caret Line="260" Column="31" TopLine="234"/>
</Position1>
<Position2>
<Filename Value="preview.pas"/>
<Caret Line="61" Column="3" TopLine="58"/>
<Filename Value="picturemanager.pas"/>
<Caret Line="238" Column="12" TopLine="235"/>
</Position2>
<Position3>
<Filename Value="resizepaperdialog.pas"/>
<Caret Line="185" Column="60" TopLine="171"/>
<Filename Value="picturemanager.pas"/>
<Caret Line="247" Column="34" TopLine="235"/>
</Position3>
<Position4>
<Filename Value="resizepaperdialog.pas"/>
<Caret Line="83" Column="26" TopLine="81"/>
<Filename Value="picturemanager.pas"/>
<Caret Line="254" Column="15" TopLine="242"/>
</Position4>
<Position5>
<Filename Value="picturemanager.pas"/>
<Caret Line="247" Column="31" TopLine="241"/>
</Position5>
<Position6>
<Filename Value="picturemanager.pas"/>
<Caret Line="238" Column="13" TopLine="226"/>
</Position6>
<Position7>
<Filename Value="picturemanager.pas"/>
<Caret Line="238" Column="13" TopLine="226"/>
</Position7>
<Position8>
<Filename Value="picturemanager.pas"/>
<Caret Line="247" Column="26" TopLine="235"/>
</Position8>
<Position9>
<Filename Value="picturemanager.pas"/>
<Caret Line="80" Column="46" TopLine="68"/>
</Position9>
<Position10>
<Filename Value="picturemanager.pas"/>
<Caret Line="184" Column="29" TopLine="182"/>
</Position10>
<Position11>
<Filename Value="picturemanager.pas"/>
<Caret Line="51" Column="67" TopLine="39"/>
</Position11>
<Position12>
<Filename Value="picturemanager.pas"/>
<Caret Line="380" Column="19" TopLine="368"/>
</Position12>
<Position13>
<Filename Value="picturectrls.pas"/>
<Caret Line="160" Column="47" TopLine="148"/>
</Position13>
<Position14>
<Filename Value="picturectrls.pas"/>
<Caret Line="713" Column="19" TopLine="711"/>
</Position14>
<Position15>
<Filename Value="picturectrls.pas"/>
<Caret Line="86" Column="47" TopLine="74"/>
</Position15>
<Position16>
<Filename Value="picturectrls.pas"/>
<Caret Line="516" Column="36" TopLine="513"/>
</Position16>
<Position17>
<Filename Value="..\LazRGBGraphics\rgbgraphics.pas"/>
<Caret Line="190" Column="47" TopLine="178"/>
</Position17>
<Position18>
<Filename Value="..\LazRGBGraphics\rgbgraphics.pas"/>
<Caret Line="190" Column="55" TopLine="178"/>
</Position18>
<Position19>
<Filename Value="..\LazRGBGraphics\rgbgraphics.pas"/>
<Caret Line="300" Column="27" TopLine="296"/>
</Position19>
<Position20>
<Filename Value="picturemanager.pas"/>
<Caret Line="380" Column="19" TopLine="368"/>
</Position20>
<Position21>
<Filename Value="picturemanager.pas"/>
<Caret Line="256" Column="18" TopLine="242"/>
</Position21>
<Position22>
<Filename Value="picturemanager.pas"/>
<Caret Line="252" Column="35" TopLine="238"/>
</Position22>
<Position23>
<Filename Value="main.pas"/>
<Caret Line="313" Column="26" TopLine="306"/>
</Position23>
<Position24>
<Filename Value="main.pas"/>
<Caret Line="1" Column="1" TopLine="1"/>
</Position24>
<Position25>
<Filename Value="main.pas"/>
<Caret Line="310" Column="29" TopLine="304"/>
</Position25>
<Position26>
<Filename Value="main.pas"/>
<Caret Line="320" Column="24" TopLine="302"/>
</Position26>
<Position27>
<Filename Value="main.pas"/>
<Caret Line="698" Column="30" TopLine="693"/>
</Position27>
<Position28>
<Filename Value="main.pas"/>
<Caret Line="52" Column="90" TopLine="145"/>
</Position28>
<Position29>
<Filename Value="main.pas"/>
<Caret Line="48" Column="44" TopLine="33"/>
</Position29>
<Position30>
<Filename Value="main.pas"/>
<Caret Line="44" Column="20" TopLine="33"/>
</Position30>
</JumpHistory>
</ProjectOptions>
<CompilerOptions>

View File

@ -8,7 +8,7 @@ uses
{$ENDIF}{$ENDIF}
Interfaces, // this includes the LCL widgetset
Forms
{ add your units here }, main, Preview, PictureManager, PictureCtrls, Test, JPEGForLazarus,
{ add your units here }, main, Preview, PictureManager, PictureCtrls, Test,
NewDialog, ResizeDialog, ResizePaperDialog, PictureDialog, AboutDialog,
LazRGBGraphics, LazColorPalette;

File diff suppressed because it is too large Load Diff

File diff suppressed because it is too large Load Diff

View File

@ -31,9 +31,9 @@ interface
uses
Classes, SysUtils, LResources, Forms, Controls, Graphics, Dialogs, Menus,
ExtCtrls, ComCtrls, ActnList, StdActns, ExtDlgs, Buttons, StdCtrls, LazJPEG,
ExtCtrls, ComCtrls, ActnList, StdActns, ExtDlgs, Buttons, StdCtrls,
NewDialog, ResizeDialog, ResizePaperDialog, AboutDialog, Preview,
PictureManager, RGBGraphics, PictureCtrls, ColorPalette;
type
@ -42,8 +42,6 @@ type
TMainForm = class(TForm)
Palette: TColorPalette;
ImageListActionsDisabled: TImageList;
ImageListToolsDisabled: TImageList;
MenuItemShowGrid: TMenuItem;
MenuItemShowPreview: TMenuItem;
ViewShowPreview: TAction;

View File

@ -83,7 +83,7 @@ type
function PictureToClient(const R: TRect): TRect;
procedure LoadPicture(const FileName: String); virtual;
procedure LoadBitmap(ABitmap: TBitmap); virtual;
procedure LoadBitmap(ABitmap: TRasterImage); virtual;
procedure SavePicture(const FileName: String); virtual;
procedure ExportPictureAsLazarusResource(const AFileName, AName: String); virtual;
@ -157,7 +157,7 @@ type
procedure NewPicture(AWidth, AHeight: Integer; APaperColor: TColor);
procedure LoadPicture(const FileName: String); override;
procedure LoadBitmap(ABitmap: TBitmap); override;
procedure LoadBitmap(ABitmap: TRasterImage); override;
procedure SavePicture(const FileName: String); override;
procedure ColorPick(X, Y: Integer; Shift: TShiftState = [ssLeft]);
@ -510,7 +510,7 @@ begin
Picture := TPictureBitmap.CreateFromFile(FileName);
end;
procedure TCustomPictureView.LoadBitmap(ABitmap: TBitmap);
procedure TCustomPictureView.LoadBitmap(ABitmap: TRasterImage);
begin
Picture.Free;
Picture := TPictureBitmap.CreateFromBitmap(ABitmap);
@ -708,7 +708,7 @@ begin
Change;
end;
procedure TCustomPictureEdit.LoadBitmap(ABitmap: TBitmap);
procedure TCustomPictureEdit.LoadBitmap(ABitmap: TRasterImage);
begin
inherited LoadBitmap(ABitmap);
FModified := False;

View File

@ -48,7 +48,7 @@ type
constructor Create(TheOwner: TComponent; AWidth, AHeight: Integer;
APaperColor: TColor);
constructor Create(TheOwner: TComponent; const AFilename: String);
constructor Create(TheOwner: TComponent; ABitmap: TBitmap);
constructor Create(TheOwner: TComponent; ABitmap: TRasterImage);
procedure Save;
procedure ExportAsLazarusResource(const AFileName, AName: String);
@ -77,7 +77,7 @@ type
protected
function CreatePage(AWidth, AHeight: Integer; APaperColor: TColor): TPicturePage; dynamic;
function CreatePage(const Filename: String): TPicturePage; dynamic;
function CreatePage(ABitmap: TBitmap): TPicturePage; dynamic;
function CreatePage(ABitmap: TRasterImage): TPicturePage; dynamic;
procedure SaveAs; dynamic;
procedure FileNameChange; dynamic;
procedure PageClose; dynamic;
@ -179,7 +179,7 @@ begin
FileNameChange;
end;
function TPictureManager.CreatePage(ABitmap: TBitmap): TPicturePage;
function TPictureManager.CreatePage(ABitmap: TRasterImage): TPicturePage;
begin
Result := TPicturePage.Create(Self, ABitmap);
Result.PageControl := Self;
@ -244,22 +244,17 @@ begin
try
// First image in std bitmap
Icon.LoadFromFile(FileName);
NewPage := CreatePage(Icon as TBitmap);
NewPage.Parent := Self;
ActivePage := NewPage;
NewPage.Caption := FindNewUniqueName;
Change;
// other image in Bimaps if assigned
if Icon.Bitmaps <> nil then
for I := 0 to Pred(Icon.Bitmaps.Count) do
begin
NewPage := CreatePage(Icon.Bitmaps[I] as TBitmap);
NewPage.Parent := Self;
ActivePage := NewPage;
NewPage.Caption := FindNewUniqueName;
Change;
end;
// other images
for I := 0 to Pred(Icon.Count) do
begin
Icon.Current := I;
NewPage := CreatePage(Icon);
NewPage.Parent := Self;
ActivePage := NewPage;
NewPage.Caption := FindNewUniqueName;
Change;
end;
finally
Icon.Free;
end;
@ -370,7 +365,7 @@ begin
FShowPreview := True;
end;
constructor TPicturePage.Create(TheOwner: TComponent; ABitmap: TBitmap);
constructor TPicturePage.Create(TheOwner: TComponent; ABitmap: TRasterImage);
begin
inherited Create(TheOwner);

View File

@ -1,15 +1,13 @@
inherited ResizePaperDialogForm: TResizePaperDialogForm
Height = 507
Width = 276
HorzScrollBar.Page = 275
VertScrollBar.Page = 506
ActiveControl = EditHeight
ActiveControl = GroupBoxProperties
Caption = 'Resize paper'
ClientHeight = 507
ClientWidth = 276
OnCreate = FormCreate
OnDestroy = FormDestroy
object PanelPreview: TPanel
object PanelPreview: TPanel[0]
Left = 6
Height = 264
Top = 6
@ -21,10 +19,10 @@ inherited ResizePaperDialogForm: TResizePaperDialogForm
ParentColor = False
TabOrder = 0
end
object GroupBoxProperties: TGroupBox
Left = 6
object GroupBoxProperties: TGroupBox[1]
Left = 12
Height = 186
Top = 280
Top = 276
Width = 264
Anchors = [akLeft, akRight, akBottom]
Caption = 'Properties'
@ -94,6 +92,7 @@ inherited ResizePaperDialogForm: TResizePaperDialogForm
Min = 1
Max = 4096
Position = 512
TabOrder = 4
Thousands = False
end
object UpDownHeight: TUpDown
@ -105,13 +104,14 @@ inherited ResizePaperDialogForm: TResizePaperDialogForm
Min = 1
Max = 4096
Position = 512
TabOrder = 5
Thousands = False
end
object CheckBoxAspectRatio: TCheckBox
Left = 16
Height = 13
Height = 19
Top = 110
Width = 120
Width = 126
Caption = 'Preserve aspect ratio'
Checked = True
OnChange = CheckBoxAspectRatioChange
@ -154,7 +154,7 @@ inherited ResizePaperDialogForm: TResizePaperDialogForm
Text = '512'
end
end
object ButtonOK: TButton
object ButtonOK: TButton[2]
Left = 112
Height = 25
Top = 474
@ -166,7 +166,7 @@ inherited ResizePaperDialogForm: TResizePaperDialogForm
ModalResult = 1
TabOrder = 2
end
object ButtonCancel: TButton
object ButtonCancel: TButton[3]
Left = 193
Height = 25
Top = 474

View File

@ -2,50 +2,98 @@
LazarusResources.Add('TResizePaperDialogForm','FORMDATA',[
'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
+#251#1#5'Width'#3#20#1#13'ActiveControl'#7#18'GroupBoxProperties'#7'Caption'
+#6#12'Resize paper'#12'ClientHeight'#3#251#1#11'ClientWidth'#3#20#1#8'OnCrea'
+'te'#7#10'FormCreate'#9'OnDestroy'#7#11'FormDestroy'#0#242#2#0#6'TPanel'#12
+'PanelPreview'#4'Left'#2#6#6'Height'#3#8#1#3'Top'#2#6#5'Width'#3#8#1#7'Ancho'
+'rs'#11#5'akTop'#6'akLeft'#7'akRight'#8'akBottom'#0#10'BevelOuter'#7#6'bvNon'
+'e'#5'Color'#7#7'clBlack'#11'FullRepaint'#8#11'ParentColor'#8#8'TabOrder'#2#0
+#0#0#242#2#1#9'TGroupBox'#18'GroupBoxProperties'#4'Left'#2#12#6'Height'#3#186
+#0#3'Top'#3#20#1#5'Width'#3#8#1#7'Anchors'#11#6'akLeft'#7'akRight'#8'akBotto'
+'m'#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'LabelP'
+'aperColor'#4'Left'#2#16#6'Height'#2#14#3'Top'#3#140#0#5'Width'#2';'#7'Capti'
+'on'#6#12'Paper color:'#11'ParentColor'#8#0#0#6'TLabel'#20'LabelPicturePosit'
+'ion'#4'Left'#2#16#6'Height'#2#14#3'Top'#2#13#5'Width'#2'N'#7'Caption'#6#17
+'Picture position:'#11'ParentColor'#8#0#0#12'TColorButton'#16'ColorButtonPap'
+'er'#4'Left'#3#148#0#6'Height'#2#25#3'Top'#3#135#0#5'Width'#2'P'#11'BorderWi'
+'dth'#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'ColorButtonPap'
+'erColorChanged'#0#0#5'TEdit'#10'EditHeight'#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'Width'#2#17#9'Associate'#7#9'EditWidth'#3'Mi'
+'n'#2#1#3'Max'#3#0#16#8'Position'#3#0#2#8'TabOrder'#2#4#9'Thousands'#8#0#0#7
+'TUpDown'#12'UpDownHeight'#4'Left'#3#228#0#6'Height'#2#23#3'Top'#2'J'#5'Widt'
+'h'#2#17#9'Associate'#7#10'EditHeight'#3'Min'#2#1#3'Max'#3#0#16#8'Position'#3
+#0#2#8'TabOrder'#2#5#9'Thousands'#8#0#0#9'TCheckBox'#19'CheckBoxAspectRatio'
+#4'Left'#2#16#6'Height'#2#19#3'Top'#2'n'#5'Width'#2'~'#7'Caption'#6#21'Prese'
+'rve aspect ratio'#7'Checked'#9#8'OnChange'#7#25'CheckBoxAspectRatioChange'#5
+'State'#7#9'cbChecked'#8'TabOrder'#2#1#0#0#9'TComboBox'#23'ComboBoxPicturePo'
+'sition'#4'Left'#3#148#0#6'Height'#2#21#3'Top'#2#8#5'Width'#2'`'#16'AutoComp'
+'leteText'#11#22'cbactEndOfLineComplete'#20'cbactSearchAscending'#0#10'ItemH'
+'eight'#2#13#9'ItemIndex'#2#0#13'Items.Strings'#1#6#8'Top Left'#6#10'Top Cen'
+'ter'#6#9'Top Right'#6#11'Center Left'#6#8'Centered'#6#12'Center Right'#6#11
+'Bottom Left'#6#13'Bottom Center'#6#12'Bottom Right'#0#9'MaxLength'#2#0#8'On'
+'Change'#7#29'ComboBoxPicturePositionChange'#5'Style'#7#14'csDropDownList'#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'EditWidthChange'
+#9'OnKeyDown'#13#8'TabOrder'#2#3#4'Text'#6#3'512'#0#0#0#242#2#2#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
+#6#2'OK'#7'Default'#9#11'ModalResult'#2#1#8'TabOrder'#2#2#0#0#242#2#3#7'TBut'
+'ton'#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'Cancel'#9#7'Caption'#6#6'Cancel'#11'ModalResult'#2#2#8'TabOrder'#2#3#0#0
+#0#241#22'TResizePaperDialogForm'#21'ResizePaperDialogForm'#6'Height'#3#251#1
+#5'Width'#3#20#1#13'ActiveControl'#7#18'GroupBoxProperties'#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'FormDestroy'#0#242#2#0#6'TPanel'#12'PanelP'
+'review'#4'Left'#2#6#6'Height'#3#8#1#3'Top'#2#6#5'Width'#3#8#1#7'Anchors'#11
+#5'akTop'#6'akLeft'#7'akRight'#8'akBottom'#0#10'BevelOuter'#7#6'bvNone'#5'Co'
+'lor'#7#7'clBlack'#11'FullRepaint'#8#11'ParentColor'#8#8'TabOrder'#2#0#0#0
+#242#2#1#9'TGroupBox'#18'GroupBoxProperties'#4'Left'#2#12#6'Height'#3#186#0#3
+'Top'#3#20#1#5'Width'#3#8#1#7'Anchors'#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'TL'
+'abel'#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'LabelPape'
+'rColor'#4'Left'#2#16#6'Height'#2#14#3'Top'#3#140#0#5'Width'#2';'#7'Caption'
+#6#12'Paper color:'#11'ParentColor'#8#0#0#6'TLabel'#20'LabelPicturePosition'
+#4'Left'#2#16#6'Height'#2#14#3'Top'#2#13#5'Width'#2'N'#7'Caption'#6#17'Pictu'
,'re 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'Chan'
+'ge...'#5'Color'#7#9'clBtnFace'#14'OnColorChanged'#7#28'ColorButtonPaperColo'
+'rChanged'#0#0#5'TEdit'#10'EditHeight'#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'Tab'
+'Order'#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'Width'#2#17#9'Associate'#7#9'EditWidth'#3'Min'#2
+#1#3'Max'#3#0#16#8'Position'#3#0#2#8'TabOrder'#2#4#9'Thousands'#8#0#0#7'TUpD'
+'own'#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'Max'#3#0#16#8'Position'#3#0#2
+#8'TabOrder'#2#5#9'Thousands'#8#0#0#9'TCheckBox'#19'CheckBoxAspectRatio'#4'L'
+'eft'#2#16#6'Height'#2#19#3'Top'#2'n'#5'Width'#2'~'#7'Caption'#6#21'Preserve'
+' aspect ratio'#7'Checked'#9#8'OnChange'#7#25'CheckBoxAspectRatioChange'#5'S'
+'tate'#7#9'cbChecked'#8'TabOrder'#2#1#0#0#9'TComboBox'#23'ComboBoxPicturePos'
+'ition'#4'Left'#3#148#0#6'Height'#2#21#3'Top'#2#8#5'Width'#2'`'#16'AutoCompl'
+'eteText'#11#22'cbactEndOfLineComplete'#20'cbactSearchAscending'#0#10'ItemHe'
+'ight'#2#13#9'ItemIndex'#2#0#13'Items.Strings'#1#6#8'Top Left'#6#10'Top Cent'
+'er'#6#9'Top Right'#6#11'Center Left'#6#8'Centered'#6#12'Center Right'#6#11
+'Bottom Left'#6#13'Bottom Center'#6#12'Bottom Right'#0#9'MaxLength'#2#0#8'On'
+'Change'#7#29'ComboBoxPicturePositionChange'#5'Style'#7#14'csDropDownList'#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'EditWidthChange'
+#9'OnKeyDown'#13#8'TabOrder'#2#3#4'Text'#6#3'512'#0#0#0#242#2#2#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#242#2#3#7'TBut'
+'ton'#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'Cancel'#9#7'Caption'#6#6'Cancel'#11'ModalResult'#2#2#8'TabOrder'#2#3#0#0
+#0
]);