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

Regular Polygon is coming.

Browse Source 
git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@1637 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
yangjixian
2011-05-19 04:32:37 +00:00
parent fd2177c6c0
commit 226a71dfb3
7 changed files with 306 additions and 213 deletions
Download Patch File Download Diff File Expand all files Collapse all files

1
applications/lazimageeditor/DLBitmap.pas
View File

@ -147,6 +147,7 @@ function DWordTrans(SrcRow: TRGBATriple): DWORD;
function DWordToTriple(SrcRow: DWORD): TRGBATriple;
procedure StretchLinear(Dest, Src: TDLBitmap);
procedure StretchDLBMP(ACanvas: TCanvas; Src: TDLBitmap; NewLeft, NewTop, NewWidth, NewHeight: integer);
procedure DrawRegularPolygon(aCanvas: TCanvas; Center, ThePoint: TPoint; Count: integer);
implementation

43
applications/lazimageeditor/DLBmpUtils.inc
View File

@ -701,7 +701,48 @@ begin
Dest.Free;
end;
function RotatePointEx(Center, ThePoint: TPoint; Angle: Double): TPoint;
var
cosRadians: Double;
inX: Integer;
inXOriginal: Integer;
inXPrime: Integer;
inXPrimeRotated: Integer;
inY: Integer;
inYOriginal: Integer;
inYPrime: Integer;
inYPrimeRotated: Integer;
Radians: Double;
sinRadians: Double;
begin
Radians := -(Angle) * PI / 180;
sinRadians := Sin(Radians);
cosRadians := Cos(Radians);
inX := ThePoint.X;
inY := ThePoint.Y;
inXPrime := 2 * (inX - Center.y) + 1;
inYPrime := 2 * (inY - Center.x) + 1;
inYPrimeRotated := Round(inYPrime * CosRadians - inXPrime * sinRadians);
inXPrimeRotated := Round(inYPrime * sinRadians + inXPrime * cosRadians);
inYOriginal := (inYPrimeRotated - 1) div 2 + Center.x;
inXOriginal := (inXPrimeRotated - 1) div 2 + Center.y;
Result := Point(inXOriginal, inYOriginal);
end;
procedure DrawRegularPolygon(aCanvas: TCanvas; Center, ThePoint: TPoint; Count: integer);
var Angle: Double; paddr: array of TPoint; TmpPoint: TPoint; i: integer;
begin
SetLength(paddr, Count);
//这是个五角星 Angle := Round(1080 / Count);
Angle := Round(360 / Count);
TmpPoint := ThePoint;
for i := 0 to Count - 1 do
begin
paddr[i] := TmpPoint;
TmpPoint := RotatePointEx(Center, TmpPoint, Angle);
end;
aCanvas.Polygon(paddr);
end;

118
applications/lazimageeditor/lazimageeditor.lpi
View File

@ -58,11 +58,10 @@
<HasResources Value="True"/>
<ResourceBaseClass Value="Form"/>
<UnitName Value="Main"/>
<IsVisibleTab Value="True"/>
<EditorIndex Value="0"/>
<WindowIndex Value="0"/>
<TopLine Value="840"/>
<CursorPos X="21" Y="866"/>
<TopLine Value="336"/>
<CursorPos X="30" Y="463"/>
<UsageCount Value="86"/>
<Loaded Value="True"/>
<LoadedDesigner Value="True"/>
@ -70,10 +69,11 @@
<Unit2>
<Filename Value="picturectrls.pas"/>
<UnitName Value="PictureCtrls"/>
<IsVisibleTab Value="True"/>
<EditorIndex Value="2"/>
<WindowIndex Value="0"/>
<TopLine Value="136"/>
<CursorPos X="23" Y="167"/>
<TopLine Value="1090"/>
<CursorPos X="27" Y="1095"/>
<UsageCount Value="35"/>
<Loaded Value="True"/>
</Unit2>
@ -243,12 +243,10 @@
<Unit21>
<Filename Value="bmprgbtypes.pas"/>
<UnitName Value="BmpRGBTypes"/>
<EditorIndex Value="3"/>
<WindowIndex Value="0"/>
<TopLine Value="502"/>
<CursorPos X="39" Y="527"/>
<UsageCount Value="31"/>
<Loaded Value="True"/>
</Unit21>
<Unit22>
<Filename Value="T:\fpclaz\laz\lcl\include\winapih.inc"/>
@ -358,10 +356,10 @@
<Unit35>
<Filename Value="DLBitmap.pas"/>
<UnitName Value="DLBitmap"/>
<EditorIndex Value="4"/>
<EditorIndex Value="3"/>
<WindowIndex Value="0"/>
<TopLine Value="259"/>
<CursorPos X="9" Y="270"/>
<TopLine Value="127"/>
<CursorPos X="16" Y="127"/>
<UsageCount Value="19"/>
<Loaded Value="True"/>
</Unit35>
@ -391,10 +389,10 @@
</Unit38>
<Unit39>
<Filename Value="DLBmpUtils.inc"/>
<EditorIndex Value="5"/>
<EditorIndex Value="4"/>
<WindowIndex Value="0"/>
<TopLine Value="669"/>
<CursorPos X="48" Y="680"/>
<TopLine Value="713"/>
<CursorPos X="17" Y="730"/>
<UsageCount Value="17"/>
<Loaded Value="True"/>
</Unit39>
@ -444,123 +442,127 @@
<UsageCount Value="10"/>
</Unit45>
</Units>
<JumpHistory Count="29" HistoryIndex="28">
<JumpHistory Count="30" HistoryIndex="29">
<Position1>
<Filename Value="picturectrls.pas"/>
<Caret Line="702" Column="28" TopLine="679"/>
<Caret Line="945" Column="36" TopLine="925"/>
</Position1>
<Position2>
<Filename Value="picturectrls.pas"/>
<Caret Line="1091" Column="16" TopLine="1076"/>
<Caret Line="978" Column="77" TopLine="958"/>
</Position2>
<Position3>
<Filename Value="picturectrls.pas"/>
<Caret Line="630" Column="44" TopLine="620"/>
<Caret Line="1023" Column="36" TopLine="1006"/>
</Position3>
<Position4>
<Filename Value="picturectrls.pas"/>
<Caret Line="735" Column="9" TopLine="709"/>
<Caret Line="1084" Column="37" TopLine="1091"/>
</Position4>
<Position5>
<Filename Value="picturectrls.pas"/>
<Caret Line="186" Column="22" TopLine="167"/>
<Caret Line="25" Column="93" TopLine="22"/>
</Position5>
<Position6>
<Filename Value="picturectrls.pas"/>
<Caret Line="700" Column="22" TopLine="674"/>
<Caret Line="113" Column="65" TopLine="96"/>
</Position6>
<Position7>
<Filename Value="picturectrls.pas"/>
<Caret Line="725" Column="14" TopLine="699"/>
<Caret Line="116" Column="73" TopLine="96"/>
</Position7>
<Position8>
<Filename Value="picturectrls.pas"/>
<Caret Line="735" Column="14" TopLine="709"/>
<Caret Line="123" Column="38" TopLine="109"/>
</Position8>
<Position9>
<Filename Value="picturectrls.pas"/>
<Caret Line="752" Column="35" TopLine="726"/>
<Caret Line="186" Column="22" TopLine="175"/>
</Position9>
<Position10>
<Filename Value="picturectrls.pas"/>
<Caret Line="790" Column="27" TopLine="764"/>
<Caret Line="726" Column="23" TopLine="709"/>
</Position10>
<Position11>
<Filename Value="picturectrls.pas"/>
<Caret Line="778" Column="40" TopLine="764"/>
<Caret Line="755" Column="35" TopLine="741"/>
</Position11>
<Position12>
<Filename Value="picturectrls.pas"/>
<Caret Line="920" Column="49" TopLine="902"/>
<Caret Line="761" Column="39" TopLine="741"/>
</Position12>
<Position13>
<Filename Value="picturectrls.pas"/>
<Caret Line="1123" Column="36" TopLine="1106"/>
<Caret Line="793" Column="27" TopLine="776"/>
</Position13>
<Position14>
<Filename Value="picturectrls.pas"/>
<Caret Line="1121" Column="21" TopLine="1100"/>
<Caret Line="794" Column="19" TopLine="776"/>
</Position14>
<Position15>
<Filename Value="main.pas"/>
<Caret Line="364" Column="61" TopLine="355"/>
<Filename Value="picturectrls.pas"/>
<Caret Line="945" Column="36" TopLine="928"/>
</Position15>
<Position16>
<Filename Value="main.pas"/>
<Caret Line="495" Column="13" TopLine="469"/>
<Filename Value="picturectrls.pas"/>
<Caret Line="978" Column="77" TopLine="952"/>
</Position16>
<Position17>
<Filename Value="main.pas"/>
<Caret Line="502" Column="13" TopLine="476"/>
<Filename Value="picturectrls.pas"/>
<Caret Line="1023" Column="36" TopLine="997"/>
</Position17>
<Position18>
<Filename Value="main.pas"/>
<Caret Line="510" Column="13" TopLine="484"/>
<Filename Value="picturectrls.pas"/>
<Caret Line="1084" Column="37" TopLine="1079"/>
</Position18>
<Position19>
<Filename Value="main.pas"/>
<Caret Line="569" Column="13" TopLine="543"/>
<Filename Value="picturectrls.pas"/>
<Caret Line="1095" Column="27" TopLine="1079"/>
</Position19>
<Position20>
<Filename Value="main.pas"/>
<Caret Line="576" Column="13" TopLine="550"/>
<Filename Value="picturectrls.pas"/>
<Caret Line="1118" Column="50" TopLine="1101"/>
</Position20>
<Position21>
<Filename Value="main.pas"/>
<Caret Line="597" Column="13" TopLine="571"/>
<Filename Value="picturectrls.pas"/>
<Caret Line="473" Column="93" TopLine="463"/>
</Position21>
<Position22>
<Filename Value="main.pas"/>
<Caret Line="604" Column="13" TopLine="578"/>
<Filename Value="picturectrls.pas"/>
<Caret Line="726" Column="23" TopLine="712"/>
</Position22>
<Position23>
<Filename Value="main.pas"/>
<Caret Line="611" Column="13" TopLine="585"/>
<Filename Value="picturectrls.pas"/>
<Caret Line="755" Column="35" TopLine="744"/>
</Position23>
<Position24>
<Filename Value="main.pas"/>
<Caret Line="646" Column="13" TopLine="620"/>
<Filename Value="picturectrls.pas"/>
<Caret Line="761" Column="39" TopLine="744"/>
</Position24>
<Position25>
<Filename Value="main.pas"/>
<Caret Line="653" Column="13" TopLine="627"/>
<Filename Value="picturectrls.pas"/>
<Caret Line="793" Column="27" TopLine="767"/>
</Position25>
<Position26>
<Filename Value="main.pas"/>
<Caret Line="660" Column="13" TopLine="634"/>
<Filename Value="picturectrls.pas"/>
<Caret Line="794" Column="19" TopLine="768"/>
</Position26>
<Position27>
<Filename Value="main.pas"/>
<Caret Line="674" Column="13" TopLine="648"/>
<Filename Value="picturectrls.pas"/>
<Caret Line="945" Column="36" TopLine="931"/>
</Position27>
<Position28>
<Filename Value="main.pas"/>
<Caret Line="681" Column="13" TopLine="655"/>
<Filename Value="picturectrls.pas"/>
<Caret Line="978" Column="77" TopLine="952"/>
</Position28>
<Position29>
<Filename Value="main.pas"/>
<Caret Line="851" Column="13" TopLine="825"/>
<Filename Value="picturectrls.pas"/>
<Caret Line="1023" Column="36" TopLine="997"/>
</Position29>
<Position30>
<Filename Value="picturectrls.pas"/>
<Caret Line="1084" Column="37" TopLine="1058"/>
</Position30>
</JumpHistory>
</ProjectOptions>
<CompilerOptions>

31
applications/lazimageeditor/main.lfm
View File

