* Added images to the treeviews in connection editor and dictionary editor

git-svn-id: trunk@15809 -

.gitattributes

@@ -3801,13 +3801,31 @@ tools/install/win/lazarus_install_cheetah.bmp -text svneol=unset#image/bmp
 tools/install/win/lazarus_install_cheetah_small.bmp -text svneol=unset#image/bmp
 tools/install/win/readme.txt svneol=native#text/plain
 tools/lazdatadesktop/README.txt svneol=native#text/plain
+tools/lazdatadesktop/bitmaps/btndown.bmp -text
+tools/lazdatadesktop/bitmaps/btndown.xpm -text
+tools/lazdatadesktop/bitmaps/btnup.bmp -text
+tools/lazdatadesktop/bitmaps/btnup.xpm -text
+tools/lazdatadesktop/bitmaps/ddconnection.png -text svneol=unset#image/png
+tools/lazdatadesktop/bitmaps/dddatadict.png -text svneol=unset#image/png
+tools/lazdatadesktop/bitmaps/ddfield.png -text svneol=unset#image/png
+tools/lazdatadesktop/bitmaps/ddfields.png -text svneol=unset#image/png
+tools/lazdatadesktop/bitmaps/ddforeignkey.png -text svneol=unset#image/png
+tools/lazdatadesktop/bitmaps/ddforeignkeys.png -text svneol=unset#image/png
+tools/lazdatadesktop/bitmaps/ddindex.png -text svneol=unset#image/png
+tools/lazdatadesktop/bitmaps/ddindexes.png -text svneol=unset#image/png
+tools/lazdatadesktop/bitmaps/ddtable.png -text svneol=unset#image/png
+tools/lazdatadesktop/bitmaps/ddtabledata.png -text svneol=unset#image/png
+tools/lazdatadesktop/bitmaps/ddtables.png -text svneol=unset#image/png
 tools/lazdatadesktop/bitmaps/deletefield.bmp -text
 tools/lazdatadesktop/bitmaps/deletetable.bmp -text
+tools/lazdatadesktop/bitmaps/generateimages svneol=native#text/plain
 tools/lazdatadesktop/bitmaps/generatesql.bmp -text
 tools/lazdatadesktop/bitmaps/newfield.bmp -text
 tools/lazdatadesktop/bitmaps/newtable.bmp -text
 tools/lazdatadesktop/bitmaps/qrybtn_close.xpm svneol=native#text/plain
+tools/lazdatadesktop/bitmaps/qrybtn_code.xpm svneol=native#text/plain
 tools/lazdatadesktop/bitmaps/qrybtn_execute.xpm svneol=native#text/plain
+tools/lazdatadesktop/bitmaps/qrybtn_export.xpm svneol=native#text/plain
 tools/lazdatadesktop/bitmaps/qrybtn_next.xpm svneol=native#text/plain
 tools/lazdatadesktop/bitmaps/qrybtn_open.xpm svneol=native#text/plain
 tools/lazdatadesktop/bitmaps/qrybtn_previous.xpm svneol=native#text/plain
@@ -3815,6 +3833,7 @@ tools/lazdatadesktop/bitmaps/qrybtn_save.xpm svneol=native#text/plain
 tools/lazdatadesktop/conneditor.pp svneol=native#text/plain
 tools/lazdatadesktop/datapanel.pp svneol=native#text/plain
 tools/lazdatadesktop/ddfiles.pp svneol=native#text/plain
+tools/lazdatadesktop/dicteditor.lrs svneol=native#text/plain
 tools/lazdatadesktop/dicteditor.pp svneol=native#text/plain
 tools/lazdatadesktop/frmgeneratesql.lfm svneol=native#text/plain
 tools/lazdatadesktop/frmgeneratesql.lrs svneol=native#text/plain

tools/lazdatadesktop/bitmaps/generateimages

@@ -0,0 +1,6 @@
+#!/bin/sh
+../../lazres ../dicteditor.lrs ddtables.png ddtable.png ddfields.png ddfield.png\
+  ddindexes.png ddindex.png ddforeignkeys.png ddforeignkey.png ddtabledata.png\
+  dddatadict.png ddconnection.png
+  
+  

tools/lazdatadesktop/bitmaps/qrybtn_code.xpm

