Added code to disable save button when the active unit is not "modified".

Shane

git-svn-id: trunk@515 -

ide/main.pp

@@ -219,6 +219,10 @@ type
       APageIndex: integer; DeleteForwardHistory: boolean);
     Procedure OnSrcNotebookDeleteLastJumPoint(Sender: TObject);
     Procedure OnSrcNotebookEditorVisibleChanged(Sender : TObject);
+
+    //this is fired when the editor is focused, changed, ?.  Anything that causes the status change
+    Procedure OnSrcNotebookEditorChanged(Sender : TObject);
+    
     Procedure OnSrcNotebookFileNew(Sender : TObject);
     Procedure OnSrcNotebookFileOpen(Sender : TObject);
     Procedure OnSrcNotebookFileOpenAtCursor(Sender : TObject);
@@ -632,6 +636,7 @@ begin
   SourceNotebook.OnCloseClicked := @OnSrcNotebookFileClose;
   SourceNotebook.OnDeleteLastJumpPoint := @OnSrcNotebookDeleteLastJumPoint;
   SourceNotebook.OnEditorVisibleChanged := @OnSrcNotebookEditorVisibleChanged;
+  SourceNotebook.OnEditorChanged := @OnSrcNotebookEditorChanged;
   SourceNotebook.OnJumpToHistoryPoint := @OnSrcNotebookJumpToHistoryPoint;
   SourceNotebook.OnNewClicked := @OnSrcNotebookFileNew;
   SourceNotebook.OnOpenClicked := @ OnSrcNotebookFileOpen;
@@ -887,7 +892,7 @@ begin
   OpenFileArrowSpeedBtn.Width := 12;
   ButtonLeft := n+12+1;
   
-  SaveSpeedBtn          := CreateButton('SaveSpeedBtn'         , 'btn_save'      , 1, ButtonLeft, ButtonTop, [mfLeft], @mnuSaveClicked, 'Save');
+  SaveSpeedBtn          := CreateButton('SaveSpeedBtn'         , 'btn_save'      , 2, ButtonLeft, ButtonTop, [mfLeft], @mnuSaveClicked, 'Save');
   SaveAllSpeedBtn       := CreateButton('SaveAllSpeedBtn'      , 'btn_saveall'   , 1, ButtonLeft, ButtonTop, [mfLeft], @mnuSaveAllClicked, 'Save all');
   NewFormSpeedBtn       := CreateButton('NewFormSpeedBtn'      , 'btn_newform'   , 1, ButtonLeft, ButtonTop, [mfLeft], @mnuNewFormClicked, 'New Form');
   ToggleFormSpeedBtn    := CreateButton('ToggleFormSpeedBtn'   , 'btn_toggleform', 2, ButtonLeft, ButtonTop, [mfLeft, mfTop], @mnuToggleFormUnitCLicked, 'Toggle Form/Unit');
@@ -4996,6 +5001,7 @@ begin
     Project.UnitWithEditorIndex(SourceNotebook.Notebook.Pageindex);
   if ActiveUnitInfo = nil then Exit;
 
+  SaveSpeedBtn.Enabled := SourceNotebook.GetActiveSe.MOdified;
   ToggleFormSpeedBtn.Enabled := Assigned(ActiveUnitInfo.Form);
 end;
 
@@ -5242,6 +5248,14 @@ begin
 
 end;
 
+//this is fired when the editor is focused, changed, ?.  Anything that causes the status change
+Procedure TMainIDE.OnSrcNotebookEditorChanged(Sender : TObject);
+begin
+  if SourceNotebook.Notebook = nil then Exit;
+
+  SaveSpeedBtn.Enabled := SourceNotebook.GetActiveSe.Modified;
+end;
+
 //-----------------------------------------------------------------------------
 
 initialization