@ -1,10 +1,10 @@
object MainForm: TMainForm
Left = 150
Height = 681
Height = 718
Top = 60
Width = 925
Caption = 'Lazarus Image Editor'
ClientHeight = 659
ClientHeight = 696
ClientWidth = 925
Font.CharSet = GB2312_CHARSET
Font.Height = -13
@ -18,18 +18,18 @@
LCLVersion = '0.9.31'
object PanelTools: TPanel
Left = 0
Height = 532
Height = 569
Top = 105
Width = 40
Align = alLeft
BevelOuter = bvNone
ClientHeight = 532
ClientHeight = 569
ClientWidth = 40
ParentColor = False
TabOrder = 0
object ToolBarTools: TToolBar
Left = 0
Height = 532
Height = 569
Top = 0
Width = 40
Align = alLeft
@ -186,12 +186,23 @@
ShowHint = True
Style = tbsCheck
end
object RegularPolygon: TToolButton
Left = 0
Hint = 'Regular Polygon'
Top = 522
Grouped = True
ImageIndex = 5
OnClick = RegularPolygonClick
ParentShowHint = False
ShowHint = True
Style = tbsCheck
end
end
end
object StatusBar: TStatusBar
Left = 0
Height = 22
Top = 637
Top = 674
Width = 925
Panels = <
item
@ -218,18 +229,18 @@
end
object PanelPallete: TPanel
Left = 850
Height = 532
Height = 569
Top = 105
Width = 75
Align = alRight
AutoSize = True
BevelOuter = bvNone
ClientHeight = 532
ClientHeight = 569
ClientWidth = 75
TabOrder = 1
object Palette: TColorPalette
Left = 0
Height = 532
Height = 569
Top = 0
Width = 75
Align = alClient
@ -1402,7 +1413,7 @@
end
object PanelPictures: TPanel
Left = 40
Height = 532
Height = 569
Top = 105
Width = 810
Align = alClient

287
applications/lazimageeditor/main.lrs
View File