@@ -0,0 +1,226 @@
+/* XPM */
+static char *qrybtn_code[]={
+"22 22 201 2",
+".r c #000000",
+".w c #000001",
+"b. c #000002",
+".F c #000003",
+"b# c #000004",
+"## c #000008",
+"#y c #000009",
+"#H c #00000b",
+"am c #00000c",
+"ba c #000100",
+"bb c #000200",
+"be c #000201",
+"a7 c #000300",
+"#l c #010205",
+".M c #020107",
+".Y c #02020e",
+"bg c #020300",
+"bf c #030400",
+"#Q c #03040c",
+"#4 c #03050b",
+"bd c #040706",
+".U c #060512",
+"#r c #060709",
+"aU c #080b02",
+"bc c #080b0a",
+"aH c #090c05",
+"aq c #1d1c22",
+"a# c #1d1c23",
+"ar c #1d1d22",
+"#7 c #1d1d23",
+"aa c #1e1c23",
+"#6 c #1e1d23",
+".f c #20201f",
+"a9 c #2e2e30",
+"#B c #38373e",
+"#C c #38383e",
+"#A c #39383e",
+"#D c #393842",
+"ab c #3a383e",
+"#E c #403e5e",
+".V c #5c5973",
+".5 c #6d6d75",
+".6 c #6f6e75",
+"#8 c #6f6f74",
+".3 c #6f6f75",
+".4 c #706f75",
+".2 c #707075",
+".7 c #717078",
+".8 c #76748b",
+"an c #797979",
+"a6 c #7a7c75",
+"a8 c #7c7c7c",
+"au c #7d7d7d",
+"#n c #7d7d81",
+".Z c #7e7e7e",
+"af c #7f7f7f",
+".a c #80817c",
+"aI c #828282",
+"#L c #8a8a91",
+"#K c #8b8a91",
+"#J c #8b8b91",
+"#M c #8c8b93",
+"#N c #8f8fa3",
+".b c #91928d",
+".e c #989895",
+"#q c #9998a2",
+"#G c #9a9aa3",
+".v c #9b9b9a",
+"ae c #9b9ca2",
+".q c #9c9c9a",
+"#P c #9c9da4",
+"#. c #9d9ca2",
+"#k c #9d9da0",
+"at c #9d9da2",
+"al c #9d9da4",
+".X c #9e9ca4",
+"#x c #9e9da2",
+".E c #9e9ea0",
+"#3 c #9e9fa3",
+".L c #9f9ea2",
+"aT c #a0a39a",
+".T c #a19ea6",
+"aG c #a1a39e",
+"#U c #a5a5ac",
+"aD c #a5a6ac",
+"#T c #a6a5ac",
+"#Z c #a6a6ac",
+"#S c #a6a7ac",
+"aC c #a6a8ac",
+"az c #a6a9ac",
+"aA c #a6aaac",
+"#0 c #a7a6ac",
+"ay c #a7a9ac",
+"ax c #a8a9ac",
+"aB c #a8aaac",
+"aE c #a9aaac",
+"aV c #acacac",
+"#1 c #b2b0b6",
+"#f c #bdbec7",
+"#m c #bfbec1",
+"#d c #c0c1c7",
+"a. c #c1c1c5",
+"#c c #c1c1c7",
+"#e c #c2c1c7",
+"#b c #c2c2c7",
+"a0 c #c2c6c6",
+"as c #c3c4c7",
+"#V c #c3c4ca",
+"a5 c #c3c5bd",
+"a4 c #c3c6c2",
+"a3 c #c3c6c3",
+"aZ c #c3c6c6",
+"aY c #c3c6c7",
+"a2 c #c3c7c6",
+"a1 c #c3c8c7",
+"ap c #c5c4c7",
+"aW c #c5c6c6",
+"aX c #c5c6c7",
+"#5 c #c6c5c8",
+"#F c #c9c8d6",
+"ao c #cccbcc",
+"#z c #cccbce",
+"av c #cccdce",
+".0 c #cecdce",
+"ag c #cecdcf",
+"aJ c #ceced0",
+".W c #d4d1dc",
+".9 c #dad8e2",
+".1 c #dad9dc",
+"#g c #dcdbe2",
+"#O c #dedee8",
+".d c #e0e0dc",
+".c c #e0e1dc",
+"#I c #e1e0e3",
+"#Y c #e2e3e8",
+"aw c #e7e8ea",
+"aF c #e7e9e7",
+"#R c #e8e7ea",
+"#a c #efeef1",
+"#p c #f3f2fe",
+"#v c #f6f4ff",
+"#w c #f7f5ff",
+"ak c #f7f6ff",
+"#X c #f7f7fd",
+"#t c #f7f7ff",
+"#W c #f7f8fd",
+"#u c #f7f8ff",
+".R c #f8f6ff",
+".P c #f8f7ff",
+".B c #f8f8f8",
+"#9 c #f8f8fb",
+"aj c #f8f8ff",
+"aQ c #f8fbfc",
+".O c #f9f7ff",
+"ai c #f9f8ff",
+".u c #f9f9f7",
+".A c #f9f9fb",
+"#o c #f9f9ff",
+"ad c #f9faff",
+"aP c #f9fcfe",
+"aM c #f9fdff",
+"aN c #f9feff",
+".I c #faf7ff",
+".Q c #faf8ff",
+"#h c #faf9fe",
+".p c #fafaf7",
+".k c #fafaf9",
+"#j c #fafafe",
+"#i c #fafaff",
+"#2 c #fafbff",
+"aL c #fafdff",
+"aO c #fafeff",
+".H c #fbf7ff",
+".N c #fbf9ff",
+"ah c #fbfaff",
+".j c #fbfbfa",
+".C c #fbfbfb",
+"ac c #fbfbff",
+"aS c #fbfef7",
+".K c #fcfaff",
+".o c #fcfcf9",
+".t c #fcfcfb",
+"#s c #fcfcff",
+"aK c #fcfdff",
+"aR c #fcfffc",
+".G c #fdf9ff",
+".S c #fdfaff",
+".y c #fdfbff",
+".z c #fdfcff",
+".l c #fdfdfa",
+".s c #fdfdfc",
+".m c #fdfefa",
+".x c #fefbff",
+".J c #fefcff",
+".i c #fefdfe",
+".n c #fefefb",
+".D c #fefeff",
+"Qt c #ff0000",
+".g c #fffcff",
+".h c #fffdff",
+".# c #ffffff",
+"QtQtQt.#.#.#QtQt.#.#.#QtQtQt.#.#.#.#.#.#.a.b",
+"Qt.#.#Qt.#Qt.#.#Qt.#Qt.#.#Qt.#.#.c.c.d.d.e.f",
+"Qt.#.#Qt.#Qt.g.hQt.#Qt.i.j.k.l.m.n.l.o.p.q.r",
+"QtQtQt.#.#QtQtQtQt.#QtQtQt.k.s.t.s.s.j.u.v.w",
+"Qt.#.#.#.#Qt.#.#Qt.#.x.y.zQt.A.B.C.D.D.D.E.F",
+"Qt.#.#.x.#Qt.G.HQt.#Qt.x.IQt.J.z.z.z.K.z.L.M",
+"Qt.#.z.N.#Qt.O.OQt.#QtQtQt.P.O.Q.O.R.S.S.T.U",
+".#.#.#.#.#.#.#.#.#.#.#.#.#.#.#.#.#.#.V.W.X.Y",
+".Z.0.1.2.3.3.3.3.3.3.3.3.3.3.4.5.6.7.8.9#.##",
+".Z.0#a#b#c#d#d#d#d#d#d#c#c#c#e#f#g#h#i#j#k#l",
+".Z.0#m.M.M.M.M.M.M.M.M.M.M.M.M.M#n.A#o#p#q#r",
+".Z.0#s#o.P#t#u#u#t#t#t#t#t#t.P#v#w.R.K.y#x#y",
+".Z.0#z#A#B#B#C#C#B#B#B#B#B#B#B#B#B#D#E#F#G#H",
+".Z.0#I#J#K#K#K#K#L#L#L#L#L#L#K#J#J#M#N#O#P#Q",
+".Z.0#R#S#T#T#T#T#U#V#W#X#X#Y#T#Z#0#1#i#2#3#4",
+".Z.0#5#6#6#6#6#7#7#8#9#9#9a.a##6aaabacadae##",
+"afag.zahaiaiajajajajaj.P.Pak#v.P.O.Oacacalam",
+"anaoapaqaqaqaqaqaqaqaqaqaqaqaqaqaqaqarasat##",
+"auavawaxayayaxayayazaAayayayaBaBaCaDaEaFaGaH",
+"aIaJaKaKaLaLaLaLaLaMaNaLaLaLaOaOaPaQaRaSaTaU",
+"aIaVaWaXaYaZaZaZaZaZaZaZaZa0a0a1a2a3a4a5a6a7",
+"a8a9b.b#b#.Fb.babababbbbbbbbbabcbdbebabfbgba"};