@@ -5256,6 +5270,10 @@ end.
 { =============================================================================
 
   $Log$
+  Revision 1.178  2001/12/12 16:49:14  lazarus
+  Added code to disable save button when the active unit is not "modified".
+  Shane
+
   Revision 1.177  2001/12/12 15:12:31  lazarus
   MG: added file path to files in TOpenDialog
 

ide/uniteditor.pp

@@ -239,6 +239,7 @@ type
     FOnCloseClicked : TNotifyEvent;
     FOnDeleteLastJumpPoint: TNotifyEvent;
     FOnEditorVisibleChanged: TNotifyEvent;
+    FOnEditorChanged : TNotifyEvent;
     FOnJumpToHistoryPoint: TOnJumpToHistoryPoint;
     FOnNewClicked : TNotifyEvent;
     FOnOpenClicked : TNotifyEvent;
@@ -376,6 +377,8 @@ type
        read FOnDeleteLastJumpPoint write FOnDeleteLastJumpPoint;
     property OnEditorVisibleChanged: TNotifyEvent
        read FOnEditorVisibleChanged write FOnEditorVisibleChanged;
+    property OnEditorChanged: TNotifyEvent
+       read FOnEditorChanged write FOnEditorChanged;
     property OnJumpToHistoryPoint: TOnJumpToHistoryPoint
        read FOnJumpToHistoryPoint write FOnJumpToHistoryPoint;
     property OnNewClicked : TNotifyEvent read FOnNewClicked write FOnNewClicked;
@@ -2209,6 +2212,8 @@ Procedure TSourceNotebook.EditorChanged(sender : TObject);
 Begin
   ClearUnUsedEditorComponents(false);
   UpdateStatusBar;
+  if Assigned(OnEditorChanged) then
+      OnEditorChanged(sender);
 End;
 
 Function TSourceNotebook.NewSE(PageNum : Integer) : TSourceEditor;
@@ -3032,6 +3037,11 @@ var
   WIndow : TWInControl;
   Caret : TPoint;
 begin
+  //leave this in.
+  //I am using this to determine why Lazarus crashes once in a while.
+  //Shane
+  Writeln('HINTTIMER in UNITEDITOR.PP');
+  
   FHintTimer.Enabled := False;
 
   cPosition := Mouse.CursorPos;
@@ -3045,10 +3055,6 @@ begin
   if (window <> Self) then Exit;
   
   cPosition := ScreenToClient(cPosition);
-  //Check to see if we are in the windows bounds
-  if ((cPosition.X <=EditorOpts.GutterWidth) or (cPosition.X >= Width) 
-  or (cPosition.Y <= 25) or (cPosition.Y >= Height)) then
-    Exit;
 
   //Get the active SourceEditor
   Se := GetActiveSE;
@@ -3081,8 +3087,9 @@ begin
   Rect.Top := Rect.Top + 25;
   Rect.Right := Rect.Left + Rect.Right+3;
   Rect.Bottom := Rect.Top + Rect.Bottom+3;
-
+  Writeln('Activating hint');
   FHintWindow.ActivateHint(Rect,AHint);
+  Writeln('DEActivating hint');
 
 end;
 

images/btn_save.xpm

@@ -1,183 +1,186 @@
 /* XPM */
-static char * btn_save_xpm[] = {
+static char *btn_save[]={
-"14 14 166 2",
+"28 14 169 2",
-"  	c None",
+"aD c None",
-". 	c #000100",
+".e c #000000",
-"+ 	c #000400",
+".a c #000002",
-"@ 	c #000002",
+".b c #000005",
-"# 	c #000005",
+".d c #000007",
-"$ 	c #00000C",
+".c c #00000c",
-"% 	c #000007",
+"Qt c #000100",
-"& 	c #000000",
+".g c #000200",
-"* 	c #010400",
+".# c #000400",
-"= 	c #000200",
+".I c #000600",
-"- 	c #050704",
+".8 c #010000",
-"; 	c #787C5B",
+"aK c #01000c",
-"> 	c #020600",
+"az c #01000e",
-", 	c #C5C6B6",
+"aj c #010100",
-"' 	c #CAC9C4",
+".w c #010200",
-") 	c #C6C5C1",
+"#j c #010300",
-"! 	c #C0BEBF",
+".f c #010400",
-"~ 	c #C7C4CD",
+"#J c #010500",
-"{ 	c #CCC9D2",
+".U c #010600",
-"] 	c #C9C9CB",
+".6 c #010700",
-"^ 	c #C3C4BC",
+"ah c #010a00",
-"/ 	c #C5C9B2",
+".J c #020300",
-"( 	c #010200",
+"#8 c #020500",
-"_ 	c #7A7C54",
+".k c #020600",
-": 	c #030600",
+"aG c #030000",
-"< 	c #C6C5B0",
+"aJ c #03000b",
-"[ 	c #C7C7BD",
+"ap c #030010",
-"} 	c #C7C4BD",
+"aE c #030500",
-"| 	c #D0CFCB",
+".y c #030600",
-"1 	c #C6C4C7",
+"#6 c #030c00",
-"2 	c #C4C2C7",
+"ac c #040000",
-"3 	c #C7C6C4",
+"ad c #04000e",
-"4 	c #BEC0B2",
+".L c #040600",
-"5 	c #0C1200",
+"aB c #040900",
-"6 	c #000600",
+"#3 c #050000",
-"7 	c #020300",
+"ay c #05000e",
-"8 	c #787B4E",
+"aI c #050102",
-"9 	c #040600",
+"#4 c #050200",
-"0 	c #D3D1BA",
+"aL c #050209",
-"a 	c #C7C4BB",
+".h c #050704",
-"b 	c #CCC7C1",
+"#2 c #060000",
-"c 	c #C4C1BC",
+"ab c #060100",
-"d 	c #C7C3C4",
+"am c #060200",
-"e 	c #C8C6C7",
+"#E c #060600",
-"f 	c #C7C6C2",
+"#I c #060800",
-"g 	c #C8C9B7",
+"#Z c #070100",
-"h 	c #010600",
+"a# c #070300",
-"i 	c #707650",
+"aH c #070400",
-"j 	c #797B4C",
+"#C c #070500",
-"k 	c #070900",
+"#l c #070700",
-"l 	c #C1BCA8",
+"aM c #070800",
-"m 	c #CECAC1",
+".X c #070900",
-"n 	c #C5C0BC",
+"ao c #080300",
-"o 	c #D6D1CE",
+"#i c #08050c",
-"p 	c #C3BDBD",
+"#z c #080700",
-"q 	c #CCC8C7",
+"au c #080901",
-"r 	c #CDC9C6",
+"#5 c #080b00",
-"s 	c #C7C9B4",
+"#F c #080e00",
-"t 	c #010700",
+"aa c #090300",
-"u 	c #81865E",
+"#0 c #090400",
-"v 	c #010000",
+"#Y c #090700",
-"w 	c #767849",
+"ae c #0a0219",
-"x 	c #0B0A00",
+"ax c #0a0500",
-"y 	c #CFC8B6",
+"#D c #0a0a00",
-"z 	c #C8C0BD",
+"aF c #0a0c00",
-"A 	c #D5CCCD",
+"#. c #0b0a00",
-"B 	c #C6BDBE",
+"#w c #0c0904",
-"C 	c #C9C0C3",
+".H c #0c1200",
-"D 	c #CCC6C8",
+"as c #0c1300",
-"E 	c #C4BEBE",
+"an c #0d0600",
-"F 	c #CBCAB8",
+"#1 c #0d0900",
-"G 	c #6F744C",
+"#A c #0e0c00",
-"H 	c #08050C",
+"#u c #0f1400",
-"I 	c #010300",
+"#B c #141200",
-"J 	c #808147",
+".i c #585858",
-"K 	c #070700",
+"at c #666c3c",
-"L 	c #D0CBAB",
+"#v c #6d723a",
-"M 	c #C4BDAB",
+"#h c #6f744c",
-"N 	c #C4BDAD",
+".V c #707650",
-"O 	c #D2CCBE",
+"#G c #727d17",
-"P 	c #D0CABC",
+"aw c #74783d",
-"Q 	c #C8C2B4",
+"#7 c #747f33",
-"R 	c #C9C3B3",
+"#V c #74801e",
-"S 	c #CACAA8",
+"aC c #757b57",
-"T 	c #0F1400",
+".9 c #767849",
-"U 	c #6D723A",
+"#T c #777d35",
-"V 	c #0C0904",
+"#M c #78782e",
-"W 	c #787E28",
+".K c #787b4e",
-"X 	c #7C801F",
+".j c #787c5b",
-"Y 	c #080700",
+"#x c #787e28",
-"Z 	c #0E0C00",
+"ak c #787f32",
-"` 	c #141200",
+"#P c #797744",
-" .	c #070500",
+".W c #797b4c",
-"..	c #0A0A00",
+"#K c #79811e",
-"+.	c #060600",
+"#N c #7a7941",
-"@.	c #080E00",
+".x c #7a7c54",
-"#.	c #727D17",
+"#X c #7a8119",
-"$.	c #7F8A2E",
+"#O c #7b7a42",
-"%.	c #060800",
+"#R c #7b7a4c",
-"&.	c #010500",
+"#9 c #7b8127",
-"*.	c #79811E",
+"#y c #7c801f",
-"=.	c #8A9121",
+"#W c #7c8323",
-"-.	c #78782E",
+"#Q c #7e7b4e",
-";.	c #7A7941",
+"al c #7e8235",
-">.	c #7B7A42",
+"av c #7f8348",
-",.	c #797744",
+"#H c #7f8a2e",
-"'.	c #7E7B4E",
+"#U c #7f8b1f",
-").	c #7B7A4C",
+"#S c #80804e",
-"!.	c #80804E",
+".u c #808080",
-"~.	c #777D35",
+"#k c #808147",
-"{.	c #7F8B1F",
+".7 c #81865e",
-"].	c #74801E",
+"ai c #828a4f",
-"^.	c #7C8323",
+"a. c #83882c",
-"/.	c #7A8119",
+"#L c #8a9121",
-"(.	c #090700",
+"aA c #bebfb1",
-"_.	c #070100",
+".G c #bec0b2",
-":.	c #090400",
+".o c #c0bebf",
-"<.	c #0D0900",
+".Y c #c1bca8",
-"[.	c #060000",
+".2 c #c3bdbd",
-"}.	c #050000",
+".v c #c3c3c3",
-"|.	c #050200",
+".s c #c3c4bc",
-"1.	c #080B00",
+"#n c #c4bdab",
-"2.	c #030C00",
+"#o c #c4bdad",
-"3.	c #747F33",
+"#f c #c4bebe",
-"4.	c #020500",
+".P c #c4c1bc",
-"5.	c #7B8127",
+".E c #c4c2c7",
-"6.	c #83882C",
+".0 c #c5c0bc",
-"7.	c #070300",
+".l c #c5c6b6",
-"8.	c #090300",
+".t c #c5c9b2",
-"9.	c #060100",
+"#c c #c6bdbe",
-"0.	c #040000",
+".D c #c6c4c7",
-"a.	c #04000E",
+".z c #c6c5b0",
-"b.	c #0A0219",
+".n c #c6c5c1",
-"c.	c #CAC6C7",
+"aq c #c7c2c6",
-"d.	c #CCCCB2",
+".Q c #c7c3c4",
-"e.	c #010A00",
+".N c #c7c4bb",
-"f.	c #828A4F",
+".B c #c7c4bd",
-"g.	c #010100",
+".p c #c7c4cd",
-"h.	c #787F32",
+".S c #c7c6c2",
-"i.	c #7E8235",
+".F c #c7c6c4",
-"j.	c #060200",
+".A c #c7c7bd",
-"k.	c #0D0600",
+".5 c #c7c9b4",
-"l.	c #080300",
+"#a c #c8c0bd",
-"m.	c #030010",
+"#r c #c8c2b4",
-"n.	c #C7C2C6",
+".R c #c8c6c7",
-"o.	c #CFD1BC",
+".T c #c8c9b7",
-"p.	c #0C1300",
+"#d c #c9c0c3",
-"q.	c #666C3C",
+"#s c #c9c3b3",
-"r.	c #080901",
+".r c #c9c9cb",
-"s.	c #7F8348",
+"af c #cac6c7",
-"t.	c #74783D",
+".m c #cac9c4",
-"u.	c #0A0500",
+"#t c #cacaa8",
-"v.	c #05000E",
+"#g c #cbcab8",
-"w.	c #01000E",
+"#e c #ccc6c8",
-"x.	c #BEBFB1",
+".O c #ccc7c1",
-"y.	c #040900",
+".3 c #ccc8c7",
-"z.	c #757B57",
+".q c #ccc9d2",
-"A.	c #030500",
+"ag c #ccccb2",
-"B.	c #0A0C00",
+".4 c #cdc9c6",
-"C.	c #030000",
+".Z c #cecac1",
-"D.	c #070400",
+"## c #cfc8b6",
-"E.	c #050102",
+"ar c #cfd1bc",
-"F.	c #03000B",
+"#q c #d0cabc",
-"G.	c #01000C",
+"#m c #d0cbab",
-"H.	c #050209",
+".C c #d0cfcb",
-"I.	c #070800",
+"#p c #d2ccbe",
-". + + . @ @ # $ $ % & * = - ",
+".M c #d3d1ba",
-"= ; > , ' ) ! ~ { ] ^ + / = ",
+"#b c #d5cccd",
-"( _ : < [ } | 1 2 3 4 5 6 7 ",
+".1 c #d6d1ce",
-"( 8 9 0 a b c d e f g h i . ",
+"Qt.#.#Qt.a.a.b.c.c.d.e.f.g.h.i.i.i.i.i.i.i.i.i.i.i.i.i.i",
-"( j k l m n o p q r s t u v ",
+".g.j.k.l.m.n.o.p.q.r.s.#.t.g.i.u.i.v.v.v.v.v.v.v.v.i.v.i",
-"( w x y z A B C D E F : G H ",
+".w.x.y.z.A.B.C.D.E.F.G.H.I.J.i.u.i.v.v.v.v.v.E.F.v.i.i.i",
-"I J K L M N O P Q R S T U V ",
+".w.K.L.M.N.O.P.Q.R.S.T.U.VQt.i.u.i.v.v.v.v.Q.v.v.v.i.u.i",
-"* W X Y Z `  . ...+.@.#.$.%.",
+".w.W.X.Y.Z.0.1.2.3.4.5.6.7.8.i.u.i.v.v.v.v.2.v.v.v.i.u.i",
-"&.*.=.-.;.>.,.'.).!.~.{.].: ",
+".w.9#.###a#b#c#d#e#f#g.y#h#i.i.u.i.v.v.v#c#d#e#f.v.i.u.i",
-"&.^./.(._.:.<.[.}.|.1.2.3.k ",
+"#j#k#l#m#n#o#p#q#r#s#t#u#v#w.i.u.i.v.v.v.v.v.v.v.v.i.u.i",
-"4.5.6.7.8.9.0.a.b.c.d.e.f.g.",
+".f#x#y#z#A#B#C#C#D#E#F#G#H#I.i.u.u.i.i.i.i.i.i.i.i.u.u.i",
-"9 h.i.j.k.[.l.a.m.n.o.p.q.r.",
+"#J#K#L#M#N#O#P#Q#R#S#T#U#V.y.i.u.u.u.u.u.u.u.u.u.u.u.u.i",
-"I s.t.u.9.0.0.v.w.2 x.y.z.. ",
+"#J#W#X#Y#Z#0#1#2#3#4#5#6#7.X.i.u.u.i.i.i.i.i.i.i.i.i.u.i",
-"  A.B.0.C.D.E.F.G.H.I.+ + & "};
+"#8#9a.a#aaabacadaeafagahaiaj.i.u.u.i.i.i.i.i.i.v.v.i.u.i",
+".Lakalaman#2aoadapaqarasatau.i.u.u.i.i.i.i.i.i.v.v.i.u.i",
+"#javawaxabacacayaz.EaAaBaCQt.i.u.u.i.i.i.i.i.i.v.v.i.u.i",
+"aDaEaFacaGaHaIaJaKaLaM.#.#.e.v.i.i.i.i.i.i.i.i.i.i.i.i.i"};

images/laz_images.lrs

@@ -202,67 +202,67 @@
     +'  K b u.v.w.x.@ y.{ y.        "};'#10
   );
   LazarusResources.Add('btn_save','XPM',
-    '/* XPM */'#10'static char * btn_save_xpm[] = {'#10'"14 14 166 2",'#10'"  '
+    '/* XPM */'#10'static char *btn_save[]={'#10'"28 14 169 2",'#10'"aD c None'
-    +#9'c None",'#10'". '#9'c #000100",'#10'"+ '#9'c #000400",'#10'"@ '#9'c #0'
+    +'",'#10'".e c #000000",'#10'".a c #000002",'#10'".b c #000005",'#10'".d c'
-    +'00002",'#10'"# '#9'c #000005",'#10'"$ '#9'c #00000C",'#10'"% '#9'c #0000'
+    +' #000007",'#10'".c c #00000c",'#10'"Qt c #000100",'#10'".g c #000200",'
-    +'07",'#10'"& '#9'c #000000",'#10'"* '#9'c #010400",'#10'"= '#9'c #000200"'
+    +#10'".# c #000400",'#10'".I c #000600",'#10'".8 c #010000",'#10'"aK c #01'
-    +','#10'"- '#9'c #050704",'#10'"; '#9'c #787C5B",'#10'"> '#9'c #020600",'
+    +'000c",'#10'"az c #01000e",'#10'"aj c #010100",'#10'".w c #010200",'#10'"'
-    +#10'", '#9'c #C5C6B6",'#10'"'' '#9'c #CAC9C4",'#10'") '#9'c #C6C5C1",'#10
+    +'#j c #010300",'#10'".f c #010400",'#10'"#J c #010500",'#10'".U c #010600'
-    +'"! '#9'c #C0BEBF",'#10'"~ '#9'c #C7C4CD",'#10'"{ '#9'c #CCC9D2",'#10'"] '
+    +'",'#10'".6 c #010700",'#10'"ah c #010a00",'#10'".J c #020300",'#10'"#8 c'
-    +#9'c #C9C9CB",'#10'"^ '#9'c #C3C4BC",'#10'"/ '#9'c #C5C9B2",'#10'"( '#9'c'
+    +' #020500",'#10'".k c #020600",'#10'"aG c #030000",'#10'"aJ c #03000b",'
-    +' #010200",'#10'"_ '#9'c #7A7C54",'#10'": '#9'c #030600",'#10'"< '#9'c #C'
+    +#10'"ap c #030010",'#10'"aE c #030500",'#10'".y c #030600",'#10'"#6 c #03'
-    +'6C5B0",'#10'"[ '#9'c #C7C7BD",'#10'"} '#9'c #C7C4BD",'#10'"| '#9'c #D0CF'
+    +'0c00",'#10'"ac c #040000",'#10'"ad c #04000e",'#10'".L c #040600",'#10'"'
-    +'CB",'#10'"1 '#9'c #C6C4C7",'#10'"2 '#9'c #C4C2C7",'#10'"3 '#9'c #C7C6C4"'
+    +'aB c #040900",'#10'"#3 c #050000",'#10'"ay c #05000e",'#10'"aI c #050102'
-    +','#10'"4 '#9'c #BEC0B2",'#10'"5 '#9'c #0C1200",'#10'"6 '#9'c #000600",'
+    +'",'#10'"#4 c #050200",'#10'"aL c #050209",'#10'".h c #050704",'#10'"#2 c'
-    +#10'"7 '#9'c #020300",'#10'"8 '#9'c #787B4E",'#10'"9 '#9'c #040600",'#10
+    +' #060000",'#10'"ab c #060100",'#10'"am c #060200",'#10'"#E c #060600",'
-    +'"0 '#9'c #D3D1BA",'#10'"a '#9'c #C7C4BB",'#10'"b '#9'c #CCC7C1",'#10'"c '
+    +#10'"#I c #060800",'#10'"#Z c #070100",'#10'"a# c #070300",'#10'"aH c #07'
-    +#9'c #C4C1BC",'#10'"d '#9'c #C7C3C4",'#10'"e '#9'c #C8C6C7",'#10'"f '#9'c'
+    +'0400",'#10'"#C c #070500",'#10'"#l c #070700",'#10'"aM c #070800",'#10'"'
-    +' #C7C6C2",'#10'"g '#9'c #C8C9B7",'#10'"h '#9'c #010600",'#10'"i '#9'c #7'
+    +'.X c #070900",'#10'"ao c #080300",'#10'"#i c #08050c",'#10'"#z c #080700'
-    +'07650",'#10'"j '#9'c #797B4C",'#10'"k '#9'c #070900",'#10'"l '#9'c #C1BC'
+    +'",'#10'"au c #080901",'#10'"#5 c #080b00",'#10'"#F c #080e00",'#10'"aa c'
-    +'A8",'#10'"m '#9'c #CECAC1",'#10'"n '#9'c #C5C0BC",'#10'"o '#9'c #D6D1CE"'
+    +' #090300",'#10'"#0 c #090400",'#10'"#Y c #090700",'#10'"ae c #0a0219",'
-    +','#10'"p '#9'c #C3BDBD",'#10'"q '#9'c #CCC8C7",'#10'"r '#9'c #CDC9C6",'
+    +#10'"ax c #0a0500",'#10'"#D c #0a0a00",'#10'"aF c #0a0c00",'#10'"#. c #0b'
-    +#10'"s '#9'c #C7C9B4",'#10'"t '#9'c #010700",'#10'"u '#9'c #81865E",'#10
+    +'0a00",'#10'"#w c #0c0904",'#10'".H c #0c1200",'#10'"as c #0c1300",'#10'"'
-    +'"v '#9'c #010000",'#10'"w '#9'c #767849",'#10'"x '#9'c #0B0A00",'#10'"y '
+    +'an c #0d0600",'#10'"#1 c #0d0900",'#10'"#A c #0e0c00",'#10'"#u c #0f1400'
-    +#9'c #CFC8B6",'#10'"z '#9'c #C8C0BD",'#10'"A '#9'c #D5CCCD",'#10'"B '#9'c'
+    +'",'#10'"#B c #141200",'#10'".i c #585858",'#10'"at c #666c3c",'#10'"#v c'
-    +' #C6BDBE",'#10'"C '#9'c #C9C0C3",'#10'"D '#9'c #CCC6C8",'#10'"E '#9'c #C'
+    +' #6d723a",'#10'"#h c #6f744c",'#10'".V c #707650",'#10'"#G c #727d17",'
-    +'4BEBE",'#10'"F '#9'c #CBCAB8",'#10'"G '#9'c #6F744C",'#10'"H '#9'c #0805'
+    +#10'"aw c #74783d",'#10'"#7 c #747f33",'#10'"#V c #74801e",'#10'"aC c #75'
-    +'0C",'#10'"I '#9'c #010300",'#10'"J '#9'c #808147",'#10'"K '#9'c #070700"'
+    +'7b57",'#10'".9 c #767849",'#10'"#T c #777d35",'#10'"#M c #78782e",'#10'"'
-    +','#10'"L '#9'c #D0CBAB",'#10'"M '#9'c #C4BDAB",'#10'"N '#9'c #C4BDAD",'
+    +'.K c #787b4e",'#10'".j c #787c5b",'#10'"#x c #787e28",'#10'"ak c #787f32'
-    +#10'"O '#9'c #D2CCBE",'#10'"P '#9'c #D0CABC",'#10'"Q '#9'c #C8C2B4",'#10
+    +'",'#10'"#P c #797744",'#10'".W c #797b4c",'#10'"#K c #79811e",'#10'"#N c'
-    +'"R '#9'c #C9C3B3",'#10'"S '#9'c #CACAA8",'#10'"T '#9'c #0F1400",'#10'"U '
+    +' #7a7941",'#10'".x c #7a7c54",'#10'"#X c #7a8119",'#10'"#O c #7b7a42",'
-    +#9'c #6D723A",'#10'"V '#9'c #0C0904",'#10'"W '#9'c #787E28",'#10'"X '#9'c'
+    +#10'"#R c #7b7a4c",'#10'"#9 c #7b8127",'#10'"#y c #7c801f",'#10'"#W c #7c'
-    +' #7C801F",'#10'"Y '#9'c #080700",'#10'"Z '#9'c #0E0C00",'#10'"` '#9'c #1'
+    +'8323",'#10'"#Q c #7e7b4e",'#10'"al c #7e8235",'#10'"av c #7f8348",'#10'"'
-    +'41200",'#10'" .'#9'c #070500",'#10'"..'#9'c #0A0A00",'#10'"+.'#9'c #0606'
+    +'#H c #7f8a2e",'#10'"#U c #7f8b1f",'#10'"#S c #80804e",'#10'".u c #808080'
-    +'00",'#10'"@.'#9'c #080E00",'#10'"#.'#9'c #727D17",'#10'"$.'#9'c #7F8A2E"'
+    +'",'#10'"#k c #808147",'#10'".7 c #81865e",'#10'"ai c #828a4f",'#10'"a. c'
-    +','#10'"%.'#9'c #060800",'#10'"&.'#9'c #010500",'#10'"*.'#9'c #79811E",'
+    +' #83882c",'#10'"#L c #8a9121",'#10'"aA c #bebfb1",'#10'".G c #bec0b2",'
-    +#10'"=.'#9'c #8A9121",'#10'"-.'#9'c #78782E",'#10'";.'#9'c #7A7941",'#10
+    +#10'".o c #c0bebf",'#10'".Y c #c1bca8",'#10'".2 c #c3bdbd",'#10'".v c #c3'
-    +'">.'#9'c #7B7A42",'#10'",.'#9'c #797744",'#10'"''.'#9'c #7E7B4E",'#10'")'
+    +'c3c3",'#10'".s c #c3c4bc",'#10'"#n c #c4bdab",'#10'"#o c #c4bdad",'#10'"'
-    +'.'#9'c #7B7A4C",'#10'"!.'#9'c #80804E",'#10'"~.'#9'c #777D35",'#10'"{.'#9
+    +'#f c #c4bebe",'#10'".P c #c4c1bc",'#10'".E c #c4c2c7",'#10'".0 c #c5c0bc'
-    +'c #7F8B1F",'#10'"].'#9'c #74801E",'#10'"^.'#9'c #7C8323",'#10'"/.'#9'c #'
+    +'",'#10'".l c #c5c6b6",'#10'".t c #c5c9b2",'#10'"#c c #c6bdbe",'#10'".D c'
-    +'7A8119",'#10'"(.'#9'c #090700",'#10'"_.'#9'c #070100",'#10'":.'#9'c #090'
+    +' #c6c4c7",'#10'".z c #c6c5b0",'#10'".n c #c6c5c1",'#10'"aq c #c7c2c6",'
-    +'400",'#10'"<.'#9'c #0D0900",'#10'"[.'#9'c #060000",'#10'"}.'#9'c #050000'
+    +#10'".Q c #c7c3c4",'#10'".N c #c7c4bb",'#10'".B c #c7c4bd",'#10'".p c #c7'
-    +'",'#10'"|.'#9'c #050200",'#10'"1.'#9'c #080B00",'#10'"2.'#9'c #030C00",'
+    +'c4cd",'#10'".S c #c7c6c2",'#10'".F c #c7c6c4",'#10'".A c #c7c7bd",'#10'"'
-    +#10'"3.'#9'c #747F33",'#10'"4.'#9'c #020500",'#10'"5.'#9'c #7B8127",'#10
+    +'.5 c #c7c9b4",'#10'"#a c #c8c0bd",'#10'"#r c #c8c2b4",'#10'".R c #c8c6c7'
-    +'"6.'#9'c #83882C",'#10'"7.'#9'c #070300",'#10'"8.'#9'c #090300",'#10'"9.'
+    +'",'#10'".T c #c8c9b7",'#10'"#d c #c9c0c3",'#10'"#s c #c9c3b3",'#10'".r c'
-    +#9'c #060100",'#10'"0.'#9'c #040000",'#10'"a.'#9'c #04000E",'#10'"b.'#9'c'
+    +' #c9c9cb",'#10'"af c #cac6c7",'#10'".m c #cac9c4",'#10'"#t c #cacaa8",'
-    +' #0A0219",'#10'"c.'#9'c #CAC6C7",'#10'"d.'#9'c #CCCCB2",'#10'"e.'#9'c #0'
+    +#10'"#g c #cbcab8",'#10'"#e c #ccc6c8",'#10'".O c #ccc7c1",'#10'".3 c #cc'
-    +'10A00",'#10'"f.'#9'c #828A4F",'#10'"g.'#9'c #010100",'#10'"h.'#9'c #787F'
+    +'c8c7",'#10'".q c #ccc9d2",'#10'"ag c #ccccb2",'#10'".4 c #cdc9c6",'#10'"'
-    +'32",'#10'"i.'#9'c #7E8235",'#10'"j.'#9'c #060200",'#10'"k.'#9'c #0D0600"'
+    +'.Z c #cecac1",'#10'"## c #cfc8b6",'#10'"ar c #cfd1bc",'#10'"#q c #d0cabc'
-    +','#10'"l.'#9'c #080300",'#10'"m.'#9'c #030010",'#10'"n.'#9'c #C7C2C6",'
+    +'",'#10'"#m c #d0cbab",'#10'".C c #d0cfcb",'#10'"#p c #d2ccbe",'#10'".M c'
-    +#10'"o.'#9'c #CFD1BC",'#10'"p.'#9'c #0C1300",'#10'"q.'#9'c #666C3C",'#10
+    +' #d3d1ba",'#10'"#b c #d5cccd",'#10'".1 c #d6d1ce",'#10'"Qt.#.#Qt.a.a.b.c'
-    +'"r.'#9'c #080901",'#10'"s.'#9'c #7F8348",'#10'"t.'#9'c #74783D",'#10'"u.'
+    +'.c.d.e.f.g.h.i.i.i.i.i.i.i.i.i.i.i.i.i.i",'#10'".g.j.k.l.m.n.o.p.q.r.s.#'
-    +#9'c #0A0500",'#10'"v.'#9'c #05000E",'#10'"w.'#9'c #01000E",'#10'"x.'#9'c'
+    +'.t.g.i.u.i.v.v.v.v.v.v.v.v.i.v.i",'#10'".w.x.y.z.A.B.C.D.E.F.G.H.I.J.i.u'
-    +' #BEBFB1",'#10'"y.'#9'c #040900",'#10'"z.'#9'c #757B57",'#10'"A.'#9'c #0'
+    +'.i.v.v.v.v.v.E.F.v.i.i.i",'#10'".w.K.L.M.N.O.P.Q.R.S.T.U.VQt.i.u.i.v.v.v'
-    +'30500",'#10'"B.'#9'c #0A0C00",'#10'"C.'#9'c #030000",'#10'"D.'#9'c #0704'
+    +'.v.Q.v.v.v.i.u.i",'#10'".w.W.X.Y.Z.0.1.2.3.4.5.6.7.8.i.u.i.v.v.v.v.2.v.v'
-    +'00",'#10'"E.'#9'c #050102",'#10'"F.'#9'c #03000B",'#10'"G.'#9'c #01000C"'
+    +'.v.i.u.i",'#10'".w.9#.###a#b#c#d#e#f#g.y#h#i.i.u.i.v.v.v#c#d#e#f.v.i.u.i'
-    +','#10'"H.'#9'c #050209",'#10'"I.'#9'c #070800",'#10'". + + . @ @ # $ $ %'
+    +'",'#10'"#j#k#l#m#n#o#p#q#r#s#t#u#v#w.i.u.i.v.v.v.v.v.v.v.v.i.u.i",'#10'"'
-    +' & * = - ",'#10'"= ; > , '' ) ! ~ { ] ^ + / = ",'#10'"( _ : < [ } | 1 2 '
+    +'.f#x#y#z#A#B#C#C#D#E#F#G#H#I.i.u.u.i.i.i.i.i.i.i.i.u.u.i",'#10'"#J#K#L#M'
-    +'3 4 5 6 7 ",'#10'"( 8 9 0 a b c d e f g h i . ",'#10'"( j k l m n o p q '
+    +'#N#O#P#Q#R#S#T#U#V.y.i.u.u.u.u.u.u.u.u.u.u.u.u.i",'#10'"#J#W#X#Y#Z#0#1#2'
-    +'r s t u v ",'#10'"( w x y z A B C D E F : G H ",'#10'"I J K L M N O P Q '
+    +'#3#4#5#6#7.X.i.u.u.i.i.i.i.i.i.i.i.i.u.i",'#10'"#8#9a.a#aaabacadaeafagah'
-    +'R S T U V ",'#10'"* W X Y Z `  . ...+.@.#.$.%.",'#10'"&.*.=.-.;.>.,.''.)'
+    +'aiaj.i.u.u.i.i.i.i.i.i.v.v.i.u.i",'#10'".Lakalaman#2aoadapaqarasatau.i.u'
-    +'.!.~.{.].: ",'#10'"&.^./.(._.:.<.[.}.|.1.2.3.k ",'#10'"4.5.6.7.8.9.0.a.b'
+    +'.u.i.i.i.i.i.i.v.v.i.u.i",'#10'"#javawaxabacacayaz.EaAaBaCQt.i.u.u.i.i.i'
-    +'.c.d.e.f.g.",'#10'"9 h.i.j.k.[.l.a.m.n.o.p.q.r.",'#10'"I s.t.u.9.0.0.v.w'
+    +'.i.i.i.v.v.i.u.i",'#10'"aDaEaFacaGaHaIaJaKaLaM.#.#.e.v.i.i.i.i.i.i.i.i.i'
-    +'.2 x.y.z.. ",'#10'"  A.B.0.C.D.E.F.G.H.I.+ + & "};'#10
+    +'.i.i.i.i"};'#10
   );
   LazarusResources.Add('btn_stepinto','XPM',
     '/* XPM */'#10'static char * btn_stepinto_xpm[] = {'#10'"13 16 5 1",'#10'"'