@ -1,17 +1,17 @@
{ This is an automatically generated lazarus resource file }
LazarusResources.Add('TMainForm','FORMDATA',[
'TPF0'#9'TMainForm'#8'MainForm'#4'Left'#3#150#0#6'Height'#3#169#2#3'Top'#2'<'
'TPF0'#9'TMainForm'#8'MainForm'#4'Left'#3#150#0#6'Height'#3#206#2#3'Top'#2'<'
+#5'Width'#3#157#3#7'Caption'#6#20'Lazarus Image Editor'#12'ClientHeight'#3
+#147#2#11'ClientWidth'#3#157#3#12'Font.CharSet'#7#14'GB2312_CHARSET'#11'Font'
+#184#2#11'ClientWidth'#3#157#3#12'Font.CharSet'#7#14'GB2312_CHARSET'#11'Font'
+'.Height'#2#243#9'Font.Name'#6#12#229#190#174#232#189#175#233#155#133#233#187
+#145#10'Font.Pitch'#7#10'fpVariable'#12'Font.Quality'#7#7'fqDraft'#4'Menu'#7
+#8'MainMenu'#12'OnCloseQuery'#7#14'FormCloseQuery'#8'OnCreate'#7#10'FormCrea'
+'te'#6'OnShow'#7#8'FormShow'#10'LCLVersion'#6#6'0.9.31'#0#6'TPanel'#10'Panel'
+'Tools'#4'Left'#2#0#6'Height'#3#20#2#3'Top'#2'i'#5'Width'#2'('#5'Align'#7#6
+'alLeft'#10'BevelOuter'#7#6'bvNone'#12'ClientHeight'#3#20#2#11'ClientWidth'#2
+'Tools'#4'Left'#2#0#6'Height'#3'9'#2#3'Top'#2'i'#5'Width'#2'('#5'Align'#7#6
+'alLeft'#10'BevelOuter'#7#6'bvNone'#12'ClientHeight'#3'9'#2#11'ClientWidth'#2
+'('#11'ParentColor'#8#8'TabOrder'#2#0#0#8'TToolBar'#12'ToolBarTools'#4'Left'
+#2#0#6'Height'#3#20#2#3'Top'#2#0#5'Width'#2'('#5'Align'#7#6'alLeft'#12'Butto'
+#2#0#6'Height'#3'9'#2#3'Top'#2#0#5'Width'#2'('#5'Align'#7#6'alLeft'#12'Butto'
+'nHeight'#2'('#11'ButtonWidth'#2'('#7'Caption'#6#12'ToolBarTools'#21'Constra'
+'ints.MinHeight'#3#146#1#6'Images'#7#14'ImageListTools'#6'Indent'#2#0#8'TabO'
+'rder'#2#0#7'OnClick'#7#17'ToolBarToolsClick'#0#11'TToolButton'#9'ToolSpray'
@ -50,22 +50,25 @@ LazarusResources.Add('TMainForm','FORMDATA',[
+'int'#8#8'ShowHint'#9#5'Style'#7#8'tbsCheck'#0#0#11'TToolButton'#17'Toolcolo'
+'rReplacer'#4'Left'#2#0#4'Hint'#6#15'Institute Color'#3'Top'#3#226#1#7'Group'
+'ed'#9#10'ImageIndex'#2#5#7'OnClick'#7#22'ToolcolorReplacerClick'#14'ParentS'
+'howHint'#8#8'ShowHint'#9#5'Style'#7#8'tbsCheck'#0#0#0#0#10'TStatusBar'#9'St'
+'atusBar'#4'Left'#2#0#6'Height'#2#22#3'Top'#3'}'#2#5'Width'#3#157#3#6'Panels'
+'howHint'#8#8'ShowHint'#9#5'Style'#7#8'tbsCheck'#0#0#11'TToolButton'#14'Regu'
+'larPolygon'#4'Left'#2#0#4'Hint'#6#15'Regular Polygon'#3'Top'#3#10#2#7'Group'
+'ed'#9#10'ImageIndex'#2#5#7'OnClick'#7#19'RegularPolygonClick'#14'ParentShow'
+'Hint'#8#8'ShowHint'#9#5'Style'#7#8'tbsCheck'#0#0#0#0#10'TStatusBar'#9'Statu'
+'sBar'#4'Left'#2#0#6'Height'#2#22#3'Top'#3#162#2#5'Width'#3#157#3#6'Panels'
+#14#1#5'Width'#3#250#0#0#1#9'Alignment'#7#8'taCenter'#5'Width'#2'P'#0#1#9'Al'
+'ignment'#7#8'taCenter'#5'Width'#2'P'#0#1#5'Width'#2'P'#0#1#5'Width'#2'P'#0#1
+#5'Width'#2'2'#0#0#11'SimplePanel'#8#0#0#6'TPanel'#12'PanelPallete'#4'Left'#3
+'R'#3#6'Height'#3#20#2#3'Top'#2'i'#5'Width'#2'K'#5'Align'#7#7'alRight'#8'Aut'
+'oSize'#9#10'BevelOuter'#7#6'bvNone'#12'ClientHeight'#3#20#2#11'ClientWidth'
+'R'#3#6'Height'#3'9'#2#3'Top'#2'i'#5'Width'#2'K'#5'Align'#7#7'alRight'#8'Aut'
+'oSize'#9#10'BevelOuter'#7#6'bvNone'#12'ClientHeight'#3'9'#2#11'ClientWidth'
+#2'K'#8'TabOrder'#2#1#0#13'TColorPalette'#7'Palette'#4'Left'#2#0#6'Height'#3
+#20#2#3'Top'#2#0#5'Width'#2'K'#5'Align'#7#8'alClient'#11'ButtonWidth'#2#12#12
+'9'#2#3'Top'#2#0#5'Width'#2'K'#5'Align'#7#8'alClient'#11'ButtonWidth'#2#12#12
+'ButtonHeight'#2#12#8'DragMode'#7#11'dmAutomatic'#16'OnColorMouseMove'#7#21
+'PaletteColorMouseMove'#11'OnColorPick'#7#16'PaletteColorPick'#0#0#0#6'TPane'
+'l'#12'PanelToolBar'#4'Left'#2#0#6'Height'#2'i'#3'Top'#2#0#5'Width'#3#157#3#5
+'Align'#7#5'alTop'#10'BevelOuter'#7#6'bvNone'#12'ClientHeight'#2'i'#11'Clien'
,'Align'#7#5'alTop'#10'BevelOuter'#7#6'bvNone'#12'ClientHeight'#2'i'#11'Clien'
+'tWidth'#3#157#3#8'TabOrder'#2#2#0#6'TBevel'#6'Bevel1'#4'Left'#2#0#6'Height'
+#2#2#3'Top'#2'E'#5'Width'#3#157#3#5'Align'#7#5'alTop'#5'Shape'#7#12'bsBottom'
,'Line'#0#0#6'TBevel'#6'Bevel2'#4'Left'#2#0#6'Height'#2#2#3'Top'#2'!'#5'Width'
+'Line'#0#0#6'TBevel'#6'Bevel2'#4'Left'#2#0#6'Height'#2#2#3'Top'#2'!'#5'Width'
+#3#157#3#5'Align'#7#5'alTop'#5'Shape'#7#12'bsBottomLine'#0#0#8'TToolBar'#7'T'
+'oolBar'#4'Left'#2#0#6'Height'#2'!'#3'Top'#2#0#5'Width'#3#157#3#12'ButtonHei'
+'ght'#2' '#11'ButtonWidth'#2'$'#5'Color'#7#9'clBtnFace'#11'EdgeBorders'#11#0
@ -126,10 +129,10 @@ LazarusResources.Add('TMainForm','FORMDATA',[
+'ght'#2'"'#11'ClientWidth'#3#157#3#8'TabOrder'#2#1#0#6'TLabel'#16'LabelFillO'
+'utline'#4'Left'#2'g'#6'Height'#2'"'#3'Top'#2#0#5'Width'#2'H'#5'Align'#7#6'a'
+'lLeft'#7'Caption'#6#14'Fill, Outline:'#21'Constraints.MinHeight'#2' '#6'Lay'
+'out'#7#8'tlCenter'#11'ParentColor'#8#0#0#6'TLabel'#10'LabelShape'#4'Left'#2
,'out'#7#8'tlCenter'#11'ParentColor'#8#0#0#6'TLabel'#10'LabelShape'#4'Left'#2
+#0#6'Height'#2'"'#3'Top'#2#0#5'Width'#2'*'#5'Align'#7#6'alLeft'#7'Caption'#6
+#6'Shape:'#21'Constraints.MinHeight'#2' '#6'Layout'#7#8'tlCenter'#11'ParentC'
,'olor'#8#0#0#6'TLabel'#13'LabelMaskTool'#4'Left'#3#2#1#6'Height'#2'"'#3'Top'
+'olor'#8#0#0#6'TLabel'#13'LabelMaskTool'#4'Left'#3#2#1#6'Height'#2'"'#3'Top'
+#2#0#5'Width'#2'C'#5'Align'#7#6'alLeft'#7'Caption'#6#10'Mask Tool:'#21'Const'
+'raints.MinHeight'#2' '#6'Layout'#7#8'tlCenter'#11'ParentColor'#8#0#0#6'TPan'
+'el'#11'PanelColors'#4'Left'#3#201#2#6'Height'#2'"'#3'Top'#2#0#5'Width'#3#212
@ -190,10 +193,10 @@ LazarusResources.Add('TMainForm','FORMDATA',[
+#128#128#128#128#128#128#128#128#0#0#0#0#0#0#0#0#0#0#0#0#128#128#128#128#128
+#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128
+#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128
+#128#128#128#128#128#0#0#0#0#0#0#0#0#0#0#0#0#128#128#128#128#128#128#128#128
,#128#128#128#128#128#0#0#0#0#0#0#0#0#0#0#0#0#128#128#128#128#128#128#128#128
+#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128
+#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128
,#128#128#0#0#0#0#0#0#0#0#0#0#0#0#128#128#128#128#128#128#128#128#128#128#128
+#128#128#0#0#0#0#0#0#0#0#0#0#0#0#128#128#128#128#128#128#128#128#128#128#128
+#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128
+#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#0#0
+#0#0#0#0#0#0#0#0#0#0#128#128#128#128#128#128#128#128#128#128#128#128#128#128
@ -254,10 +257,10 @@ LazarusResources.Add('TMainForm','FORMDATA',[
+#255#255#255#0#0#0#0#255#0#0#0#255#0#0#0#255#0#0#0#255#255#255#255#0#255#255
+#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0
+#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255
+#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#0#0#0#255#0#0#0#255#0#0
,#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#0#0#0#255#0#0#0#255#0#0
+#0#255#0#0#0#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255
+#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255
,#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0
+#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0
+#255#255#255#0#0#0#0#255#0#0#0#255#0#0#0#255#0#0#0#255#255#255#255#0#255#255
+#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0
+#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255
@ -318,10 +321,10 @@ LazarusResources.Add('TMainForm','FORMDATA',[
+#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128
+#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128
+#128#128#128#128#128#128#255#255#255#255#255#255#255#255#255#255#255#255#128
+#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128
,#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128
+#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128
+#128#128#128#128#128#128#128#128#128#255#255#255#255#255#255#255#255#255#255
,#255#255#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128
+#255#255#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128
+#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128
+#128#128#128#128#128#128#128#128#128#128#128#128#255#255#255#255#255#255#255
+#255#255#255#255#255#128#128#128#128#128#128#128#128#128#128#128#128#128#128
@ -382,10 +385,10 @@ LazarusResources.Add('TMainForm','FORMDATA',[
+#128#128#128#128#128#128#128#128#128#128#0#0#0#0#0#0#0#0#0#0#0#0#128#128#128
+#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128
+#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128
+#128#128#128#128#128#128#128#0#0#0#0#0#0#0#0#0#0#0#0#128#128#128#128#128#128
,#128#128#128#128#128#128#128#0#0#0#0#0#0#0#0#0#0#0#0#128#128#128#128#128#128
+#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128
+#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128
,#128#128#128#128#0#0#0#0#0#0#0#0#0#0#0#0#128#128#128#128#128#128#128#128#128
+#128#128#128#128#0#0#0#0#0#0#0#0#0#0#0#0#128#128#128#128#128#128#128#128#128
+#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128
+#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128
+#128#0#0#0#0#0#0#0#0#0#0#0#0#128#128#128#128#128#128#128#128#128#128#128#128
@ -446,10 +449,10 @@ LazarusResources.Add('TMainForm','FORMDATA',[
+'CCC'#255'((('#255#0#0#0#255'jjj'#255#127#127#127#255#127#127#127#255#127#127
+#127#255#127#127#127#255#127#127#127#255#127#127#127#255#127#127#127#255#127
+#127#127#255#127#127#127#255#127#127#127#255#127#127#127#255#127#127#127#255
+#127#127#127#255#127#127#127#255'jjj'#255#0#0#0#255'((('#255' '#255#0#0#0
,#127#127#127#255#127#127#127#255'jjj'#255#0#0#0#255'((('#255' '#255#0#0#0
+#255'ooo'#255#127#127#127#255#127#127#127#255#127#127#127#255#127#127#127#255
+#127#127#127#255#127#127#127#255#127#127#127#255#127#127#127#255#127#127#127
,#255#127#127#127#255#127#127#127#255#127#127#127#255#127#127#127#255#127#127
+#255#127#127#127#255#127#127#127#255#127#127#127#255#127#127#127#255#127#127
+#127#255'ooo'#255#0#0#0#255' '#255' '#255#0#0#0#255'ooo'#255#127#127#127
+#255#127#127#127#255#127#127#127#255#127#127#127#255#127#127#127#255#127#127
+#127#255#127#127#127#255#127#127#127#255#127#127#127#255#127#127#127#255#127
@ -510,10 +513,10 @@ LazarusResources.Add('TMainForm','FORMDATA',[
+#0#0#0#0#0#0#0#0#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128
+#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128
+#128#128#128#128#128#128#128#128#128#128#128#128#128#128#0#0#0#0#0#0#0#0#0#0
+#0#0#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128
,#0#0#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128
+#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128
+#128#128#128#128#128#128#128#128#128#128#128#0#0#0#0#0#0#0#0#0#0#0#0#128#128
,#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128
+#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128
+#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128
+#128#128#128#128#128#128#128#128#0#0#0#0#0#0#0#0#0#0#0#0#128#128#128#128#128
+#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128
@ -574,10 +577,10 @@ LazarusResources.Add('TMainForm','FORMDATA',[
+#127#127#127#255#127#127#127#255#127#127#127#255#127#127#127#255#127#127#127
+#255'}}}'#255'+++'#255#1#1#1#255#132#132#132#0'CCC'#255#0#0#0#255'WWW'#255
+#127#127#127#255#127#127#127#255#127#127#127#255#127#127#127#255#127#127#127
+#255#127#127#127#255#127#127#127#255#127#127#127#255#127#127#127#255#127#127
,#255#127#127#127#255#127#127#127#255#127#127#127#255#127#127#127#255#127#127
+#127#255#127#127#127#255#127#127#127#255#127#127#127#255#127#127#127#255'WWW'
+#255#0#0#0#255'CCC'#255'((('#255#0#0#0#255'jjj'#255#127#127#127#255#127#127
,#127#255#127#127#127#255#127#127#127#255#127#127#127#255#127#127#127#255#127
+#127#255#127#127#127#255#127#127#127#255#127#127#127#255#127#127#127#255#127
+#127#127#255#127#127#127#255#127#127#127#255#127#127#127#255#127#127#127#255
+#127#127#127#255#127#127#127#255#127#127#127#255'jjj'#255#0#0#0#255'((('#255
+' '#255#0#0#0#255'ooo'#255#127#127#127#255#127#127#127#255#127#127#127#255
@ -638,10 +641,10 @@ LazarusResources.Add('TMainForm','FORMDATA',[
+#193#255#222#222#222#255'f__'#243#12#9#9#212#0#0#0#15#255#255#255#0#255#255
+#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0
+#255#255#255#0#0#0#0#31'&$$'#233#230#230#230#255#186#187#187#255'~~~'#255#129
+#129#129#255#166#166#166#255#229#229#229#255#134#134#134#255#10#10#10#220#0#0
,#129#129#255#166#166#166#255#229#229#229#255#134#134#134#255#10#10#10#220#0#0
+#0'/'#0#0#0#10#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255
+#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#15#11#11#170#210#210#210
,#255#175#175#175#255'}}}'#255#130#130#130#255'}}}'#255#225#225#225#255#194
+#255#175#175#175#255'}}}'#255#130#130#130#255'}}}'#255#225#225#225#255#194
+#194#194#255#140#140#140#255#21#21#21#253'222'#236#14#14#14#239#9#9#9#237#13
+#13#13#211#11#11#11#163#0#0#0'/'#255#255#255#0#255#255#255#0#255#255#255#0
+#255#255#255#0#17#15#15#211#224#224#224#255'ttt'#255#155#155#155#255#130#130
@ -702,10 +705,10 @@ LazarusResources.Add('TMainForm','FORMDATA',[
+'ButtonColor'#7#7'clBlack'#7'OnClick'#7#15'BtnToColorClick'#0#0#6'TLabel'#6
+'Label1'#4'Left'#3#213#1#6'Height'#2#20#3'Top'#2#5#5'Width'#2#14#7'Caption'#6
+#2'to'#11'ParentColor'#8#0#0#0#6'TPanel'#16'PanelToolOptions'#4'Left'#2#0#6
+'Height'#2'"'#3'Top'#2'G'#5'Width'#3#157#3#5'Align'#7#5'alTop'#10'BevelOuter'
,'Height'#2'"'#3'Top'#2'G'#5'Width'#3#157#3#5'Align'#7#5'alTop'#10'BevelOuter'
+#7#6'bvNone'#12'ClientHeight'#2'"'#11'ClientWidth'#3#157#3#8'TabOrder'#2#2#0
+#6'TLabel'#9'LabelSize'#4'Left'#2#0#6'Height'#2'"'#3'Top'#2#0#5'Width'#2#28#5
,'Align'#7#6'alLeft'#7'Caption'#6#5'Size:'#21'Constraints.MinHeight'#2' '#6'L'
+'Align'#7#6'alLeft'#7'Caption'#6#5'Size:'#21'Constraints.MinHeight'#2' '#6'L'
+'ayout'#7#8'tlCenter'#11'ParentColor'#8#0#0#6'TLabel'#12'LabelDensity'#4'Lef'
+'t'#3#234#0#6'Height'#2'"'#3'Top'#2#0#5'Width'#2'2'#5'Align'#7#6'alLeft'#7'C'
+'aption'#6#8'Density:'#21'Constraints.MinHeight'#2' '#6'Layout'#7#8'tlCenter'
@ -759,17 +762,17 @@ LazarusResources.Add('TMainForm','FORMDATA',[
+#10'BevelOuter'#7#6'bvNone'#12'ClientHeight'#2'"'#11'ClientWidth'#2#30#8'Tab'
+'Order'#2#5#0#9'TCheckBox'#10'checkFuzzy'#4'Left'#2#4#6'Height'#2#23#3'Top'#2
+#5#5'Width'#2#24#8'OnChange'#7#16'checkFuzzyChange'#8'TabOrder'#2#0#0#0#0#0#0
+#6'TPanel'#13'PanelPictures'#4'Left'#2'('#6'Height'#3#20#2#3'Top'#2'i'#5'Wid'
+#6'TPanel'#13'PanelPictures'#4'Left'#2'('#6'Height'#3'9'#2#3'Top'#2'i'#5'Wid'
+'th'#3'*'#3#5'Align'#7#8'alClient'#10'BevelOuter'#7#9'bvLowered'#8'TabOrder'
+#2#3#0#0#9'TMainMenu'#8'MainMenu'#6'Images'#7#16'ImageListActions'#4'left'#2
+'r'#3'top'#2'~'#0#9'TMenuItem'#12'MenuItemFile'#7'Caption'#6#5'&File'#0#9'TM'
+'enuItem'#11'MenuItemNew'#7'Caption'#6#7'&New...'#11'Bitmap.Data'#10'z'#6#0#0
+'v'#6#0#0'BMv'#6#0#0#0#0#0#0'6'#0#0#0'('#0#0#0#20#0#0#0#20#0#0#0#1#0' '#0#0#0
+#0#0'@'#6#0#0'd'#0#0#0'd'#0#0#0#0#0#0#0#0#0#0#0#255#255#255#0#255#255#255#0#0
+#0#0#31#0#0#0#254#4#4#4#251#6#6#6#249#7#7#7#249#9#9#9#247#15#15#13#246#25#25
,#0#0#31#0#0#0#254#4#4#4#251#6#6#6#249#7#7#7#249#9#9#9#247#15#15#13#246#25#25
+#20#246#26#26#21#245#26#26#22#244#25#25#22#243#25#25#23#242#25#25#24#242#25
+#25#25#241#0#0#0#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0
,#255#255#255#0#0#0#0#31#20#20#20#243#255#255#255#255#255#255#255#255#255#255
+#255#255#255#0#0#0#0#31#20#20#20#243#255#255#255#255#255#255#255#255#255#255
+#255#255#255#255#255#255#255#255#255#255#255#255#253#255#255#255#247#255#255
+#255#240#255#255#255#228#255#255#255#228#255#255#255#228#255#255#255#231#255
+#0#0#0#255#0#0#0#2#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#0
@ -830,10 +833,10 @@ LazarusResources.Add('TMainForm','FORMDATA',[
+#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+#255#255#255#255#255#255#255#255#3#3#3#255#209#209#209#255#167#167#167#255#11
+#11#11#255#8#8#8#221#0#0#0#12#255#255#255#0#255#255#255#0#255#255#255#0#255
+#255#255#0#0#0#0#17#9#9#9#248#255#255#255#255#255#255#255#255#255#255#255#255
,#255#255#0#0#0#0#17#9#9#9#248#255#255#255#255#255#255#255#255#255#255#255#255
+#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+#255#7#7#7#255#163#163#163#255#14#14#14#255#8#8#8#206#0#0#0#9#255#255#255#0
,#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#0#0#0#16#8#8#8#248
+#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#0#0#0#16#8#8#8#248
+#240#240#240#255#241#241#241#255#242#242#242#255#243#243#243#255#244#244#244
+#255#245#245#245#255#246#246#246#255#247#247#247#255#10#10#10#255#9#9#9#254#7
+#7#7#180#0#0#0#2#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255
@ -894,10 +897,10 @@ LazarusResources.Add('TMainForm','FORMDATA',[
+#255#166#166#166#255#157#157#157#255#147#147#147#255#141#141#141#255#142#142
+#142#255#144#144#144#255#145#145#145#255#147#147#147#255#148#148#148#255#150
+#150#150#255#154#154#154#255#162#162#162#255#172#172#172#255#181#181#181#255
+#136#136#136#255#6#6#6#199#255#255#255#0#255#255#255#0#11#11#11#242#232#232
,#136#136#136#255#6#6#6#199#255#255#255#0#255#255#255#0#11#11#11#242#232#232
+#232#255#244#244#244#255#244#244#244#255#244#244#244#255#244#244#244#255#244
+#244#244#255#244#244#244#255#244#244#244#255#244#244#244#255#244#244#244#255
,#244#244#244#255#244#244#244#255#244#244#244#255#244#244#244#255#244#244#244
+#244#244#244#255#244#244#244#255#244#244#244#255#244#244#244#255#244#244#244
+#255#157#157#157#249#3#3#3#175#255#255#255#0#255#255#255#0#11#11#11#227#215
+#215#215#255#244#244#244#255#244#244#244#255#244#244#244#255#244#244#244#255
+#243#243#243#255#236#236#236#255#202#202#202#219#129#129#129#186'|||'#187'{{'
@ -958,10 +961,10 @@ LazarusResources.Add('TMainForm','FORMDATA',[
+#128#221#255#128#128#221#255#128#128#221#255#128#128#221#255#128#128#221#255
+#128#128#221#255#128#128#221#255#128#128#221#255#128#128#221#255#128#128#221
+#255#128#128#221#255#128#128#221#255#128#128#221#255#152#143#210#255'Z'#0#0
+#255#10#0#0#192#8#0#0#223'j'#0#0#255'{'#0#0#255'{'#0#0#255'{'#0#0#255'{'#0#0
,#255#10#0#0#192#8#0#0#223'j'#0#0#255'{'#0#0#255'{'#0#0#255'{'#0#0#255'{'#0#0
+#255'{'#0#0#255'{'#0#0#255'{'#0#0#255'{'#0#0#255'{'#0#0#255'{'#0#0#255'{'#0#0
+#255'{'#0#0#255'{'#0#0#255'{'#0#0#255'{'#0#0#255'{'#0#0#255'['#0#0#255#10#0#0
,#193#8#0#0#224'j'#0#0#255'{'#0#0#255'{'#0#0#255'{'#0#0#255'{'#0#0#255'{'#0#0
+#193#8#0#0#224'j'#0#0#255'{'#0#0#255'{'#0#0#255'{'#0#0#255'{'#0#0#255'{'#0#0
+#255'{'#0#0#255'{'#0#0#255'{'#0#0#255'{'#0#0#255'{'#0#0#255'{'#0#0#255'{'#0#0
+#255'{'#0#0#255'{'#0#0#255'{'#0#0#255'{'#0#0#255'\'#0#0#255#10#0#0#195#8#0#0
+#225'j'#0#0#255'{'#0#0#255'{'#0#0#255'{'#0#0#255'{'#0#0#255'{'#0#0#255'{'#0#0
@ -1022,10 +1025,10 @@ LazarusResources.Add('TMainForm','FORMDATA',[
+#0#13#2#3#12#219#24#25'"'#249'ZZZ'#255'WWW'#255'YYY'#255'ZZZ'#255'[[['#255'['
+'[['#255'[[['#255'YYY'#255'XXX'#255'WWW'#255#24#25'#'#249#2#3#12#217#0#0#0#12
+#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#0#0#0
+#13#2#4#13#218#23#24'"'#250'YYY'#255']]]'#255'___'#255'```'#255'```'#255'```'
,#13#2#4#13#218#23#24'"'#250'YYY'#255']]]'#255'___'#255'```'#255'```'#255'```'
+#255'^^^'#255'ZZZ'#255#22#23' '#250#2#3#12#217#0#0#0#12#255#255#255#0#255#255
+#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#0#0#0#24#2#3
,#10#234'!"*'#251'```'#255'bbb'#255'ddd'#255'eee'#255'eee'#255'eee'#255'ccc'
+#10#234'!"*'#251'```'#255'bbb'#255'ddd'#255'eee'#255'eee'#255'eee'#255'ccc'
+#255'```'#255#31#31'('#249#2#3#9#233#0#0#0#23#255#255#255#0#255#255#255#0#255
+#255#255#0#255#255#255#0#255#255#255#0#0#0#0#24#2#3#10#233#30#31''''#250'YYY'
+#255'ddd'#255'ggg'#255'iii'#255'jjj'#255'jjj'#255'iii'#255'hhh'#255'eee'#255
@ -1086,10 +1089,10 @@ LazarusResources.Add('TMainForm','FORMDATA',[
+'33'#19'595'#230'333'#255'333'#16#255#255#255#0#255#255#255#0#255#255#255#0
+#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0'4:4'#229'M'#161'B'
+#255'S'#184'F'#255'@}8'#255'5=4'#186#255#255#255#0#255#255#255#0#255#255#255
+#0'333'#5'6:6'#202'RtM'#249'585'#248'333'#16#255#255#255#0#255#255#255#0#255
,#0'333'#5'6:6'#202'RtM'#249'585'#248'333'#16#255#255#255#0#255#255#255#0#255
+#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0'3337473'#249'Q'#177'E'
+#255'S'#184'F'#255'I'#149'@'#255'5<4'#208#255#255#255#0#255#255#255#0#255#255
,#255#0'6:6'#163'G[E'#245#129#201'w'#255'585'#248'333'#16#255#255#255#0#255
+#255#0'6:6'#163'G[E'#245#129#201'w'#255'585'#248'333'#16#255#255#255#0#255
+#255#255#0#255#255#255#0'333'#8'3331343r594'#244'P'#149'G'#255'V'#185'I'#255
+'S'#184'F'#255'D|='#255'4:4'#158#255#255#255#0#255#255#255#0'564t>G='#245#133
+#197'{'#255#137#206#128#255'696'#248'7;7'#174'7<7'#163'8>7'#185'6;6'#229'464'
@ -1150,10 +1153,10 @@ LazarusResources.Add('TMainForm','FORMDATA',[
+#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0'6;6'#161
+'['#134'U'#254'}'#201's'#255'g'#155'`'#255'8=7'#202#255#255#255#0#255#255#255
+#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0'333'
+#12'594'#185'333$'#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0
,#12'594'#185'333$'#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0
+#255#255#255#0'8>7'#195'j'#159'c'#255#132#204'z'#255'u'#174'm'#255'8<7'#222
+#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255
,#255#255#0#255#255#255#0'333'#24'333'#255'594'#225'333'#15#255#255#255#0#255
+#255#255#0#255#255#255#0'333'#24'333'#255'594'#225'333'#15#255#255#255#0#255
+#255#255#0#255#255#255#0#255#255#255#0'8=7'#215'v'#172'n'#255#138#207#129#255
+#135#197'~'#255'575'#248'3333'#255#255#255#0#255#255#255#0#255#255#255#0#255
+#255#255#0#255#255#255#0#255#255#255#0'333'#24'6:5'#246'GlC'#248'5:4'#195'33'
@ -1214,10 +1217,10 @@ LazarusResources.Add('TMainForm','FORMDATA',[
+#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#0#0#0#255#0#0#0
+#255#0#0#0#255#0#0#0#255#0#0#0#255#255#255#255#0#255#255#255#0#255#255#255#0
+#255#255#255#0#0#0#0#255#0#0#0#255#0#0#0#255#0#0#0#255#0#0#0#255#255#255#255
+#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255
,#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255
+#255#255#0#0#0#0#255#0#0#0#255#0#0#0#255#0#0#0#255#255#255#255#0#255#255#255
+#0#255#255#255#0#255#255#255#0#0#0#0#255#0#0#0#255#0#0#0#255#0#0#0#255#255
,#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255
+#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255
+#255#0#255#255#255#0#255#255#255#0#0#0#0#255#0#0#0#255#0#0#0#255#0#0#0#255#0
+#0#0#255#255#255#255#0#255#255#255#0#0#0#0#255#0#0#0#255#0#0#0#255#0#0#0#255
+#0#0#0#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255
@ -1278,10 +1281,10 @@ LazarusResources.Add('TMainForm','FORMDATA',[
+#255#255#255#0#21#21#21#255#255#255#255#255#255#255#255#255#255#255#255#255
+#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+#255#255#255#255#255#255#255#255#255#254#254#254#255#255#255#255#255#0#0#0
+#255#0#0#0#255#0#0#0#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255
,#255#0#0#0#255#0#0#0#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255
+#255#0#21#21#21#255#255#255#255#255#0#0#0#255#0#0#0#255#0#0#0#255#0#0#0#255#0
+#0#0#255#0#0#0#255#0#0#0#255#0#0#0#255#0#0#0#255#0#0#0#255#255#255#255#255#0
,#0#0#255#255#255#255#255#0#0#0#255#255#255#255#0#255#255#255#0#255#255#255#0
+#0#0#255#255#255#255#255#0#0#0#255#255#255#255#0#255#255#255#0#255#255#255#0
+#255#255#255#0#21#21#21#255#255#255#255#255#255#255#255#255#255#255#255#255
+#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#0#0#0
@ -1342,10 +1345,10 @@ LazarusResources.Add('TMainForm','FORMDATA',[
+'CopyExecute'#0#0#9'TMenuItem'#13'MenuItemPaste'#7'Caption'#6#6'&Paste'#11'B'
+'itmap.Data'#10'z'#6#0#0'v'#6#0#0'BMv'#6#0#0#0#0#0#0'6'#0#0#0'('#0#0#0#20#0#0
+#0#20#0#0#0#1#0' '#0#0#0#0#0'@'#6#0#0'd'#0#0#0'd'#0#0#0#0#0#0#0#0#0#0#0#255
+#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255
,#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255
+#255#0#0#0#0#255'--.'#255'99:'#255'334'#255'889'#255'111'#255#22#22#22#255#0
+#0#0#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255
,#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255
+#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255
+#255#255#0#255#255#255#0#27#27#27#255#128#128#128#255#128#128#128#255#128#128
+#128#255#128#128#128#255#128#128#128#255#128#128#128#255#128#128#128#255#0#0
+#0#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0
@ -1406,10 +1409,10 @@ LazarusResources.Add('TMainForm','FORMDATA',[
+#255#0#0#0#255#128#128#128#255#0#0#0#255#255#255#255#0#255#255#255#0#255#255
+#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0
+#255#255#255#0#255#255#255#0#0#0#0#255#128#128#128#255#128#128#128#255#128
+#128#128#255#128#128#128#255#128#128#128#255#128#128#128#255#128#128#128#255
,#128#128#255#128#128#128#255#128#128#128#255#128#128#128#255#128#128#128#255
+#0#0#0#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255
+#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0
,#255#255#255#0#255#255#255#0#0#0#0#255#0#0#0#255#0#0#0#255#0#0#0#255';;;'#255
+#255#255#255#0#255#255#255#0#0#0#0#255#0#0#0#255#0#0#0#255#0#0#0#255';;;'#255
+'777'#255'%%%'#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0
+#255#255#255#0#255#255#255#0#255#255#255#0#4'Hint'#6#5'Paste'#10'ImageIndex'
+#2#8#8'ShortCut'#3'V@'#7'OnClick'#7#16'EditPasteExecute'#0#0#9'TMenuItem'#14
@ -1470,10 +1473,10 @@ LazarusResources.Add('TMainForm','FORMDATA',[
+#232#255' !D'#248#3#4#17#216#0#0#0#12#0#0#0#13#4#5#17#219'"#F'#249'~~'#234
+#255'gg'#233#255'``'#230#255'cc'#229#255'=>'#142#254#2#3#13#241#0#0#0#28#255
+#255#255#0#0#0#2'1'#1#1#7#250'>?'#139#255'aa'#230#255'pp'#230#255#29#30'D'
+#248#3#4#16#218#0#0#0#12#255#255#255#0#255#255#255#0#0#0#0#13#3#4#16#220'!"J'
,#248#3#4#16#218#0#0#0#12#255#255#255#0#255#255#255#0#0#0#0#13#3#4#16#220'!"J'
+#249'ss'#232#255'dd'#230#255'AA'#141#255#1#2#9#248#0#0#0'*'#255#255#255#0#255
+#255#255#0#255#255#255#0#0#0#5'B'#0#1#4#251'#$_'#254#17#18'2'#247#2#2#13#225
,#0#0#0#16#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#0#0#0#14#3
+#0#0#0#16#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#0#0#0#14#3
+#4#16#217#19#20'6'#250'"#\'#252#2#2#10#246#0#0#0'0'#255#255#255#0#255#255#255
+#0#255#255#255#0#255#255#255#0#255#255#255#0#0#0#0#29#1#2#19#171#3#4#19'x'#0
+#0#0#5#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0
@ -1534,10 +1537,10 @@ LazarusResources.Add('TMainForm','FORMDATA',[
+#0#255#255#255#255#0#255#255#255#0#128#0#0#255#128#0#0#255#128#0#0#255#128#0
+#0#255#255#255#255#0#255#255#255#0#128#0#0#255#128#0#0#255#128#0#0#255#128#0
+#0#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#128#0#0#255
+#128#0#0#255#128#0#0#255#128#0#0#255#255#255#255#0#255#255#255#0#128#0#0#255
+#128#0#0#255#128#0#0#255#128#0#0#255#255#255#255#0#255#255#255#0#128#0#0#255
+#128#0#0#255#128#0#0#255#128#0#0#255#255#255#255#0#255#255#255#0#128#0#0#255
,#128#0#0#255#128#0#0#255#128#0#0#255#255#255#255#0#255#255#255#0#128#0#0#255
+#128#0#0#255#128#0#0#255#128#0#0#255#255#255#255#0#255#255#255#0#128#0#0#255
+#128#0#0#255#128#0#0#255#128#0#0#255#255#255#255#0#255#255#255#0#128#0#0#255
+#128#0#0#255#128#0#0#255#128#0#0#255#255#255#255#0#255#255#255#0#128#0#0#255
+#128#0#0#255#128#0#0#255#128#0#0#255#255#255#255#0#255#255#255#0#255#255#255
+#0#255#255#255#0#128#0#0#255#128#0#0#255#255#255#255#0#255#255#255#0#255#255
+#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0
@ -1598,10 +1601,10 @@ LazarusResources.Add('TMainForm','FORMDATA',[
+#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255
+#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255
+#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0
+#255#255#255#0#255#255#255#0#128#0#0#255#128#0#0#255#255#255#255#0#255#255
,#255#255#255#0#255#255#255#0#128#0#0#255#128#0#0#255#255#255#255#0#255#255
+#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0
+#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255
,#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255
+#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255
+#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0
+#255#255#255#0#128#0#0#255#128#0#0#255#255#255#255#0#255#255#255#0#255#255
+#255#0#255#255#255#0#128#0#0#255#128#0#0#255#255#255#255#0#255#255#255#0#255
@ -1662,10 +1665,10 @@ LazarusResources.Add('TMainForm','FORMDATA',[
+#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0
+#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255
+#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255
+#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0
,#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0
+#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255
+#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255
,#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0
+#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0
+#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255
+#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255
+#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0
@ -1726,10 +1729,10 @@ LazarusResources.Add('TMainForm','FORMDATA',[
+#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255
+#255#255#0#255#255#255#0#255#255#255#0#0#0#0#5#0#4#5#219#0#13#15#255#0#0#0
+#255#0#2#3#255#0'#3'#255#0'f'#146#255#1'Us'#255#0#4#5#255#12'8F'#255#26'o'
+#138#255#22'^t'#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0
,#138#255#22'^t'#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0
+#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255
+#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255
,#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0
+#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0
+#0#2#2#131#1#16#19#249#5#172#217#255#2#162#218#255#0'|'#177#255#0'Ik'#255#0#8
+#11#255#1'Ka'#255#3#140#173#255#0#3#4#255#14'AQ'#255#0#4#5#250#255#255#255#0
+#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255
@ -1790,10 +1793,10 @@ LazarusResources.Add('TMainForm','FORMDATA',[
+#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0
+#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255
+#255#255#0#255#255#255#0#255#255#255#0'~~~'#197#254#254#254#255#30#30#30#255
+#0#0#0#255#0#0#0#255#0#0#0#255#0#0#0#255#0#0#0#255#0#0#0#145#255#255#255#0
,#0#0#0#255#0#0#0#255#0#0#0#255#0#0#0#255#0#0#0#255#0#0#0#145#255#255#255#0
+#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255
+#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255
,#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0
+#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0
+#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255
+#255#255#0#155#155#155#235#192#192#192#255#0#0#0#255#0#0#0#255#0#0#0#255#0#0
+#0#255#0#0#0#247#0#0#0#143#0#0#0#14#255#255#255#0#255#255#255#0#255#255#255#0
@ -1854,10 +1857,10 @@ LazarusResources.Add('TMainForm','FORMDATA',[
+')'#239#0#0#0'1'#255#255#255#0#255#255#255#0#17#2#0#168#139#21#8#253#227'<-'
+#255#230'SH'#255#233'aX'#255#232'^U'#255#229'MA'#255#206'0!'#255#155#18#2#255
+#24#2#0#240#0#0#0#23#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0
+#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#0#3#15#149#0#16'='
,#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#0#3#15#149#0#16'='
+#245#8'6'#196#255'"P'#225#255'4]'#228#255':b'#229#255'2Y'#222#255#23':'#169
+#255#3'%'#138#255#0#7#28#242#0#0#0'Q'#255#255#255#0#255#255#255#0#18#2#0#166
,'+'#4#0#240#148#16#2#255#179'$'#22#255#207'6'''#255#208':,'#255#171'+'#31#255
+'+'#4#0#240#148#16#2#255#179'$'#22#255#207'6'''#255#208':,'#255#171'+'#31#255
+'}'#23#13#255'O'#8#0#242#12#1#0#231#0#0#0#24#255#255#255#0#255#255#255#0#255
+#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255
+#255#0#0#0#0#4#0#2#7'q'#0#3#15#227#0#2#9#243#1#5#19#240#2#9#27#237#1#3#12#243
@ -1918,10 +1921,10 @@ LazarusResources.Add('TMainForm','FORMDATA',[
+#255#0'd'#201#255#0'd'#201#255#0'd'#201#255#0'd'#201#255#0'['#184#255#255#255
+#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0
+#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255
+#255#255#0#255#255#255#0#255#255#255#0#0#0#0'm'#0#0#0#255#0#23'/'#255#4'c'
,#255#255#0#255#255#255#0#255#255#255#0#0#0#0'm'#0#0#0#255#0#23'/'#255#4'c'
+#196#255#0'd'#201#255#0'd'#201#255#0'd'#201#255#0'd'#201#255#0'd'#201#255#0
+'d'#201#255#0'd'#201#255#0'd'#201#255#0'd'#201#255#0'd'#201#255#0'd'#201#255
,#0'd'#201#255#0'b'#197#255#0#25'2'#255#255#255#255#0#255#255#255#0#255#255
+#0'd'#201#255#0'b'#197#255#0#25'2'#255#255#255#255#0#255#255#255#0#255#255
+#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0
+#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#0#0#0
+'F'#0#0#0#253#0#12#24#254#0'['#184#255#0'd'#201#255#0'd'#201#255#0'd'#201#255
@ -1982,10 +1985,10 @@ LazarusResources.Add('TMainForm','FORMDATA',[
+#255#255#0#255#255#255#0#255#255#255#0#0#0#0'j'#0#0#0#255'z'#128#147#255#185
+#193#218#255#157#168#204#255#157#168#204#255#157#168#204#255#157#168#204#255
+#157#168#204#255#157#168#204#255#156#167#203#255'cj'#129#255#13#14#17#253#0#0
+#0#255#0#0#0#203#0#0#0'6'#255#255#255#0#255#255#255#0#255#255#255#0#255#255
,#0#255#0#0#0#203#0#0#0'6'#255#255#255#0#255#255#255#0#255#255#255#0#255#255
+#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0
+#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255
,#255#255#0#255#255#255#0#0#0#0#195#4#4#5#254#174#181#207#255#158#169#205#255
+#255#255#0#255#255#255#0#0#0#0#195#4#4#5#254#174#181#207#255#158#169#205#255
+#157#168#204#255#157#168#204#255#157#168#204#255#157#168#204#255#157#168#204
+#255#128#137#166#255'$''/'#255#0#0#0#255#1#1#1#238#0#0#0'e'#0#0#0#2#255#255
+#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0
@ -2046,10 +2049,10 @@ LazarusResources.Add('TMainForm','FORMDATA',[
+#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255
+#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0
+#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255
+#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255
,#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255
+#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0
+#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255
,#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255
+#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255
+#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0
+#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255
+#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255
@ -2110,10 +2113,10 @@ LazarusResources.Add('TMainForm','FORMDATA',[
+#228#246#255#12#238#249#255#14#249#253#255#10#213#231#255#4'l'#127#255#0#5#7
+#255#0#4#8#255#0'T'#169#255#0'd'#201#255#0'd'#201#255#0'H'#145#255#0#0#1#254
+#0#0#0#196#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255
+#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0
,#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0
+#255#255#255#0#255#255#255#0#255#255#255#0#0#0#0#3#0#0#0#243#0#0#0#255'Dm|'
+#255#128#183#196#255'q'#194#205#255#18#203#215#255#14#252#254#255#11#230#247
,#255#8#208#240#255#5#185#233#255#2#132#183#255#0#3#5#255#0#19'&'#255#0'a'#196
+#255#8#208#240#255#5#185#233#255#2#132#183#255#0#3#5#255#0#19'&'#255#0'a'#196
+#255#0'U'#171#255#0#5#11#253#0#0#1#228#0#0#0#22#255#255#255#0#255#255#255#0
+#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255
+#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255
@ -2174,10 +2177,10 @@ LazarusResources.Add('TMainForm','FORMDATA',[
+#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#1#1#2#216'3#8'
+#255#227#159#252#255#227#159#252#255#227#159#252#255#227#159#252#255#227#159
+#252#255#227#159#252#255#227#159#252#255#227#159#252#255#227#159#252#255#227
+#159#252#255#211#147#234#255#3#4#6#255#0#2#2#255#0#0#0'P'#255#255#255#0#255
,#159#252#255#211#147#234#255#3#4#6#255#0#2#2#255#0#0#0'P'#255#255#255#0#255
+#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255
+#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0
,#255#255#255#0#255#255#255#0#255#255#255#0#0#0#0#2#1#1#1#251'V<`'#255#227#159
+#255#255#255#0#255#255#255#0#255#255#255#0#0#0#0#2#1#1#1#251'V<`'#255#227#159
+#252#255#227#159#252#255#227#159#252#255#227#159#252#255#227#159#252#255#227
+#159#252#255#227#159#252#255#227#159#252#255#227#159#252#255#226#158#251#255
+'D0L'#255#0#0#0#255#0#0#0'q'#255#255#255#0#255#255#255#0#255#255#255#0#255
@ -2238,10 +2241,10 @@ LazarusResources.Add('TMainForm','FORMDATA',[
+#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0
+#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255
+#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255
+#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0
,#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0
+#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255
+#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255
,#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0
+#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0
+#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255
+#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255
+#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0
@ -2302,10 +2305,10 @@ LazarusResources.Add('TMainForm','FORMDATA',[
+#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255
+#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255
+#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0
+#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255
,#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255
+#255#255#0#255#255#255#0#0#0#0#255#0#0#0#255#0#0#0#255#255#255#255#0#255#255
+#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0
,#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255
+#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255
+#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255
+#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0
+#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#0#0#0
@ -2366,10 +2369,10 @@ LazarusResources.Add('TMainForm','FORMDATA',[
+#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255
+#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0
+#255#255#255#0#0#0#0#255#0#0#0#255#0#0#0#255#255#255#255#0#255#255#255#0#255
+#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255
,#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255
+#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0
+#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255
,#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255
+#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255
+#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#0#0#0#255#0#0
+#0#255#0#0#0#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255
+#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255
@ -2430,10 +2433,10 @@ LazarusResources.Add('TMainForm','FORMDATA',[
+#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255
+#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255
+#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0
+#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255
,#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255
+#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255
+#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0
,#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255
+#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255
+#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255
+#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0
+#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255
@ -2494,10 +2497,10 @@ LazarusResources.Add('TMainForm','FORMDATA',[
+'}'#243'|'#255'}'#243'|'#255'w'#242'w'#255'k'#237'k'#255'1y2'#255#3#4#4#255
+'&'#29'+'#255'U0`'#255'r='#128#255'q:'#128#255'o6'#127#255'm1'#127#255'k+}'
+#255'h%}'#255'f'#30'|'#255'b'#23'{'#255'E'#15'X'#255#28#8'$'#255#2#0#3#254#2
+#0#2'x'#0#0#0#3#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255
,#0#2'x'#0#0#0#3#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255
+#255#255#0#255#255#255#0#255#255#255#0#0#0#0'@'#5#14#5#247'^'#239'^'#255'f'
+#240'f'#255'k'#241'k'#255'k'#241'k'#255'g'#240'f'#255' E!'#255#26#19#30#255
,#165'\'#183#255#221#129#244#255#223#132#244#255#222#129#244#255#219'{'#243
+#165'\'#183#255#221#129#244#255#223#132#244#255#222#129#244#255#219'{'#243
+#255#215'q'#242#255#210'f'#240#255#205'Y'#238#255#200'L'#236#255#194'?'#235
+#255#188'1'#233#255#182'#'#231#255#176#21#229#255'}'#4#166#255#16#0#23#248#7
+#0#9#176#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255
@ -2558,10 +2561,10 @@ LazarusResources.Add('TMainForm','FORMDATA',[
+#255#0#226#4#255#0#141#2#255#27#16'"'#255#190'6'#233#255#192';'#234#255#193
+'='#234#255#194'>'#234#255#193'='#234#255#192':'#234#255#190'5'#233#255#187
+'/'#232#255#184''''#231#255#180#30#230#255#176#20#228#255#172#10#227#255#168
+#0#226#255#168#0#226#255#168#0#226#255#168#0#226#255#168#0#226#255#168#0#226
,#0#226#255#168#0#226#255#168#0#226#255#168#0#226#255#168#0#226#255#168#0#226
+#255#24#0'!'#243#0#0#0'X'#255#255#255#0#255#255#255#0#255#255#255#0#255#255
+#255#0#255#255#255#0#0#0#0'@'#0#0#0#255#0#0#0#255#0#0#0#255#0#0#0#255#0#0#0
,#255#24#5#31#255#184'('#231#255#186','#232#255#187'.'#232#255#187'/'#232#255
+#255#24#5#31#255#184'('#231#255#186','#232#255#187'.'#232#255#187'/'#232#255
+#187'-'#232#255#185'*'#232#255#184'&'#231#255#181' '#230#255#178#25#229#255
+#175#17#228#255#171#8#227#255#168#0#226#255#168#0#226#255#168#0#226#255#168#0
+#226#255#168#0#226#255#168#0#226#255#168#0#226#255#21#0#28#244#0#0#0'S'#255
@ -2622,10 +2625,10 @@ LazarusResources.Add('TMainForm','FORMDATA',[
+#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255
+#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0
+#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255
+#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255
,#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255
+#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0
+#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255
,#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255
+#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255
+#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0
+#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255
+#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255
@ -2686,10 +2689,10 @@ LazarusResources.Add('TMainForm','FORMDATA',[
+#234#255'/'#173#232#255' '#167#230#255#17#161#228#255#2#154#226#255#0#154#226
+#255#0#154#226#255#0#154#226#255#0#154#226#255#0'}'#183#255#0#0#0#255#0#0#0
+'/'#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255
+#255#255#0#0#0#0'I'#1#2#3#253'7'#168#220#255'F'#183#236#255'R'#188#237#255'\'
,#255#255#0#0#0#0'I'#1#2#3#253'7'#168#220#255'F'#183#236#255'R'#188#237#255'\'
+#192#239#255'd'#195#240#255'h'#197#240#255'j'#198#241#255'g'#197#240#255'a'
+#194#239#255'X'#191#238#255'N'#186#237#255'B'#181#235#255'5'#176#233#255''''
,#170#231#255#25#164#229#255#10#158#227#255#0#154#226#255#0#154#226#255#0#154
+#170#231#255#25#164#229#255#10#158#227#255#0#154#226#255#0#154#226#255#0#154
+#226#255#0#154#226#255#0#154#226#255#0#154#226#255#0#17#27#249#0#0#0'{'#255
+#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255
+#255#0#0#0#0#138#8'$2'#247'2'#175#233#255'>'#180#234#255'H'#184#236#255'Q'
@ -2750,10 +2753,10 @@ LazarusResources.Add('TMainForm','FORMDATA',[
+#226#255#0#154#226#255#0#154#226#255#0#154#226#255#0#154#226#255#0#154#226
+#255#0#154#226#255#0#154#226#255#0#154#226#255#0#154#226#255#0#154#226#255#0
+'9U'#253#0#4#6#230#0#0#0#13#255#255#255#0#255#255#255#0#255#255#255#0#255#255
+#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0
,#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0
+#0#0#0#27#0#3#4#244#0'Ko'#255#0#154#226#255#0#154#226#255#0#154#226#255#0#154
+#226#255#0#154#226#255#0#154#226#255#0#154#226#255#0#154#226#255#0#154#226
,#255#0#154#226#255#0#154#226#255#0#154#226#255#0#154#226#255#0#154#226#255#0
+#255#0#154#226#255#0#154#226#255#0#154#226#255#0#154#226#255#0#154#226#255#0
+#154#226#255#0#154#226#255#0'm'#160#255#0#0#0#254#0#0#0'C'#255#255#255#0#255
+#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255
+#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#0#0#0'_'#0#1#2
@ -2814,10 +2817,10 @@ LazarusResources.Add('TMainForm','FORMDATA',[
+#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255
+#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0
+#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255
+#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255
,#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255
+#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0
+#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255
,#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255
+#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255
+#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0
+#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255
+#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255
@ -2878,10 +2881,10 @@ LazarusResources.Add('TMainForm','FORMDATA',[
+#236'uq'#255#237'zv'#255#237'|y'#255#237'}y'#255#237'{w'#255#236'ws'#255#235
+'rm'#255#234'le'#255#233'e^'#255#232'^U'#255#231'WM'#255#230'OD'#255#229'H;'
+#255#227'@2'#255#226'8)'#255#225'0'#31#255#224')'#22#255#222'!'#13#255#221#25
+#3#255#221#22#0#255#205#20#0#255#1#0#0#255#0#0#0'5'#255#255#255#0#255#255#255
,#3#255#221#22#0#255#205#20#0#255#1#0#0#255#0#0#0'5'#255#255#255#0#255#255#255
+#0#255#255#255#0#255#255#255#0#255#255#255#0#9#4#4#217#136'82'#255#233'e^'
+#255#234'kd'#255#235'oj'#255#235'rn'#255#236'tp'#255#236'tp'#255#235'sn'#255
,#235'oj'#255#234'kd'#255#233'e^'#255#232'_W'#255#231'YO'#255#230'RG'#255#229
+#235'oj'#255#234'kd'#255#233'e^'#255#232'_W'#255#231'YO'#255#230'RG'#255#229
+'K>'#255#228'C6'#255#227'<-'#255#225'4$'#255#224'-'#27#255#223'%'#18#255#222
+#29#9#255#221#22#0#255#221#22#0#255#142#14#0#255#8#1#0#232#255#255#255#0#255
+#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#0#0#0'|3'
@ -2942,10 +2945,10 @@ LazarusResources.Add('TMainForm','FORMDATA',[
+#255#255#255#0#255#255#255#0#255#255#255#0#0#0#0'9'#4#0#0#252#210#26#6#255
+#221#26#5#255#221#25#4#255#221#24#2#255#221#22#0#255#221#22#0#255#221#22#0
+#255#221#22#0#255#221#22#0#255#221#22#0#255#221#22#0#255#221#22#0#255#221#22
+#0#255#221#22#0#255#221#22#0#255#218#22#0#255#13#1#0#249#0#0#0'P'#255#255#255
,#0#255#221#22#0#255#221#22#0#255#218#22#0#255#13#1#0#249#0#0#0'P'#255#255#255
+#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255
+#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255
,#255#0#0#0#0#1#6#1#0#237#146#14#0#255#221#22#0#255#221#22#0#255#221#22#0#255
+#255#0#0#0#0#1#6#1#0#237#146#14#0#255#221#22#0#255#221#22#0#255#221#22#0#255
+#221#22#0#255#221#22#0#255#221#22#0#255#221#22#0#255#221#22#0#255#221#22#0
+#255#221#22#0#255#221#22#0#255#221#22#0#255#221#22#0#255#221#22#0#255#166#17
+#0#255#4#0#0#248#0#0#0#9#255#255#255#0#255#255#255#0#255#255#255#0#255#255
@ -3006,10 +3009,10 @@ LazarusResources.Add('TMainForm','FORMDATA',[
+#255#130#179#183#255't'#161#164#255'Wy|'#255';RT'#255'0CD'#255'3GI'#255'''67'
+#255#0#0#0#255#0#0#0#250#0#0#0#10#255#255#255#0#255#255#255#0#255#255#255#0
+#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255
+#255#255#0#255#255#255#0#255#255#255#0#0#0#0'3'#0#0#0#158#0#1#1#248#0#0#0#255
,#255#255#0#255#255#255#0#255#255#255#0#0#0#0'3'#0#0#0#158#0#1#1#248#0#0#0#255
+#2#3#3#255'.AB'#255'^'#132#135#255#133#185#189#255'j'#147#150#255';RT'#255'-'
+'?@'#255'B[]'#255'^'#131#134#255'{'#171#174#255#152#211#215#255#165#229#234
,#255#132#182#187#255#13#18#18#255#0#0#0#255#0#0#0#255#0#0#0'f'#255#255#255#0
+#255#132#182#187#255#13#18#18#255#0#0#0#255#0#0#0#255#0#0#0'f'#255#255#255#0
+#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255
+#255#255#0#255#255#255#0#255#255#255#0#0#0#0'+'#0#0#0#186#0#0#0#255#0#0#0#255
+#13#19#19#255'Gfg'#255'y'#173#174#255'Rtv'#255'+=>'#255'4IJ'#255'c'#138#140
@ -3070,10 +3073,10 @@ LazarusResources.Add('TMainForm','FORMDATA',[
+#255#19#8#8#255'210'#255#131#127'y'#255'zvk'#255'vnZ'#255#171#153'p'#255#215
+#192#139#255#213#190#137#255#211#188#135#255#209#186#133#255#207#184#131#255
+#205#182#129#255'vkR'#255#170#170#170#255#181#181#181#255#177#177#177#255#172
+#172#172#255#168#168#168#255#228#164#165#255#240#207#207#255#240#207#207#255
,#172#172#255#168#168#168#255#228#164#165#255#240#207#207#255#240#207#207#255
+#214'xy'#255#200'GI'#255#200'GI'#255#200'GI'#255#200'GI'#255#200'GI'#255#200
+'GI'#255#192'DF'#255'w*+'#255'w*+'#255'[ !'#255#1#0#0#255#158#142'i'#255#219
,#197#144#255#221#198#145#255#219#196#143#255#217#194#141#255#215#192#139#255
+#197#144#255#221#198#145#255#219#196#143#255#217#194#141#255#215#192#139#255
+#213#190#137#255#210#187#134#255#209#186#133#255#207#184#131#255#204#181#128
+#255#187#166'u'#255'olg'#255#180#180#180#255#176#176#176#255#172#172#172#255
+#167#167#167#255#210'jk'#255#226#158#159#255#212'op'#255#200'GI'#255#200'GI'
@ -3134,10 +3137,10 @@ LazarusResources.Add('TMainForm','FORMDATA',[
+#219#255#215#215#215#255#211#211#211#255#206#206#206#255#173#173#173#255#128
+#128#128#255'SSS'#255'((('#255#0#0#0#255#0#0#0#255#0#0#0#212#0#0#0'X'#0#0#0#2
+#255#255#255#0#210'ik'#255#200'GI'#255#200'GI'#255#200'GI'#255#200'GI'#255
+#200'GI'#255#200'GI'#255#210'hj'#255#240#207#207#255#240#207#207#255#240#207
,#200'GI'#255#200'GI'#255#210'hj'#255#240#207#207#255#240#207#207#255#240#207
+#207#255#210'kl'#255#200'GI'#255#200'GI'#255#176'>@'#255#1#0#0#255'FFF'#255
+'ooo'#255'[[['#255'III'#255'555'#255#14#14#14#255#0#0#0#255#0#0#0#255#0#0#0
,#255#0#0#0#255#0#0#0#205#0#0#0'S'#0#0#0#1#255#255#255#0#255#255#255#0#255#255
+#255#0#0#0#255#0#0#0#205#0#0#0'S'#0#0#0#1#255#255#255#0#255#255#255#0#255#255
+#255#0#236#192#192#255#203'SU'#255#200'GI'#255#200'GI'#255#200'GI'#255#200'G'
+'I'#255#200'GI'#255#200'GI'#255#230#173#174#255#240#207#207#255#240#207#207
+#255#217#130#131#255#200'GI'#255#200'GI'#255'w*+'#255#0#0#0#255#0#0#0#255#0#0
@ -3198,10 +3201,10 @@ LazarusResources.Add('TMainForm','FORMDATA',[
+#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255
+#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0
+#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#0#0#0'D'#6#6#6#203#4
+#4#4#252'^^^'#251#206#206#206#255#234#234#234#255#235#235#235#255#176#176#176
,#4#4#252'^^^'#251#206#206#206#255#234#234#234#255#235#235#235#255#176#176#176
+#255#10#10#10#255'<<<'#255#0#0#0#254#0#0#0';'#255#255#255#0#255#255#255#0#255
+#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255
,#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0
+#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0
+#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255
+#255#255#0#2#2#2'|'#3#3#3#252'ddd'#252#213#213#213#255#240#240#240#255#241
+#241#241#255#242#242#242#255#160#160#160#255#6#6#6#255'eee'#255#195#195#195
@ -3262,10 +3265,10 @@ LazarusResources.Add('TMainForm','FORMDATA',[
+#230#144#255#234#230#144#255#234#230#144#255#192#189'v'#255#1#1#0#254#0#0#0
+'H'#0#0#0#147#16#16#16#250#211#211#211#255#218#218#218#255#213#213#213#255
+#208#208#208#255#189#189#189#255'bbb'#255#9#12#12#255#10#21#21#255'+wy'#255
+'G'#203#207#255'E'#210#213#255'@'#207#210#255';'#204#206#255'5'#200#203#255
,'G'#203#207#255'E'#210#213#255'@'#207#210#255';'#204#206#255'5'#200#203#255
+'0'#197#199#255'('#185#186#255#23'z{'#255#234#230#144#255#234#230#144#255#234
+#230#144#255#234#230#144#255#234#230#144#255#234#230#144#255#234#230#144#255
,#234#230#144#255#234#230#144#255#234#230#144#255'@?'''#250#5#5#3#194#255#255
+#234#230#144#255#234#230#144#255#234#230#144#255'@?'''#250#5#5#3#194#255#255
+#255#0#0#0#0#13#2#2#2#251'uuu'#255#145#145#145#255'jjj'#255'BDD'#255#8#11#11
+#255#12#24#24#255'5'#128#131#255'V'#214#218#255'U'#219#223#255'P'#216#220#255
+'K'#213#216#255'E'#210#213#255'@'#206#209#255':'#203#205#255'4'#200#202#255
@ -3326,10 +3329,10 @@ LazarusResources.Add('TMainForm','FORMDATA',[
+#255'?'#206#209#255':'#203#205#255'4'#200#201#255'.'#196#198#255#234#230#144
+#255#234#230#144#255#234#230#144#255#234#230#144#255#200#196'{'#255#2#2#1#253
+#0#0#0'R'#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255
+#0#255#255#255#0#255#255#255#0#2#6#6#226#15')*'#255#27'FH'#255#23':<'#255#11
,#0#255#255#255#0#255#255#255#0#2#6#6#226#15')*'#255#27'FH'#255#23':<'#255#11
+#27#28#255#0#0#0#255#0#0#0#255#19'12'#255'/y|'#255'I'#191#195#255'O'#215#219
+#255'K'#213#216#255'F'#210#213#255'A'#207#210#255'<'#204#207#255'6'#201#203
,#255'1'#198#200#255'+'#195#196#255#234#230#144#255#234#230#144#255#234#230
+#255'1'#198#200#255'+'#195#196#255#234#230#144#255#234#230#144#255#234#230
+#144#255#234#230#144#255'KJ.'#251#6#5#3#204#255#255#255#0#255#255#255#0#255
+#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255
+#255#0#0#0#0#157#1#3#3#254#26'IJ'#255'#^`'#255'/~'#129#255'?'#165#168#255'L'
@ -3390,10 +3393,10 @@ LazarusResources.Add('TMainForm','FORMDATA',[
+#255#255#255#255#248#255#13#13#13#247#0#0#0#20#255#255#255#0#255#255#255#0
+#255#255#255#0#255#255#255#0#0#0#0#26#16#16#16#245#255#255#255#255#255#255
+#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
,#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+#255#255#245#255#11#11#11#248#0#0#0#18#255#255#255#0#255#255#255#0#255#255
+#255#0#255#255#255#0#0#0#0#26#17#17#17#244#255#255#255#255#255#255#255#255
,#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+#241#255#8#8#8#248#0#0#0#15#255#255#255#0#255#255#255#0#255#255#255#0#255#255
+#255#0#0#0#0#27#17#17#17#244#255#255#255#255#255#255#255#255#255#255#255#255
@ -3454,10 +3457,10 @@ LazarusResources.Add('TMainForm','FORMDATA',[
+#230#190#154#255#248#180#131#255#250#181#131#255#248#178#128#255#243#173'y'
+#255#238#167'r'#255#234#161'k'#255#229#155'c'#255#224#149'\'#255#219#143'T'
+#255#214#137'M'#255#209#131'E'#255#204'}='#255#199'v6'#255#194'p.'#255#189'j'
+'&'#255#184'd'#31#255#151'T'#27#255#10#5#0#224#11#8#5#225#170#127'^'#255#250
,'&'#255#184'd'#31#255#151'T'#27#255#10#5#0#224#11#8#5#225#170#127'^'#255#250
+#181#131#255#254#186#137#255#249#180#130#255#244#174'{'#255#239#168's'#255
+#234#162'k'#255#229#156'd'#255#224#149'\'#255#219#143'U'#255#214#137'M'#255
,#209#131'E'#255#204'}>'#255#199'w6'#255#194'q.'#255#189'j'''#255#184'd'#31
+#209#131'E'#255#204'}>'#255#199'w6'#255#194'q.'#255#189'j'''#255#184'd'#31
+#255'k8'#13#255#8#4#0#185#12#8#5#190'yV<'#255#247#177#127#255#248#179#129#255
+#246#177'~'#255#243#172'x'#255#238#166'q'#255#233#161'j'#255#228#155'c'#255
+#223#149'['#255#218#143'T'#255#214#137'L'#255#208#131'E'#255#203'|='#255#199
@ -3518,10 +3521,10 @@ LazarusResources.Add('TMainForm','FORMDATA',[
+#255#10#0#0#196#8#0#0#224'j'#0#0#255'{'#0#0#255'{'#0#0#255'{'#0#0#255'{'#0#0
+#255'{'#0#0#255'{'#0#0#255'{'#0#0#255'{'#0#0#255'{'#0#0#255'{'#0#0#255'{'#0#0
+#255'{'#0#0#255'{'#0#0#255'{'#0#0#255'{'#0#0#255'{'#0#0#255'\'#0#0#255#10#0#0
+#195#8#0#0#223'j'#0#0#255'{'#0#0#255'{'#0#0#255'{'#0#0#255'{'#0#0#255'{'#0#0
,#195#8#0#0#223'j'#0#0#255'{'#0#0#255'{'#0#0#255'{'#0#0#255'{'#0#0#255'{'#0#0
+#255'{'#0#0#255'{'#0#0#255'{'#0#0#255'{'#0#0#255'{'#0#0#255'{'#0#0#255'{'#0#0
+#255'{'#0#0#255'{'#0#0#255'{'#0#0#255'{'#0#0#255'['#0#0#255#10#0#0#193#8#0#0
,#223'i'#0#0#255#157#137#193#255#128#128#221#255#128#128#221#255#128#128#221
+#223'i'#0#0#255#157#137#193#255#128#128#221#255#128#128#221#255#128#128#221
+#255#128#128#221#255#128#128#221#255#128#128#221#255#128#128#221#255#128#128
+#221#255#128#128#221#255#128#128#221#255#128#128#221#255#128#128#221#255#128
+#128#221#255#128#128#221#255#152#143#210#255'Z'#0#0#255#10#0#0#192#8#0#0#222
@ -3582,10 +3585,10 @@ LazarusResources.Add('TMainForm','FORMDATA',[
+#250'VVV'#255'ccc'#255'ggg'#255'kkk'#255'mmm'#255'ooo'#255'ooo'#255'nnn'#255
+'lll'#255'iii'#255'eee'#255'\\\'#255#24#25'"'#251#2#3#10#231#0#0#0#21#255#255
+#255#0#255#255#255#0#255#255#255#0#0#0#0#24#2#3#10#233#30#31''''#250'YYY'#255
+'ddd'#255'ggg'#255'iii'#255'jjj'#255'jjj'#255'iii'#255'hhh'#255'eee'#255']]]'
,'ddd'#255'ggg'#255'iii'#255'jjj'#255'jjj'#255'iii'#255'hhh'#255'eee'#255']]]'
+#255#26#27'$'#250#2#3#10#232#0#0#0#22#255#255#255#0#255#255#255#0#255#255#255
+#0#255#255#255#0#255#255#255#0#0#0#0#24#2#3#10#234'!"*'#251'```'#255'bbb'#255
,'ddd'#255'eee'#255'eee'#255'eee'#255'ccc'#255'```'#255#31#31'('#249#2#3#9#233
+'ddd'#255'eee'#255'eee'#255'eee'#255'ccc'#255'```'#255#31#31'('#249#2#3#9#233
+#0#0#0#23#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255
+#0#255#255#255#0#0#0#0#13#2#4#13#218#23#24'"'#250'YYY'#255']]]'#255'___'#255
+'```'#255'```'#255'```'#255'^^^'#255'ZZZ'#255#22#23' '#250#2#3#12#217#0#0#0
@ -3646,10 +3649,10 @@ LazarusResources.Add('TMainForm','FORMDATA',[
+'g'#255'u'#196'j'#255'p'#196'e'#255'k'#194'`'#255'f'#191'Z'#255'`'#189'T'#255
+'['#187'N'#255'K'#146'A'#255'483'#234'333'#13#255#255#255#0#255#255#255#0'56'
+'4t>G='#245#133#197'{'#255#137#206#128#255'696'#248'7;7'#174'7<7'#163'8>7'
+#185'6;6'#229'464'#250';G9'#240'EdA'#243'['#168'Q'#255'^'#188'R'#255'Y'#186
,#185'6;6'#229'464'#250';G9'#240'EdA'#243'['#168'Q'#255'^'#188'R'#255'Y'#186
+'L'#255'S'#184'F'#255';T7'#243'333T'#255#255#255#0#255#255#255#0#255#255#255
+#0'6:6'#163'G[E'#245#129#201'w'#255'585'#248'333'#16#255#255#255#0#255#255
,#255#0#255#255#255#0'333'#8'3331343r594'#244'P'#149'G'#255'V'#185'I'#255'S'
+#255#0#255#255#255#0'333'#8'3331343r594'#244'P'#149'G'#255'V'#185'I'#255'S'
+#184'F'#255'D|='#255'4:4'#158#255#255#255#0#255#255#255#0#255#255#255#0'333'
+#5'6:6'#202'RtM'#249'585'#248'333'#16#255#255#255#0#255#255#255#0#255#255#255
+#0#255#255#255#0#255#255#255#0#255#255#255#0'3337473'#249'Q'#177'E'#255'S'
@ -3710,10 +3713,10 @@ LazarusResources.Add('TMainForm','FORMDATA',[
+#213#144#255#148#211#139#255#143#209#134#255#136#203'~'#255'v'#178'o'#255'e'
+#150'^'#255']'#140'W'#255'['#140'T'#255'`'#162'X'#255'i'#193']'#255'c'#190'W'
+#255'W'#167'L'#255'494'#247'333D'#255#255#255#0'333\SeQ'#244#172#220#165#255
+#152#212#144#255#157#215#149#255#136#185#130#255'TiQ'#243'@I>'#240'464'#250
,#152#212#144#255#157#215#149#255#136#185#130#255'TiQ'#243'@I>'#240'464'#250
+'8<7'#228'8>8'#184'7<6'#164'6;6'#177'6<6'#246'i'#193']'#255'_'#180'T'#255'7B'
+'6'#245'353k'#255#255#255#0#255#255#255#0'8=7'#168'u'#153'q'#255#147#210#138
,#255#148#211#139#255'x'#164'r'#255'7:7'#244'333n3330333'#7#255#255#255#0#255
+#255#148#211#139#255'x'#164'r'#255'7:7'#244'333n3330333'#7#255#255#255#0#255
+#255#255#0#255#255#255#0'333'#24'6;5'#246'g'#189'\'#255'>S;'#245'494'#154#255
+#255#255#0#255#255#255#0#255#255#255#0'8=7'#215'v'#172'n'#255#138#207#129#255
+#135#197'~'#255'575'#248'3333'#255#255#255#0#255#255#255#0#255#255#255#0#255
@ -3774,10 +3777,10 @@ LazarusResources.Add('TMainForm','FORMDATA',[
+#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255
+#255#255#0#255#255#255#0#0#0#0#255#0#0#0#255#0#0#0#255#0#0#0#255#0#0#0#255#0
+#0#0#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255
+#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255
,#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255
+#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#0#0#0#255#0#0#0#255#0#0
+#0#255#0#0#0#255#0#0#0#255#0#0#0#255#255#255#255#0#255#255#255#0#255#255#255
,#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255
+#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255
+#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#0#0#0#255
+#0#0#0#255#0#0#0#255#0#0#0#255#0#0#0#255#0#0#0#255#0#0#0#255#0#0#0#255#255
+#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255
@ -3838,10 +3841,10 @@ LazarusResources.Add('TMainForm','FORMDATA',[
+#255#255#255#255#0#0#0#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255
+#255#0#21#21#21#255#255#255#255#255#0#0#0#255#0#0#0#255#0#0#0#255#0#0#0#255#0
+#0#0#255#0#0#0#255#0#0#0#255#0#0#0#255#0#0#0#255#0#0#0#255#255#255#255#255#0
+#0#0#255#255#255#255#255#0#0#0#255#255#255#255#0#255#255#255#0#255#255#255#0
,#0#0#255#255#255#255#255#0#0#0#255#255#255#255#0#255#255#255#0#255#255#255#0
+#255#255#255#0#21#21#21#255#255#255#255#255#255#255#255#255#255#255#255#255
+#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
,#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#0#0#0
+#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#0#0#0
+#255#255#255#255#255#0#0#0#255#255#255#255#0#255#255#255#0#255#255#255#0#255
+#255#255#0#21#21#21#255#255#255#255#255#0#0#0#255#0#0#0#255#0#0#0#255#0#0#0
+#255#0#0#0#255#0#0#0#255#0#0#0#255#0#0#0#255#0#0#0#255#0#0#0#255#255#255#255
@ -3902,10 +3905,10 @@ LazarusResources.Add('TMainForm','FORMDATA',[
+#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#0#0#0#255#128#128
+#128#255#0#0#0#255',,,'#255#128#128#128#255#128#128#128#255#128#128#128#255#0
+#0#0#255#0#0#0#255#128#128#128#255#0#0#0#255#255#255#255#0#255#255#255#0#255
+#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255
,#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255
+#255#0#255#255#255#0#0#0#0#255#128#128#128#255#0#0#0#255#128#128#128#255#0#0
+#0#255#0#0#0#255#0#0#0#255#128#128#128#255#0#0#0#255#128#128#128#255#0#0#0
,#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0
+#255#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0
+#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#0#0#0#255#128#128
+#128#255#0#0#0#255#128#128#128#255#0#0#0#255#255#255#255#0#0#0#0#255#128#128
+#128#255#0#0#0#255#128#128#128#255#0#0#0#255#255#255#255#0#255#255#255#0#255
@ -3966,10 +3969,10 @@ LazarusResources.Add('TMainForm','FORMDATA',[
+#255'cc'#229#255'=>'#142#254#2#3#13#241#0#0#0#28#1#3#23#197'!"f'#254'WW'#227
+#255'VV'#228#255']]'#230#255'dd'#232#255'll'#234#255'~~'#234#255' !D'#248#3#4
+#17#216#4#5#18#218'#$H'#250#128#128#234#255'oo'#235#255'gg'#233#255'``'#231
+#255'XX'#228#255'YY'#227#255#30#31'\'#253#1#3#22#183#2#3#23#177#17#18'C'#248
,#255'XX'#228#255'YY'#227#255#30#31'\'#253#1#3#22#183#2#3#23#177#17#18'C'#248
+'GG'#208#255'UU'#227#255'\\'#229#255'cc'#231#255'jj'#233#255'qq'#235#255'{{'
+#233#255#30#31'D'#249'#$K'#249'}}'#235#255'tt'#236#255'mm'#234#255'ff'#232
,#255'__'#230#255'WW'#228#255'LL'#217#255#14#14'5'#247#1#3#20#156#0#0#0#21#1#2
+#255'__'#230#255'WW'#228#255'LL'#217#255#14#14'5'#247#1#3#20#156#0#0#0#21#1#2
+#13#229#24#25'R'#250'JJ'#203#255'ZZ'#229#255'``'#231#255'gg'#232#255'mm'#234
+#255'rr'#236#255'ss'#232#255'uu'#235#255'ss'#236#255'oo'#235#255'ii'#233#255
+'cc'#231#255'\\'#230#255'PP'#216#255#20#21'E'#251#1#2#14#228#0#0#0#14#255#255
@ -4030,10 +4033,10 @@ LazarusResources.Add('TMainForm','FORMDATA',[
+#255#234#233#230#255#236#238#238#255#199#151'l'#253#197#149'i'#246#205#164'}'
+#166#200#196#190#170'UXU'#189#255#255#255#0#255#255#255#0#255#255#255#0#255
+#255#255#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'SWU'#235#233#227#221#168#207#161
+'v'#249#230#223#215#255#235#235#234#255#236#238#238#255#236#238#238#255#231
,'v'#249#230#223#215#255#235#235#234#255#236#238#238#255#236#238#238#255#231
+#226#221#255#225#215#205#255#185#131'V'#248#233#227#221#167'TWU'#236#255#255
+#255#0#255#255#255#0#255#255#255#0#255#255#255#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
,#0#0'SWU'#235#233#228#223#165#203#155'n'#250#231#226#220#255#236#238#238#255
+#0#0'SWU'#235#233#228#223#165#203#155'n'#250#231#226#220#255#236#238#238#255
+#236#238#238#255#236#238#238#255#236#238#238#255#231#227#223#255#177'yK'#250
+#233#227#221#168'TWU'#236#255#255#255#0#255#255#255#0#255#255#255#0#255#255
+#255#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'SWU'#185#199#198#196#158#206#163'{'
@ -4094,10 +4097,10 @@ LazarusResources.Add('TMainForm','FORMDATA',[
+#231#228#223#255#225#215#205#255#185#131'V'#248#233#227#221#167'TWU'#236#255
+#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#0#0#0#0#0#0#0#0#0#0#0#0
+#0#0#0#0'SWU'#235#233#228#223#165#203#155'n'#250#231#226#220#255#236#238#238
+#255#236#238#238#255#236#238#238#255#236#238#238#255#231#227#223#255#177'yK'
,#255#236#238#238#255#236#238#238#255#236#238#238#255#231#227#223#255#177'yK'
+#250#233#227#221#168'TWU'#236#255#255#255#0#255#255#255#0#255#255#255#0#255
+#255#255#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'SWU'#185#199#198#196#158#206#163
,'{'#205#192#139'^'#253#189#137'\'#252#185#131'U'#252#182'~O'#252#177'xI'#252
+'{'#205#192#139'^'#253#189#137'\'#252#185#131'U'#252#182'~O'#252#177'xI'#252
+#173'rC'#254#186#135'_'#187#199#195#189#173'UXU'#188#255#255#255#0#255#255
+#255#0#255#255#255#0#255#255#255#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'SWUbpsr'
+#208#244#234#224#161#207#164'y'#128#204#156'ls'#204#155'lh'#203#153'n^'#202
@ -4158,10 +4161,10 @@ LazarusResources.Add('TMainForm','FORMDATA',[
+'ritePrompt'#14'ofEnableSizing'#12'ofViewDetail'#0#4'left'#3#186#0#3'top'#2
+'~'#0#0#11'TActionList'#10'ActionList'#6'Images'#7#16'ImageListActions'#4'le'
+'ft'#2'p'#3'top'#2'X'#0#7'TAction'#7'FileNew'#8'Category'#6#4'File'#7'Captio'
+'n'#6#7'&New...'#4'Hint'#6#3'New'#10'ImageIndex'#2#0#9'OnExecute'#7#14'FileN'
,'n'#6#7'&New...'#4'Hint'#6#3'New'#10'ImageIndex'#2#0#9'OnExecute'#7#14'FileN'
+'ewExecute'#8'ShortCut'#3'N@'#0#0#7'TAction'#8'FileOpen'#8'Category'#6#4'Fil'
+'e'#7'Caption'#6#8'&Open...'#4'Hint'#6#4'Open'#10'ImageIndex'#2#1#9'OnExecut'
,'e'#7#15'FileOpenExecute'#8'ShortCut'#3'O@'#0#0#7'TAction'#8'FileSave'#8'Cat'
+'e'#7#15'FileOpenExecute'#8'ShortCut'#3'O@'#0#0#7'TAction'#8'FileSave'#8'Cat'
+'egory'#6#4'File'#7'Caption'#6#5'&Save'#4'Hint'#6#4'Save'#10'ImageIndex'#2#2
+#9'OnExecute'#7#15'FileSaveExecute'#8'ShortCut'#3'S@'#0#0#7'TAction'#10'File'
+'SaveAs'#8'Category'#6#4'File'#7'Caption'#6#11'Save &As...'#4'Hint'#6#7'Save'

10
applications/lazimageeditor/main.pas
View File

@ -172,6 +172,7 @@ type
SavePictureDialog: TSavePictureDialog;
ToolBrush: TToolButton;
ToolButton1: TToolButton;
RegularPolygon: TToolButton;
ToolText: TToolButton;
ToolcolorReplacer: TToolButton;
ZoomInBtn: TToolButton;
@ -269,6 +270,7 @@ type
procedure PictureChange(Sender: TObject);
procedure PicturePageClose(Sender: TObject);
procedure PicturePageCloseQuery(Sender: TObject; var CanClose: boolean);
procedure RegularPolygonClick(Sender: TObject);
procedure Rotate180Execute(Sender: TObject);
procedure Rotate270Execute(Sender: TObject);
procedure Rotate90Execute(Sender: TObject);
@ -454,6 +456,14 @@ begin
end;
end;
procedure TMainForm.RegularPolygonClick(Sender: TObject);
begin
if not Pictures.CanEdit then
Exit;
ChangeTool(ptRegularPolygon);
ActivePictureEdit.ChangeColor(BtnFromColor.ButtonColor, BtnToColor.ButtonColor);
end;
procedure TMainForm.Rotate180Execute(Sender: TObject);
begin
if not Pictures.CanEdit then

29
applications/lazimageeditor/picturectrls.pas
View File

@ -111,10 +111,11 @@ type
TPictureEditShape = (psRect, psCircle);
TPictureEditToolDrag = (tdNone, tdLine, tdRectangle, tdEllipse,
tdRoundRectangle, tdPolygon);
tdRoundRectangle, tdPolygon, tdRegularPolygon);
TPictureEditTool = (ptLine, ptPen, ptRectangle, ptFloodFill, ptEllipse,
ptMask, ptColorPick, ptEraser, ptSpray, ptPolygon, ptBrush, ptText, ptColorReplacer);
ptMask, ptColorPick, ptEraser, ptSpray, ptPolygon, ptBrush, ptText,
ptColorReplacer, ptRegularPolygon);
TPicturePos = (ppTopLeft, ppTopCenter, ppTopRight, ppCenterLeft, ppCentered,
ppCenterRight, ppBottomLeft, ppBottomCenter, ppBottomRight);
@ -184,6 +185,7 @@ type
procedure Rectangle(X1, Y1, X2, Y2: integer; Shift: TShiftState = [ssLeft]);
procedure Ellipse(X1, Y1, X2, Y2: integer; Shift: TShiftState = [ssLeft]);
procedure Polygon(polyaddr: array of TPoint);
procedure RegularPolygon(X1, Y1, X2, Y2: integer; Shift: TShiftState = [ssLeft]);
procedure ProcessEditorText(X1, Y1, X2, Y2: integer);
procedure ProcessPointAddr;
procedure Mask(X1, Y1, X2, Y2: integer; Shift: TShiftState = [ssLeft]);
@ -722,6 +724,7 @@ begin
ptLine: Line(StartPos.X, StartPos.Y, X, Y, Shift);
ptRectangle: Rectangle(StartPos.X, StartPos.Y, X, Y, Shift);
ptEllipse: Ellipse(StartPos.X, StartPos.Y, X, Y, Shift);
ptRegularPolygon: RegularPolygon(StartPos.X, StartPos.Y, X, Y, Shift);
ptPolygon:
begin
pcount := pcount + 1;
@ -751,6 +754,7 @@ begin
ptRectangle: Result := tdRoundRectangle;
ptEllipse: Result := tdEllipse;
ptPolygon: Result := tdPolygon;
ptRegularPolygon: Result := tdRegularPolygon;
ptMask:
begin
case MaskTool of
@ -788,6 +792,8 @@ begin
Canvas.RoundRect(S.X, S.Y, E.X, E.Y, R, R);
if FToolDrag = tdEllipse then
Canvas.Ellipse(S.X, S.Y, E.X, E.Y);
if FToolDrag = tdRegularPolygon then
DrawRegularPolygon(Canvas, Point(S.X, S.Y), Point(E.X, E.Y), 5);
if FToolDrag = tdPolygon then
begin
Canvas.Pen.Color := OutLineColor;
@ -1094,6 +1100,25 @@ begin
InvalidatePictureRect(Rect(X1, Y1, X2, Y2));
end;
procedure TCustomPictureEdit.RegularPolygon(X1, Y1, X2, Y2: integer; Shift: TShiftState = [ssLeft]);
begin
if Picture = nil then
Exit;
BeginDraw;
if not (ssLeft in Shift) then
Picture.EraseMode := ermErase;
try
Picture.Canvas.Brush.Color := FFillColor;
Picture.Canvas.Pen.Color := FOutlineColor;
DrawRegularPolygon(Picture.Canvas, Point(X1, Y1), Point(X2, Y2), 5);
finally
Picture.EraseMode := ermNone;
EndDraw;
end;
InvalidatePictureRect(Rect(X1, Y1, X2, Y2));
end;
procedure TCustomPictureEdit.ProcessPointAddr;
var i: integer; E, F: TPoint;
begin