tools/lazdatadesktop/bitmaps/qrybtn_export.xpm

@@ -0,0 +1,25 @@
+/* XPM */
+static char *qrybtn_export[]={
+"16 16 6 1",
+"# c None",
+". c #008000",
+"a c #00ff00",
+"b c #808000",
+"c c #c0c000",
+"d c #ffff00",
+"...........#####",
+".aaaaaaaaa.#####",
+".aaaaaaaaa.#####",
+"........aa.#####",
+"#######.aa.#####",
+"#######.aa.#####",
+"#####...aa...###",
+"bbbccc.aaaa.cbbb",
+"bcccccc.aa.ccccb",
+"bcdccccc..cccdcb",
+"bcdcdccccccdcdcb",
+"bcdcddddddddcdcb",
+"bcddccccccccddcb",
+"bbcddddccddddcb#",
+"##bcccddddcccb##",
+"###bbbccccbbb###"};

tools/lazdatadesktop/conneditor.pp

@@ -25,7 +25,8 @@ unit conneditor;
 interface
 
 uses
-  Classes, SysUtils, db, fpdatadict, controls, comctrls, stdctrls, extctrls, RTTIGrids, querypanel;
+  Classes, SysUtils, db, fpdatadict, controls, comctrls, stdctrls, extctrls,
+  graphics, imglist, lresources, RTTIGrids, querypanel;
 
 Type
 
@@ -38,6 +39,7 @@ Type
     FDisplay: TPanel;
     FSplit : TSplitter;
     FTV: TTreeView;
+    FImgList : TImageList;
     FTSDisplay : TTabsheet;
     FTSQuery : TTabsheet;
     FQueryPanel : TQueryPanel;
@@ -143,6 +145,19 @@ end;
 
 constructor TConnectionEditor.Create(AOwner: TComponent);
 
+Const
+  ImageNames : Array[0..9] of string =
+        ('ddconnection','ddtables','ddtable','ddfields','ddfield',
+         'ddindexes','ddindex','ddtabledata',
+         // Need images for these...
+         'ddtables','ddtables');
+
+
+
+Var
+  P : TPortableNetworkGraphic;
+  I : Integer;
+
 begin
   inherited Create(AOwner);
   FTV:=TTreeView.Create(Self);
@@ -151,6 +166,19 @@ begin
   FTV.Align:=alLeft;
   FTV.Width:=300;
   FTV.OnSelectionChanged:=@DoSelectNode;
+  // Image list
+  FImgList:=TImageList.Create(Self);
+  For I:=0 to 8 do
+    begin
+    P:=TPortableNetworkGraphic.Create;
+    try
+      P.LoadFromLazarusResource(ImageNames[i]);
+      FImgList.Add(P,Nil);
+    finally
+      P.Free;
+    end;
+    end;
+  FTV.Images:=FImgList;
   // Splitter
   FSplit:=TSplitter.Create(Self);
   FSplit.Parent:=Self;
