From a573219f6fba6805d7772e2be502f4a95b558308 Mon Sep 17 00:00:00 2001 From: JenneJ Date: Wed, 27 Apr 2016 16:50:39 +0200 Subject: [PATCH] JJ 27.04.2016 --- .../DD-Record-Organiser.vbproj | 6 ++ .../My Project/Resources.Designer.vb | 60 ++++++++++++++++++ .../My Project/Resources.resx | 18 ++++++ app/DD-Record-Organiser/Resources/_blank.png | Bin 0 -> 558 bytes app/DD-Record-Organiser/Resources/doc.png | Bin 0 -> 1965 bytes app/DD-Record-Organiser/Resources/pdf.png | Bin 0 -> 1732 bytes app/DD-Record-Organiser/Resources/ppt.png | Bin 0 -> 1400 bytes app/DD-Record-Organiser/Resources/text.png | Bin 0 -> 1023 bytes app/DD-Record-Organiser/Resources/xls.png | Bin 0 -> 1838 bytes .../frmConstructor_Main.Designer.vb | 11 ++++ .../frmConstructor_Main.resx | 9 +++ .../frmConstructor_Main.vb | 35 +++++++++- 12 files changed, 137 insertions(+), 2 deletions(-) create mode 100644 app/DD-Record-Organiser/Resources/_blank.png create mode 100644 app/DD-Record-Organiser/Resources/doc.png create mode 100644 app/DD-Record-Organiser/Resources/pdf.png create mode 100644 app/DD-Record-Organiser/Resources/ppt.png create mode 100644 app/DD-Record-Organiser/Resources/text.png create mode 100644 app/DD-Record-Organiser/Resources/xls.png diff --git a/app/DD-Record-Organiser/DD-Record-Organiser.vbproj b/app/DD-Record-Organiser/DD-Record-Organiser.vbproj index 32e0db4..1610e71 100644 --- a/app/DD-Record-Organiser/DD-Record-Organiser.vbproj +++ b/app/DD-Record-Organiser/DD-Record-Organiser.vbproj @@ -1165,6 +1165,12 @@ + + + + + + diff --git a/app/DD-Record-Organiser/My Project/Resources.Designer.vb b/app/DD-Record-Organiser/My Project/Resources.Designer.vb index a72c57f..39907a2 100644 --- a/app/DD-Record-Organiser/My Project/Resources.Designer.vb +++ b/app/DD-Record-Organiser/My Project/Resources.Designer.vb @@ -110,6 +110,16 @@ Namespace My.Resources End Get End Property + ''' + ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. + ''' + Friend ReadOnly Property _blank() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("_blank", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' @@ -740,6 +750,16 @@ Namespace My.Resources End Get End Property + ''' + ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. + ''' + Friend ReadOnly Property doc() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("doc", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' @@ -1360,6 +1380,26 @@ Namespace My.Resources End Get End Property + ''' + ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. + ''' + Friend ReadOnly Property pdf() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("pdf", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. + ''' + Friend ReadOnly Property ppt() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("ppt", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' @@ -1510,6 +1550,16 @@ Namespace My.Resources End Get End Property + ''' + ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. + ''' + Friend ReadOnly Property text() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("text", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' @@ -1639,5 +1689,15 @@ Namespace My.Resources Return CType(obj,System.Drawing.Bitmap) End Get End Property + + ''' + ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. + ''' + Friend ReadOnly Property xls() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("xls", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property End Module End Namespace diff --git a/app/DD-Record-Organiser/My Project/Resources.resx b/app/DD-Record-Organiser/My Project/Resources.resx index 32a97a5..a1e305f 100644 --- a/app/DD-Record-Organiser/My Project/Resources.resx +++ b/app/DD-Record-Organiser/My Project/Resources.resx @@ -592,4 +592,22 @@ ..\Resources\lock.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + ..\Resources\doc.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\pdf.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\ppt.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\text.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\xls.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\_blank.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + \ No newline at end of file diff --git a/app/DD-Record-Organiser/Resources/_blank.png b/app/DD-Record-Organiser/Resources/_blank.png new file mode 100644 index 0000000000000000000000000000000000000000..ceebb42107f0a7e266f94ecd742d532d1e97504a GIT binary patch literal 558 zcmV+}0@3}6P) zeZT$B%zrkr)#50t&LhY5B+vd-RYsVrFmFgoMSz``!KQFF1HU) zx`t>M3It+ys`>-55GKI%1RI11z}QHI4MGH9v{GV&5CJF`i);`g0L7sK8-xfzVNkO{ zhydsT#Rj3W+>d*uFI9>SLPP--MQjjS0-%2P@U4iuMno`fwOR(6pDlQ6e!#oi6Oi%v zHGXWoq+^G>wdMuD%w!eLudZ|5J6tY-);hj_dOk=7z@7jsGr;EhO4n)~pI!8pLbk&g z+qcMgzk~I0s%y35u>mI_}7bA=b456+o)6*O5oj?;@bsRFVoWT*-l@ivOo6biTt wCFy4jhFip#8ksNv5K`!-ew!|z<4b@60F@IeIx5{MTtMu{3QAyG-Zy&1)XCk1@qg-gUYB@r+20>&rhk`RQbAh#fa z78SvkQm(yU_P*yF|CzIUc29S=XX#mrOqooX^Uciv&3~DHCUt0EQ)pXj@R$Un5cl7w7$Kb-zbrUNn~M-GWRr6>|bn~+0rLXg~u_uu5gassNt zTR{{dS5Ab(DVoM4y00QR&`mi+0$L&t->d}~3WagJ^*rAMRn?#<3KEGVBGEX8hr{TP zgps75x?mN0h6V#ydwVzun(nkM0)i;RJFyY&%6l-_c2*~q(!Begsc;ADa>m4auT$93 zmrz0jTx0+AMX-9)XJ(?;+G!&+h_#J5$CTjq2GnS1`Pd1J$O4^G8AN{-5<|TPiDYOH zs5avi>QfUj7B@4=+&~XJvlp3gDiMpE`V~^`w486O#4i1bSo^usp2U)`lEp)#CWiW; zk)4}%l}ydScAr-#Z=;vb=ggJ3*+~;hknSB@)+<;>jXYKKRWPR*L88}$iIeR+{Q(mR zrV)k6X5$jq+aZ*BAx&w@yOvcX6s)3XdW!7I99r}ROeEsNea81>Jc=YmEt!1A6$qM0 z#3+(w&lM*PaN#96?^;%oTqw#1@>I#2(n5+vf;lNOBl?yY?4dp3QqU@aFsO@cdi zYL57g4t6Mz^G++c&TTOvZblwI_^FglVpum1<`WX_yg-7B6*ZhpnglnaP`{4rx&nvn zAx%vwxQ;y&O5H{CRR;+zddp2D;-m$Yw2+L3AeC3^I7Xs!f{8?|tCN3=(?KUqnp$uT z&8`LgW?lvKO)NpdMb+*G5Ka#5i{N#aLdH z4#f-?m|!`-l@q(H#yTt}klY@!9NJly+_4EMXL9oVXC#3N2rdz7(zu%GTCp+`&BlFz z3(qo7tJH#NAu_~GNM_-+z!;eXj`nwPnIx847csZPo(42M|F?SUDf7X}Y@0bOC3}U& zxQPJM7E*pv%-r^TfIE`)A}%r+m&czqPAzbucfv!bvlXsn1o&xKgqm;b9onu53EG_{ zU{3>DaZY?&HDKQdl)G00z@66s?D~L~@`2{sAU3?P!1Q@A9K*h|ZPNDRwcPE({QD-OzS3u0Hs;?y z86T}$f^Dl78@QDZH(|%?%TQnC$M%D#v1QLOjxB^McS{_@ux!5lYgeFoa+QIz3boc6 zNSjcq-F5UFHt#-WKz6+O3|2fk13QnjqNTGNAHKK{mwN{B#Kx~N5Q%fl=AVw{#kF>J z;qi^%7<27AeE~nb^CF&lumLR{H%f7ku?H;0eCY7VlyU42b{)jh+0(Fc?hMqQ??ic- zjLkp(j)73bG}V?Lk8s@5S@&}7Fx>V7r%ZDl`MU#?-rAZggRN8|y+B$M*`%mk?&{-h zT~#>==F@Gy5;EL10 z=uXTYZYlp|HCq$uK31nxd3kpy?dIj1`fFWtUC@MKwYj$1z_qqt%Zsa^K(TH0)0p2> zo3*YD0{mi4JH%?501K<>K33m-R(}rM`O6>Jd-5EaM-*$8FM?kdO}I7BEi`b4&t2rW z*PeU?b(MYtv*D#Duwub1%xkL8jJ0b*=_f-iMPTK^Iha4af&X4#6F_}1Kti3u;ns`1 z@BOd#VB4F|K_i#&i!k4%(ko8^!>JA-!|O}u={Pc(?+%^BrXLO%xZheY zVDZ|IIj*^35<1BIKH2>nCpi#~m}IcXl?wl@gxlj?CwqK%G?9pfhY<~jHpGAaV*MC2 zpyj+ek9#Jh+Vz3toh4w)2V$`(um9)rp8x{@T+W!=PsV(u00000NkvXXu0mjfxfZgv literal 0 HcmV?d00001 diff --git a/app/DD-Record-Organiser/Resources/pdf.png b/app/DD-Record-Organiser/Resources/pdf.png new file mode 100644 index 0000000000000000000000000000000000000000..0f8a3e16fe4a0f8431caa4e9beb104f2a10c956e GIT binary patch literal 1732 zcmV;#20QtQP)Tx zd2*;RC%8i5nx6fy=j!AOfTXI?az&?{zDnt!I|6}t(w*4V&t5_J0w4|mg-V48kw7ZA z0Yu_0=QV+t28ih`0Wb*KJSr6hEi^gcPP|ZL-MMujegufgP9S^%5LH!@h36#^jb@Rw zpr{@;+3i3KbOXX404SdU7*CQ-Ef_@i{+uB~d9@9ltkp7E z7ly-6IloT}^|V&rw&*r0+NN$~k72YV7MDF92!_^l~i-?@Kg<7Gg&Lx3n6mCd72&)i>G5#Aq!_qBktf$`^_RH^~QLv*VfC5l%L)+ARhQwiSZHhNnm z+AuGKec?rbn9XJdjWYQhEkZvAda+(!*KzPM$;7v)qCsDw5mc@)jfk(1M+Y!Ph7e*VxZ!Vr-cb-M{ z+JkxCC}g*XVc^WWR4NJ21`+!EFrMcq0Fw%bDFTCH=zW?cMPV9?C1?pAe^6YZWxXuU z(q({R*a3hXKp&-6cXZ!!APed+h1he$sQXFKhJna+eRR7ulIUFd;+BIcRYpX3$4CP7 z0ImY>AC}oah3s{_uES6^vH%YXk0Nm;d=IH=Uz;G)FCC6__4}S8u!vHb13xu**|MCc zNhF%8D1GhRUK!AJ1ehj|a?8T=Yc(rPLNq0KL z!B|XC=a~c`JdY(RhPh@i^S(AtMx&&u3R%9H?==E8iHcA&SR7U=PA?Nf!bL(MvdCZY zoCBPvnx<0F)I@z}y0GCIHW%4=L^G<4{OOiA%&{E^2Ltc#eQcTPv2=DpViB zy(d1V#NL-0bV~F0Xzttv%FWzbSBIa?ox2F#dGVc}vtBE?arnKSC?t16Z`NIL{BY{k z{Z(oa1riAwedjIOf9Xro#zxoG89#P}Uc2@!Me&SvWZYw&5aw8GRCWKJ*#!eSRv}Ze zU3|QL_}#U8FC05c`{2!ygRj#+=P$I>Ny6~SYv0iX^!R=)f9_uShHiiQS;sQ&A&G4q zK->vs)P*%apK;!ICgS3LE1iX#Gj!+5*ED|UZ3>Q#u6fm2-}WyDtR_Qht@RMX&!U0~ zdp|fX#t)}%H~^|T&4v}K{0}nKs?T-fegtVfyv8XHR# zZJaB+k5v89$IVt8=s&DCdeZ50JBB2V( zQlLKooQU>4~zrwatWrvqwx(e|mrZ&SYN^ShcJz1>k8P;F4Fiwz{430D%8onr!hmu4hU9 a7hnJaw^*1{oDgvU00003^V%`?`GHbdN($VwDNlPy_xr$_ujnOC5$mRwOg;xe8hh~MDVS^ zujilpc6G^%lAE33c1mZ@QS}O{l^zhRFGW&Rp+DWclJgAV)Fkw|#pDFCkDpEPTLE$L ze+NK@Vo1;A0)yy3KzIm|GgCSa+S z0i)beru{eiL()bOvDVkIp>C)T?-(Aiu^9(IF&BgP6L&kVxqVpj}|&cc57*<6!lU?ji+DX#kBn z*ijXJKeht9X-%}4rsD=2t&WX zjo7POp^ZlE)AE8;} zFEvHt2yvL#wj=RkLqa{Du>2))yA>#G5;V&0o)B<_EzN+jCt3fKxKjuv#`$yFZ77fd zwV(Dn(sO=XaK);fZ71$SFR(Rowf8Sg}+ew`34&KWkmS1B$u(b z`pOR|a~Zei<~zfeZ+HqJsnhB+N-S4+d=^8GUNTE9i6#-hcm<oT)3n_#TokT*JZlbEt1F_OyF-5kkZUQ_RD_kKAZ zm>X-zM9*JBWMUSzjYaEt%m`KHTJe2(Kt0bW&K?+h=POHh@#YOw*KZ?sUNbuJ%w_d5 zj~v`f`wMfH@t6rfPRr&qUDu=VNHuFmp> zTMO#dPF4e8y@!y}9PnAr_bxPO06!sAZ!muSw@;)03NQcxd%V8C z2rAf!5QP@oJKh=F!o{|?bguWdlbqys9%tq^=bV`{jU$90P`PmZ&ZV>z>qT2~64WZo zt`&TC%+t@dtLIO5Ze(n*bs9qrsxB==!|rm`048TU^E(#mzk~_g!TXi18gZ)FGMb_;)2i|K-zVrBqe$wGEkDA%>|)3 zfFJ=RSxkP2ZTXwIAhZXFi-RR0K{W`?0i^XKKHjJrgbo04QXmTq!mI*>pmh7GExtIQ z5D78}OGFTwTfi3w|3a7}f-q{mc$yE(|w{-M#Z`dbq%Fi01llmNCw3_w%_Fq;z4+ElyY1n@@pKx8gNLZq>p z6@~c)#CQ>S=ru8bQgRsSODHxh5CcUqh((<(Ao2upw7XAi#DK#5M$YkiuU{bsNE85Y zyAX)Z030sF21mIGj7o#`j{!~#=zR+D0TBH!GQ#IVv2KAVNG14AA!+fV^j?i=3y>&J z=9De4PC-}iAf~>~1?+FHEQ906BE~;Wp?>c!RFxL9ddK_%Iv(~S(QL-K6Gs$v*sIFI z4q`#^6cUL{m_o0Nf1JkjmpT7$+P1G^2dnGo?#0g~CmTb*XucHHha1&F zg@_ygB7q_Rg7leQ6QuMz5*-YHh|DX!#{;mKOh`*j#`ED3lofA9 z(U#n>b@(??{_Mo+r$88tv6+JKDth-S2sdUrVmAb@+vFxzOL82`0Y% zTU$5!ZW6C1KA93K*rjHZ+$xj~`6hD4K&V{kO!GmnpRV@toj&2#2ht&1gUI`TtOf+JQi4hbHi6}&)B+5f23V}Gn zW7F}-7z5nclh>YouI;_ob57T;UCY|8mo1*;+r2&a`_B1(=X>6pDI`fktg(7$(Kd3a zfc&GI(4s?I>uQn_dXS#nP(nEq^{^3=YuLNJxOuV1BnZOE=XN}rG>BM3i4h(dX&IO_ zKHo%cDTo>WI{-Y#qiDiZOdOvl3y2X1pe6uprg12qP$CP65eLAjIE*o5$p&J?0jQK5 zj5@PyAVwU3QlUgTpCKEFQ31fKwX%U2vJObBfXJvlSxcc%faBCdahV#LZzWtOIE=zj zDOB-xP8h_n0XTbop;MItf0)H0eiKr03h0d*_pu4PE6tVo3Xf)75y3%Az=r^gA= z4_FP^=r!9-9bKIa1QDo_6~NSTE9_lf+-Y&b?eMc~AQGiiP_W!!&Cw#S&_FB@$P?yF zE#@s7kGiTR?A*VZS;t`Jq1FtYM>JZM$?FkT$_{|_HRN>D3~Dsgc1MA5_V_}|hbaS( z$B&+F55`W=qj-)r?jG%p4zxEohM7jC_@q)QkXK*?r&dBi?v;c{ri9-s1~v}kt*_~X z%i+VgNk&Y6JUgNFA&o#CQ1eRUPRd}x84luh6LqgZu-|KQF`{l$Jj*IyT}k9cA`!|k zsbR2aqCm9Vw8Lrlq2X#b;h_PYneduY0!2vHN=#pXc&#!51XaHNpH332DiqGJkRm2; z@lQDh2FF8AzMcR;lqDt>8Nu_aq}NO-27;|bGNjY1Vae7-fwHZAe;6L0_c z5tYPodEElb{q*E*Bo@q>e1s*aE^YrhWHrIiF_46>3VsRq+uW=lqRMMXz*@3&QSQ`7 zEOfWkmDJh~y$%S1h&#Og`g)P2{( zl-KDw)*FRCoy(4ZCt&6#&5K0WAYiTJX1Oxgx@Ej z`9?1ZbRiB1DYZ8;NsPTf2T6%EXoG{Og?q%eIkkegQ5u`0snbPXe0=0(hAK_Dh;u=t zNXWWgkBG*rJuF^K1f;>jC;yoyksyxQr;|-7MS7eRl4IsoDOn3mY2a-wz#t8}r`>F< zz2b#Id;kxyK)O*K*J?BaX?RWIIX}i;DFUFchZxn7QVdX8QItj*Kq{YA637A%AAyW6 zw6thFCTEu6^!4v?rTsLUv!vOuX4ZRfd+peF_Fd!{3$XIBO}KFDD4}C9*DbLvz|!LN zjF*nKp6mF%_Uq7^vh_m2AP&;GhNEm#sxYrgXLHZb+>FWAQk-u*%6@A(J^O9e*&<|v zWYUhs%X2?qd{pUE@$B)&Y zz~QzJJQoLYdMw#9H;$mCs~(ng8(x^R1s|^d1FtXMO-{coCcl_cFVz3Za4_Ze2Ok}| zroxD4;T8}dApid17x7Kyc3f-{Uts-{x;)#>B(&@E79ko5axdVX!(tcKEhke_Fzg@S!nLBYlr(?G9!vV zo&~sgF(8H&g3|m&D9u}ly0&T@zw{lO`?=~1JUeRxR+PSqgJ*UTnZSng3ZB6uwwV#@ z9jM$zW&%{B!ibF2}%qL3KwN_#8iHgwtp>umM z&Qgf+glIl@xOy2+%mX1VQQLe0pB{S?tI9WG$+Wd>zUlro>^;8~RX0u~+|GyE_@Vw+ zLakL*a6C7vorJ&751&Wa{?nGL+md%7;?I8n=(eMxfK+0D1d)HVyU|qIX>$6~C|e-j c_)mZV0M*ud?gE-g`Tzg`07*qoM6N<$f(UtSod5s; literal 0 HcmV?d00001 diff --git a/app/DD-Record-Organiser/frmConstructor_Main.Designer.vb b/app/DD-Record-Organiser/frmConstructor_Main.Designer.vb index be33925..c1be2b8 100644 --- a/app/DD-Record-Organiser/frmConstructor_Main.Designer.vb +++ b/app/DD-Record-Organiser/frmConstructor_Main.Designer.vb @@ -443,8 +443,19 @@ Partial Class frmConstructor_Main ' 'GridViewDoc_Search ' + Me.GridViewDoc_Search.Appearance.HorzLine.BackColor = CType(resources.GetObject("GridViewDoc_Search.Appearance.HorzLine.BackColor"), System.Drawing.Color) + Me.GridViewDoc_Search.Appearance.HorzLine.ForeColor = CType(resources.GetObject("GridViewDoc_Search.Appearance.HorzLine.ForeColor"), System.Drawing.Color) + Me.GridViewDoc_Search.Appearance.HorzLine.Options.UseBackColor = True + Me.GridViewDoc_Search.Appearance.HorzLine.Options.UseForeColor = True + Me.GridViewDoc_Search.Appearance.OddRow.BackColor = CType(resources.GetObject("GridViewDoc_Search.Appearance.OddRow.BackColor"), System.Drawing.Color) + Me.GridViewDoc_Search.Appearance.OddRow.Options.UseBackColor = True Me.GridViewDoc_Search.GridControl = Me.GridControlDocSearch Me.GridViewDoc_Search.Name = "GridViewDoc_Search" + Me.GridViewDoc_Search.OptionsBehavior.Editable = False + Me.GridViewDoc_Search.OptionsBehavior.ReadOnly = True + Me.GridViewDoc_Search.OptionsSelection.EnableAppearanceFocusedCell = False + Me.GridViewDoc_Search.OptionsView.ShowHorizontalLines = DevExpress.Utils.DefaultBoolean.[False] + Me.GridViewDoc_Search.OptionsView.ShowIndicator = False ' 'AxObjectListControl ' diff --git a/app/DD-Record-Organiser/frmConstructor_Main.resx b/app/DD-Record-Organiser/frmConstructor_Main.resx index 302ce9d..39a21c4 100644 --- a/app/DD-Record-Organiser/frmConstructor_Main.resx +++ b/app/DD-Record-Organiser/frmConstructor_Main.resx @@ -414,6 +414,15 @@ 3, 160 + + White + + + Transparent + + + 192, 255, 192 + 1066, 153 diff --git a/app/DD-Record-Organiser/frmConstructor_Main.vb b/app/DD-Record-Organiser/frmConstructor_Main.vb index ec85ada..733d12a 100644 --- a/app/DD-Record-Organiser/frmConstructor_Main.vb +++ b/app/DD-Record-Organiser/frmConstructor_Main.vb @@ -3423,7 +3423,13 @@ Public Class frmConstructor_Main Dim DT As DataTable = ClassDatabase.Return_Datatable(sql_ResultList, "GET RESULTLIST KONFIG") Dim ColArray As New List(Of String) Try - + 'Die Icon Colum erstellen und konfigurieren + Dim colIcon As New System.Data.DataColumn() + colIcon.DataType = GetType(Image) + colIcon.ColumnName = "ICON" + colIcon.Caption = "" + DTGrid.Columns.Add(colIcon) + If Not DT Is Nothing And DT.Rows.Count = 1 Then Dim ColCount As Integer = 1 For Each Column As DataColumn In DT.Columns @@ -3475,7 +3481,29 @@ Public Class frmConstructor_Main Try Dim NewRow As DataRow NewRow = DTGrid.NewRow() - Dim i = 0 + + 'Icon zuweisen + Select Case extension + Case ".csv" + Case ".txt" + NewRow.Item(0) = My.Resources.text + Case ".pdf" + NewRow.Item(0) = My.Resources.pdf + Case ".doc" + Case ".docx" + NewRow.Item(0) = My.Resources.doc + Case ".xls" + Case ".xlsx" + NewRow.Item(0) = My.Resources.xls + Case ".ppt" + Case ".pptx" + NewRow.Item(0) = My.Resources.ppt + Case Else + NewRow.Item(0) = My.Resources._blank + End Select + + + Dim i = 1 'Fängt bei 1 an, um die ICON Column zu überspringen For Each Column As String In ColArray Dim Indexname = DT.Rows(0).Item(Column) Dim idxvalue @@ -3504,6 +3532,9 @@ Public Class frmConstructor_Main End If If DTGrid.Rows.Count > 0 Then GridControlDocSearch.DataSource = DTGrid + GridViewDoc_Search.Columns.Item(0).MaxWidth = 24 + GridViewDoc_Search.Columns.Item(0).MinWidth = 24 + End If Else Dim msg = "Windream-Dokumente für Record: " & RECORD_ID & " - Keine Dateien gefunden"