@@ -216,7 +244,10 @@ function TConnectionEditor.NewNode(TV : TTreeView;ParentNode: TTreeNode; ACaptio
 begin
   Result:=TV.Items.AddChild(ParentNode,ACaption);
   If AImageIndex>=0 then
+    begin
     Result.ImageIndex:=FImageOffset+AImageIndex;
+    Result.SelectedIndex:=Result.ImageIndex;
+    end;
 end;
 
 procedure TConnectionEditor.ShowDatabase;

tools/lazdatadesktop/dicteditor.lrs

@@ -0,0 +1,191 @@
+LazarusResources.Add('ddtables','PNG',[
+  #137'PNG'#13#10#26#10#0#0#0#13'IHDR'#0#0#0#16#0#0#0#16#8#6#0#0#0#31#243#255'a'
+  +#0#0#0#6'bKGD'#0#255#0#255#0#255#160#189#167#147#0#0#0#251'IDATx'#218#141#147
+  +'1j'#134'0'#20#128#191#196#12#226#226#224#181'D'#197#181'['#143#208#173'S'
+  +#233#25#186'w'#235#5#20'Q<'#141#139#160#160'EO'#144#14#197#7#255'o'#148'<'
+  +#200#242'H'#222#251#222#151'D'#1#22#255'P'#207#9#3#240#254#246#197'<'#255#222
+  +#158#252#254#249#184#172'h'#173#181#12#195'@'#16#4'h'#173'e'#1#146'K'#146#228
+  +#154#0#160#239'{'#148'Rh'#173'I'#211#148#182'm'#255';(E'#158#231#183'3Yk-'
+  +#227'8J'#231#163'+ '#185'8'#142#157#5#132#160#235':!'#200#178#140#166'i'#132
+  +#160'('#10#0'^_>O^'#132'`'#158'g'#167#131#131'('#138'"'#166'i:y'#17#130#166
+  +'i'#208'Z'#203#204'UU'#9'AY'#150#0'N/B'#176','#203'C'#247#231'['#8#195#144'u'
+  +']O^'#156#4'EQP'#215#181'l>'#8'\^'#132'`'#219#182#219'[0'#198#176#239#251#201
+  +#139'9*'#250#132#203#139'q'#189'._/'#15#239#192#21'>^'#174#216#189#189'\'#22
+  +#240#253#223''#6#25'm'#31#243#166#8'J'#0#0#0#0'IEND'#174'B`'#130
+]);
+LazarusResources.Add('ddtable','PNG',[
+  #137'PNG'#13#10#26#10#0#0#0#13'IHDR'#0#0#0#16#0#0#0#16#8#6#0#0#0#31#243#255'a'
+  +#0#0#0#6'bKGD'#0#255#0#255#0#255#160#189#167#147#0#0#0#9'pHYs'#0#0#11#17#0#0
+  +#11#17#1'd_'#145#0#0#0#7'tIME'#7#211#4#30#14'&)'#150#202't'#15#0#0#0#201'ID'
+  +'ATx'#156#197#146'1'#10#131'0'#24#133'_~3'#136#139#131#215#10#26'<J7'#167#30
+  +#162'{'#183'^ '#18#20'O'#227#226#16#144#226#13#210#161#248#163#165'Fi'#7''#8
+  +#132#7#143#247#189#252#1#206#30#177#184#251'_|r'#169'V'#151#27#156'{'#6#157
+  +#247#199'u'#155#192'{'#143#190#239#17'E'#17#136#136#15#0#214#178','#219'&'#0
+  +#128#174#235' '#132#0#17'A)'#133#166'i'#222'IB'#160'('#138#237'.3'#193'0'#12
+  +#156'<'#167#2'`-M'#211'0A'#219#182'L'#144#231'9'#172#181'L'#160#181#222'''p'
+  +#206'}}'#131#153'(I'#146'0'#129#181#22'D'#196#157#141'1LP'#150#229'>'#193'8'
+  +#142#171#244#207'-'#196'q|'#156'@k'#141#186#174#185#194'!'#130'i'#154#130'['
+  +#144'R'#174'|'#229#243#231#5#212#244'C'#202'}OC'#245#0#0#0#0'IEND'#174'B`'
+  +#130
+]);
+LazarusResources.Add('ddfields','PNG',[
+  #137'PNG'#13#10#26#10#0#0#0#13'IHDR'#0#0#0#16#0#0#0#16#8#2#0#0#0#144#145'h6'#0
+  +#0#0#129'IDATx'#218#237#143#177#13#4'!'#12#4#247'NW'#8'5'#144'!'#185#16#234
+  +#160'$jA'#162#11'J@'#14#188#146#195#15#248#244#239#143#143''#163#13'<'#242
+  +','#176#153#3#192#24#3'@kMDn'#138#170#198#24#175#197#145'tw'#146#0'>'#149#213
+  +#15#0#181'Vw'#255'*cf'#165#148#183#18#201#222'{'#206#249#6#152's'#134#16#206
+  +#221#209#215#218#244'Di'#229#4' ")'#165#13#224#175#244#228#131#170#146'4'#179
+  +'9'#231#205#169#170#226#135#188#0'c#e'#220'=2'#176#0#0#0#0'IEND'#174'B`'#130
+]);
+LazarusResources.Add('ddfield','PNG',[
+  #137'PNG'#13#10#26#10#0#0#0#13'IHDR'#0#0#0#16#0#0#0#16#8#6#0#0#0#31#243#255'a'
+  +#0#0#0#6'bKGD'#0#255#0#255#0#255#160#189#167#147#0#0#0#165'IDATx'#218#237#147
+  +#177#13#131'0'#16'E'#31#17'+0'#0'S '#22#160#160'eW'#10#6#0'y'#23#155#194'pBT'
+  +#151#2#225#232#148'*r'#138#20#185#238#219'wO'#254'_'#231#2'P2'#170#4'P'#181
+  +#140'eY'#24#199#209#156#245'}O'#219#182'I{'#239#169#170#234#2#0'l'#219#150'.'
+  +'E'#132#243'<'#13'@DL'#207#190#239#0'<'#200#172'l@'#1#232'<'#207#136#200'G'
+  +#131'1F'#134'a'#184#0#170'j'#252'9'#231#152#166#201#12't]G'#211'4I'#135#16
+  +#168#235#250#7'2'#248#135#248#133#12#202#251'c'#220#187'}'#251';'#142#227#205
+  +'s'#8'!'#233'u]_!'#230#188#224#9'F'#198'g'#20#20#10'B'#245#0#0#0#0'IEND'#174
+  +'B`'#130
+]);
+LazarusResources.Add('ddindexes','PNG',[
+  #137'PNG'#13#10#26#10#0#0#0#13'IHDR'#0#0#0#16#0#0#0#16#8#6#0#0#0#31#243#255'a'
+  +#0#0#0#6'bKGD'#0#255#0#255#0#255#160#189#167#147#0#0#1'.IDATx'#218#173#147'='
+  +'K'#3'A'#24#132#159#4'G'#252#7#146#235'-Sh'#20#237#21#236#5#17#4#11'+[Ie'
+  +#163' !'#133' W'#138'D'#212#152#194'.'#16'r'#205#129'ge'#19#18'8'#18'L'#208
+  +#160#146#147'K1'#22'&'#199#229#195#143#11#14#188#205#238#206#236#12';'#27'#'
+  +#26#196'?!'#221#23'K'#15'T'#154','#176#248#29#25'@'#146#228'8'#142#0#189#182
+  +'kzqU}'#188'W'#165't'#167#221#157'm'#1#231#128'1'#137#12' '#223#247#3#129
+  +#167'jE'#237#186#29#204#179#251#160#229#165#5#245']'#140'9'#156#1#232#245'zt'
+  +#187']'#0'>'#222#154'Ca'#19's'#171#216#165'<W'#215#183'7'#192',P'#15#239#199
+  +#1','#203#194#243'<'#0#220'F'#11#183#209#10#200#229'b'#14'c'#254'K'#4#168#1
+  +#137#177#167#233't:*'#20#10#129#173#236#225#158#0#149#139'9'#1':'#216#223#20
+  +' '#187#148#31#156#25#18'I'#141#228'J'#1#186'8'#203#12#145#129#13'@'#167''''
+  +#25#253#165#15#169#9'd'#128'd'#232#162'_'#145#28'!OD,J'#253#140#149#173'5'
+  +#192#12'-'#173#199'#V'#216#4#176'/'#143'b'#192'1`Fu0'#150'=>'#205'O'#10'9'
+  +#152'N '#140'O['#158#170#226#167#251#191''''#0#0#0#0'IEND'#174'B`'#130
+]);
+LazarusResources.Add('ddindex','PNG',[
+  #137'PNG'#13#10#26#10#0#0#0#13'IHDR'#0#0#0#16#0#0#0#16#8#6#0#0#0#31#243#255'a'
+  +#0#0#0#6'bKGD'#0#255#0#255#0#255#160#189#167#147#0#0#0#153'IDATx'#218#197#209
+  +';'#10#194'P'#16#133#225'/"Xj'#229#26#2#130#157';'#177'pK'#238'A'#4'u'#3'.@,'
+  +#197#210'>'#133#141' '#198#202'F'#240'E,'#188#133#157#185'F'#240'o'#206#192
+  +'03g8'#188'X'#227#134'B$'#181#160's,UdT'#197#193#215#252'lA'#138#230'['#157
+  +#150']'#144#4'->'#244#18#255#164'T2'#29'lp'#193#2#237#216'++d'#232#6#157#197
+  +':'#184'b'#18#234')'#142#177'1'#238#195#27#141#16'a+'#246#133'>'#206'x'#224
+  +#132'm'#172#131#3'z'#24'`'#135'q'#172#131#12'w'#228#24#162'^v'#240#9'V'#239
+  +#31'G'#240#168'm'#6#0#0#0#0'IEND'#174'B`'#130
+]);
+LazarusResources.Add('ddforeignkeys','PNG',[
+  #137'PNG'#13#10#26#10#0#0#0#13'IHDR'#0#0#0#16#0#0#0#16#8#6#0#0#0#31#243#255'a'
+  +#0#0#0#6'bKGD'#0#255#0#255#0#255#160#189#167#147#0#0#2#1'IDATx'#218#141#146
+  +#189'kZa'#20#198'~'#197'['#189#141#130#162'p'#189#193#224#226#16#26#255#128
+  +'B[:\A!P'''#23#151'l'#217#26'B '#155#184'er'#19#179'u('#193#169#238'.'#165
+  +#180#147'(b'#168#147#8'Z?'#224#130'H'#163'1z'#5#237#237#18'/'#180'D'#241#129
+  +#3#135#151's~'#188'<'#231#1'`_'#9#133'B_'#188'^'#239'/@u'#187#221#221#131
+  +#131#131'O'#192#27#192#201#22#153#14#15#15'/'#253'~'#255#181#162'(f'#143#199
+  +#131'$I'#140#199'cJ'#165#18#229'r'#249'O'#175#215#203#2#151#27#1#128'~ss'#131
+  +','#203#180#219'm'#22#139#5#154#166#177'X,x||$'#155#205#174#231#158#149#25' '
+  +#24#12#210#239#247'Y'#173'V,'#151'K'#163'v'#145#25'`'#181'Z'#225't:'#141'EQ'
+  +#20#145'$i'''#136#25'`0'#24#224'p8'#144'e'#153#163#163'#$Ib2'#153#160#170'*'
+  +#22#139#133'm'#6#155#0#189'P(P'#175#215#241#249'|'#0'\\\'#0#16#137'D'#176#219
+  +#237'D'#163'Q6'#25'l'#2#244't:M0'#24#228#244#244#212#248#218'|'#166#241#194
+  +'!pvvF<'#30#223'h'#176#21'`:'#157#210#233't'#140'E'#128'Z'#165#201#244'a'#134
+  +#248#210#1'@8'#28'~'#214'`3p'#156#203#229#238#27#141#134#241'X'#171'4'#177
+  +#217#172#220#213'Z'#220#255'~ '#159#207'o4'#216#10#252#212'4'#237'C'#177'X<'
+  +#1#206'k'#149'&?'#190#222#25#176'u/'#203'2v'#187#157#249'|N'#187#221'FUU'#3#0
+  +#240#237#169#206#255'?'#211'U&E"'#145'`0'#24#176'>y'#171#213#194#229'r'#253#3
+  +'0'#244#250#237'1'#0#215#233#207'\eR$'#147'I'#20'E'#161'^'#175#163#235':'#203
+  +#229#18#155#205#198'h4z'#22#176#142#172'~'#149'I'#1#16#8#4#232't:'#132#195'a'
+  +#4'A`8'#28#210#237'v'#217#219#219'ck'#198#159#244'J'#16#132#239#177'X'#204#13
+  +' '#138'"'#179#217#12'M'#211#168'V'#171#154#170#170#31'M;'#196#253#29'p'#2
+  +#188#7'<'#192#24'('#3#13#224#246'/'#213'Y'#0#220#150'w'#140'3'#0#0#0#0'IEND'
+  +#174'B`'#130
+]);
+LazarusResources.Add('ddforeignkey','PNG',[
+  #137'PNG'#13#10#26#10#0#0#0#13'IHDR'#0#0#0#16#0#0#0#16#8#6#0#0#0#31#243#255'a'
+  +#0#0#0#6'bKGD'#0#255#0#255#0#255#160#189#167#147#0#0#1'HIDATx'#218#149#146'?'
+  +'K'#3'A'#16#197''#185#139#18#4#193'Nb'#136'QI'#161#130#221'}'#6#27#177#177
+  +#187#207#16#236#211#219#164#218#250#138#16'R_kem'#233#16#162#28#6'L'#12#4';'
+  +#137#158#23#2'J'#254'\l6 '#186#23#206#129')'#230#205#219'7'#195#155#133#191
+  +#177'''"E'#160#168#148'*'#1#251#190#239#151#128']'#3#23#203#128'9'#192#17'pX'
+  +#169'T'#14#128#29#160#0'l'#155#4#178#6#236#162'^'#175''#137#8#211#233#20#165
+  +#20#173'Vk'#217#187#251'M'#206#24#4#206#129'K'#128'^'#175#247'Y.'#151#151#248
+  +#21' '#252'#F"2'#2#22#171'H&'#15#206#244#163'M'#157#232#250'4'#173#192'u'#173
+  +'V#'#12'C'#250#253'>"B'#181'Z'#5#184'I'#187#250'l2'#153#204#128#185'R*'#6'b'
+  +#223#247#231'@'#156#246#10'q'#20'E'#0#4'A'#176#208'[f'#146#166#153#4#222#7
+  +#131#129#13#216#141'Fcm'#5'/'#177#241#242'c'#234#6'`'#235':'#155#214#196#7
+  +#160#11'<5'#155#205#14#208#209'u7'#173#192'3'#208#6#2#215'u'#5'x'#212#162#29
+  +#147#128'm'#192#10#150'eE'#158#231#133#185'\n'#156#207#231#223'Dd,"'#175#166
+  +#159'hrw'#11'8'#1'f"'#178#238'8NV'#243#218#192'0'#141#137#31#192'-p'#12','
+  +#175'p'#159't'#133'o'#148'Np'#204#150#227#220#234#0#0#0#0'IEND'#174'B`'#130
+]);
+LazarusResources.Add('ddtabledata','PNG',[
+  #137'PNG'#13#10#26#10#0#0#0#13'IHDR'#0#0#0#16#0#0#0#16#8#6#0#0#0#31#243#255'a'
+  +#0#0#0#6'bKGD'#0#255#0#255#0#255#160#189#167#147#0#0#1'KIDATx'#218#189#147'1'
+  +'K'#195'P'#20#133#191#220#4','#133#142#254#10#23'''A'#196'Aq'#213#134'l'#130
+  +#139#131#147#155#232#224#228#143'p*B)'#21#23#7'Q'#219#186#186'g'#20#193'1P'
+  +#10'RlL+"H'#133#227#160#13'V'#210#22'E'#188#240#134#247#184#231';'#231'>'#184
+  +#240#207#165#207#179#246'+q'#255'~AOW'#171#3#8#0'^'#134'Cf'#189'=,'#210#15
+  +#167#216'>'#138#134#222#191#3#216#223'9'#164#221'~L'#239#229#147#3#222#218#11
+  +#244#195#28'{'#167#9#199#231#183#227'cJR'#20'Ej6'#155#2#244#26#205#235#249'r'
+  +'E'#219#155#203#2#20#134#161#198'%'#149'$'#149'J%'#1'z'#185#153'SR_'#213'FqF'
+  +#128'*'#149#138#146'$'#153#12'h'#181'Z'#2'tw'#182#171#173#245'Y'#1#138#227'X'
+  +'I'#146#168#215#235#13#1#156#12#0#142#227'P\'#154#230#226#250#1#128'j'#181
+  +#250#209#236'8'#248#190'O'#161'PH'#181'#'#1#0'q'#28'cf'#152#25#0'f'#134#235
+  +#186#228#243#249#241#128'r'#185#140#153'}$)'#22#169#215#235'i'#130' '#8'&'#3
+  +':'#157'N'#234#252'5'#129#235#186#152#25#185'\.'#213'zY?'#217'h4'#210#4#190
+  +#239'S'#171#213#210#17#130' '#24#234#205'L'#208#237'vS'#231#129#235#0'`fx'
+  +#158'7z'#132#31#236#134#243''''#235#249#14#181'q'#159'F '#156#234'w'#0#0#0#0
+  +'IEND'#174'B`'#130
+]);
+LazarusResources.Add('dddatadict','PNG',[
+  #137'PNG'#13#10#26#10#0#0#0#13'IHDR'#0#0#0#16#0#0#0#16#8#6#0#0#0#31#243#255'a'
+  +#0#0#0#6'bKGD'#0#0#0#0#0#0#249'C'#187''#0#0#1#130'IDATx'#218#165#147#177#202
+  +#226'@'#20#133'?'#23'5'#130'!'#22#17#139#16#208'.'#157#173#237#178'E'#26'a'
+  +#159'c'#31'f'#177#246#5#246#17','#180#17';'#215'(X,h!Db'#196#4'Ia4&'#129#132
+  +'l'#179#255#160#149#242#239#192'e.g'#206'9\'#14'w'#224'?O'#233#223']|V_'#254
+  +#232'6'#155#141'@'#195'0DQ'#148''''#230'#'#22#134'!'#189'^'#15#128#242'#)'
+  +#138'"'#0#14#135#3#157'N'#231#201#224#17';'#157'N'#2#255#242#169#185'K%'#209
+  +#151'_'#145'-'#203'b6'#155#177'Z'#173#8#130#0'UU'#233'v'#187#31#207'u'#17#226
+  +'h4"'#142#227''''#241't:e'#185'\b'#154'&'#170#170#162'i'#26#151#203#133#241
+  +'x'#204'|>'#199'u'#221#159#194#160'('#10#174#215'+'#0#147#201#4#211'4Q'#20
+  +#133#225'p'#136#174#235#216#182'M'#154#166'$IB'#154#166'DQ'#196'`0x'#157'A'
+  +#187#221#198'u]'#242'<'''#203'2Qo'#135#152#231'9'#245'z]'#8'eYF'#211'4a'#242
+  +'2'#196#227#241'H'#179#217'D'#215'u$I"'#142'cl'#219#198#243#188#247#12#20'Ea'
+  +#177'X'#208'j'#181#196'D'#187#221#142'F'#163#241#158#193'v'#187#197'0'#12#214
+  +#235'5EQ'#144'e'#25#149'J'#133' '#8#158#13'<'#207#195'q'#28#0'|'#223#23#171
+  +'}'#187#221#216#239#247#24#134'A'#173'V'#227'|>'#227'8'#14#213'j'#245#189#207
+  +'$I'#18#253'~'#31#0'Y'#150#185#223#239'$I'#130'eY'#248#190#255#163#244#198
+  +#230'~'#5#190#3#223#0#21#184#0#191#129'?'#192#175#191'A '#187#30#133'o'#165
+  +'i'#0#0#0#0'IEND'#174'B`'#130
+]);
+LazarusResources.Add('ddconnection','PNG',[
+  #137'PNG'#13#10#26#10#0#0#0#13'IHDR'#0#0#0#16#0#0#0#16#8#6#0#0#0#31#243#255'a'
+  +#0#0#0#6'bKGD'#0#255#0#255#0#255#160#189#167#147#0#0#2'3IDATx'#218#173#145'?'
+  +'h'#19'a'#24#198'MSb'#155'4'#9#222'5'#129#203#165#9'A'#144#22#28'D'#196'B'
+  +#196#162#208'Pp+F'#204#224#159#209#201#169#197#10#197'Mp1'#131'8'#148'.'#197
+  +'A('#149'8'#184#216#128#138#1'E'#18#237'"'#162'Hb'#175#185'3mZ'#26'0'#214#152
+  +'\{g'#29'l'#142'FS\|'#224#229#27#222#247'}'#222#31#223#3#187'r'#187#221#177
+  +'H$'#146#18'E'#177#8#148#189'^'#175#26#12#6'g'#129'S'#128#147'}'#212#1#16#14
+  +#135''''#252'~'#255#237'X,f'#19#4#1'I'#146#168'V'#171#164#211'i'#178#217#236
+  +'OM'#211#146#192#196#190#6#192#206#244#244'4'#178','#163'('#10#186#174#211'h'
+  +'4'#208'u'#157'Z'#173'F2'#153'D'#20'Eucc'#195#225#245'z'#183'z{{'#159'i'#154
+  +'6'#11','#218#155'N'#161'P'#136'b'#177#136'i'#154#24#134'aUSSSS'#253'{'#200
+  +#174#0#151'4MK'#218#154#3#166'i'#226't:'#173'E'#151#203#133'$I'#150'Igg'''
+  +#170#170#178#182#182#198#192#192#0#241'x'#220#6#140'['#4#165'R'#9'Q'#20#145
+  +'e'#25#135#195'A'#189'^GQ'#20#202#229#178'u'#160#29#153'}O'#10#228'r9|>'#159
+  +#181'P('#20#240'x<'#0'-d'#130' '#144#207#231'-'#131#29#128'D"'#209'6&Y'#150
+  +#173#183#29#153#253#238#157#7'lm'#25#140#223#184#204#219#23'O'#16#252#1'Lc'
+  +#27#0#189'Q'#231#221#235#231'$'#174#221'd~~'#158'h4'#250#23#153']Y*S'#253#250
+  +#253'7'#182#177'Mm'#179#218'Bpd'#232'4'#139#153#5#142#13#143'R'#169'T'#24#28
+  +#28#164#171#171#139'J'#165#2#128'm'#239#176#222#168#3#176'Z'#252'L'#250#225
+  +'}JK'#159#0'pt;y'#181#240#136'L&C('#20'bff'#134'T*'#213#250#137#0'?6'#191'q'
+  +#208''''#225#17#250'8><'#194#135'7/Y_Q'#241'I'#253#172#175#168#0'LNN'#146'}'
+  +#250#24#195'0'#136#142#142#181#26#172'.'#231#233#147#130#244#184#220#244#184
+  +#220#156'<{'#222#234#5'"'#135'y'#159#27#1'`'#253#203'2g'#198'.'#2#28#237'h'
+  +#166#0'\'#0#230#230#238#221'B'#10#31#194'q'#160#187'm*Z'#225'#'#231#174'^'#7
+  +#24#2#178''#246#3#187#134#255#170#19#252'/'#253#2#193'l'#5#146'7'#136#155'M'
+  +#0#0#0#0'IEND'#174'B`'#130
+]);

tools/lazdatadesktop/dicteditor.pp

@@ -25,7 +25,8 @@ unit dicteditor;
 interface
 
 uses
-  Classes, SysUtils, fpdatadict, controls, comctrls, stdctrls, extctrls, RTTIGrids;
+  Classes, SysUtils, fpdatadict, controls, comctrls, stdctrls, extctrls,
+  graphics, imglist, RTTIGrids, lresources;
 
 Type
 
@@ -34,6 +35,7 @@ Type
   TDataDictEditor = Class(TTabSheet)
   private
     FDD: TFPDataDictionary;
+    FIMgList : TImageList;
     FImageOffset: Integer;
     FModified: Boolean;
     FTV : TTreeView;
@@ -120,7 +122,10 @@ function TDataDictEditor.NewNode(TV : TTreeView;ParentNode: TTreeNode; ACaption:
 begin
   Result:=TV.Items.AddChild(ParentNode,ACaption);
   If AImageIndex>=0 then
+    begin
     Result.ImageIndex:=FImageOffset+AImageIndex;
+    Result.SelectedIndex:=Result.ImageIndex;
+    end;
 end;
 
 function TDataDictEditor.GetCurrentObjectType: TObjectType;
@@ -172,6 +177,17 @@ begin
 end;
 
 constructor TDataDictEditor.Create(AOwner: TComponent);
+
+Const
+  ImageNames : Array[0..8] of string =
+        ('dddatadict','ddtables','ddtable','ddfields','ddfield',
+         'ddtables','ddtabledata','ddindexes','ddindex');
+
+
+Var
+  P : TPortableNetworkGraphic;
+  I : Integer;
+
 begin
   inherited Create(AOwner);
   FDD:=TFPDataDictionary.Create;
@@ -189,6 +205,18 @@ begin
   FTV.Parent:=Self;
   FTV.Align:=alClient;
   FTV.OnSelectionChanged:=@DoSelectNode;
+  FIMgList:=TImageList.Create(Self);
+  For I:=0 to 8 do
+    begin
+    P:=TPortableNetworkGraphic.Create;
+    try
+      P.LoadFromLazarusResource(ImageNames[i]);
+      FImgList.Add(P,Nil);
+    finally
+      P.Free;
+    end;
+    end;
+  FTV.Images:=FImgList;
   ShowDictionary;
 end;
 
@@ -692,5 +720,7 @@ begin
   Modified:=True;
 end;
 
+initialization
+{$i dicteditor.lrs}
 end.