From 89e5d5b721419d2ba6b8f886240a1377a5a3c3d8 Mon Sep 17 00:00:00 2001 From: JenneJ Date: Mon, 7 Mar 2016 11:36:14 +0100 Subject: [PATCH 1/3] jj 07.03.2016 - fix loading background image --- app/DD-Record-Organiser/ClassInit.vb | 27 -------------- app/DD-Record-Organiser/frmMain.vb | 55 +++++++++++----------------- app/DD-Record-Organiser/frmSplash.vb | 1 + 3 files changed, 22 insertions(+), 61 deletions(-) diff --git a/app/DD-Record-Organiser/ClassInit.vb b/app/DD-Record-Organiser/ClassInit.vb index 32ac1d7..a222de7 100644 --- a/app/DD-Record-Organiser/ClassInit.vb +++ b/app/DD-Record-Organiser/ClassInit.vb @@ -51,33 +51,6 @@ Public Class ClassInit End Sub - - Public Sub InitInterface(mainForm As frmMain) - - Dim SQL As String = "SELECT BACKGROUND_IMAGE, PRODUCT_NAME1 FROM TBDD_MODULES WHERE NAME = 'Record-Organizer'" - Dim dt As DataTable = ClassDatabase.Return_Datatable(SQL) - - If dt.Rows.Count > 0 Then - - Dim row As DataRow = dt.Rows(0) - - If Not IsDBNull(row.Item("BACKGROUND_IMAGE")) Then - Dim bimage() As Byte = CType(row.Item("BACKGROUND_IMAGE"), Byte()) - Dim image As Bitmap = ByteArrayToBitmap(bimage) - - mainForm.SetWindowBackground(image) - End If - - If Not IsDBNull(row.Item("PRODUCT_NAME1")) Then - Dim title As String = row.Item("PRODUCT_NAME1") - - mainForm.SetWindowTitle(title) - End If - - End If - - End Sub - Public Sub InitUserLogin() Dim sql = sql_UserID sql = sql.Replace("@user", Environment.UserName) diff --git a/app/DD-Record-Organiser/frmMain.vb b/app/DD-Record-Organiser/frmMain.vb index d265217..45b4b2b 100644 --- a/app/DD-Record-Organiser/frmMain.vb +++ b/app/DD-Record-Organiser/frmMain.vb @@ -67,6 +67,9 @@ Public Class frmMain 'Dim splash As New frmSplash() 'splash.ShowDialog() + ' MainForm Hintergrund laden + SetBackgroundImage() + Me.Text = Application.ProductName LabelVersion.Caption = String.Format("Version {0}", My.Application.Info.Version.ToString) LabelUser.Caption = Environment.UserName @@ -151,28 +154,20 @@ Public Class frmMain "CHANGED_WHEN, MENU_IMG, SHORT_TITLE, LANGUAGE, " & _ "'CONSTR_MENUE' + CONVERT(VARCHAR(5), GUID) as OBECTNAME FROM TBPMO_FORM_CONSTRUCTOR where GUID in (SELECT CONSTRUCT_ID FROM TBPMO_CONSTRUCTOR_USER WHERE HOME_MENUE = 0 AND USER_ID = {2}) ORDER BY SEQUENCE_MENU", USER_LANGUAGE, CURRENT_SCREEN_ID, USER_GUID) Dim dt As DataTable = ClassDatabase.Return_Datatable(SQL2) - Dim image2 As Bitmap = LoadNoImage() - - Try - If Not IsNothing(groupQuickAccessForm) Then - Do While 0 < groupQuickAccessForm.ItemLinks.Count - groupQuickAccessForm.ItemLinks.Remove(groupQuickAccessForm.ItemLinks(0)) - Loop - End If - Catch ex As Exception - - End Try - - If dt.Rows.Count <> 0 Then For Each row As DataRow In dt.Rows - If Not IsDBNull(row.Item("MENU_IMG")) Then + Dim image As Bitmap = Nothing + + If IsDBNull(row.Item("MENU_IMG")) Then + image = LoadNoImage() + Else Dim bimg() As Byte = row.Item("MENU_IMG") Dim bitmap As Bitmap = ByteArrayToBitmap(bimg) - image2 = bitmap + image = bitmap End If + Dim title = row.Item("FORM_TITLE") If title = "CAPTION (OBJ) NOT TRANSLATED" Then Dim objectname = row.Item("OBECTNAME") @@ -191,11 +186,11 @@ Public Class frmMain item.RibbonStyle = RibbonItemStyles.Large item.Caption = title item.Tag = tag - item.Glyph = image2 + item.Glyph = image AddHandler item.ItemClick, AddressOf ToolbarButtonItemClick groupQuickAccessForm2.ItemLinks.Add(item) - + Next End If @@ -373,24 +368,16 @@ Public Class frmMain Next End Sub - Delegate Sub SetWindowTitleDelegate(t As String) - Public Sub SetWindowTitle(t As String) - If Me.InvokeRequired Then - Dim d As New SetWindowTitleDelegate(AddressOf SetWindowTitle) - Me.Invoke(d, New Object() {t}) - Else - Me.Text = t - End If - End Sub + Private Sub SetBackgroundImage() + Dim SQL As String = "SELECT BACKGROUND_IMAGE FROM TBDD_MODULES WHERE NAME = 'Record-Organizer'" + Dim bimage() As Byte = ClassDatabase.Execute_Scalar(SQL) - Delegate Sub SetWindowBackgroundDelegate(i As Bitmap) - Public Sub SetWindowBackground(i As Bitmap) - If Me.InvokeRequired Then - Dim d As New SetWindowBackgroundDelegate(AddressOf SetWindowBackground) - Me.Invoke(d, New Object() {i}) - Else - Me.BackgroundImage = i + If Not IsDBNull(bimage) Then + + Dim image As Bitmap = ByteArrayToBitmap(bimage) + Me.BackgroundImage = image Me.BackgroundImageLayout = ImageLayout.Center + End If End Sub @@ -625,7 +612,7 @@ Public Class frmMain 'If USER_LANGUAGE = "de-DE" Then ' MsgBox("Global Indexer wird nun geschlossen, weil keine neue Lizenzdaten eingegeben wurden!", MsgBoxStyle.Information) 'Else - MsgBox("Global Indexer will now be closed, cause no new license was updated!", MsgBoxStyle.Information) + MsgBox("Record Organizer will now be closed, cause no new license was updated!", MsgBoxStyle.Information) 'End If Me.Close() Else diff --git a/app/DD-Record-Organiser/frmSplash.vb b/app/DD-Record-Organiser/frmSplash.vb index 948c14f..3e11212 100644 --- a/app/DD-Record-Organiser/frmSplash.vb +++ b/app/DD-Record-Organiser/frmSplash.vb @@ -83,6 +83,7 @@ Public NotInheritable Class frmSplash System.Threading.Thread.Sleep(500) bw.ReportProgress(CalcProgress(5), "Initializing Frontend") + ' InitInterface wurde in frmMain integriert 'Init.InitInterface(mainForm) System.Threading.Thread.Sleep(500) From 26da599ee0c491ec81eeedacdfb9e91d369d1053 Mon Sep 17 00:00:00 2001 From: JenneJ Date: Mon, 7 Mar 2016 11:50:32 +0100 Subject: [PATCH 2/3] jj 07.03.2016 add default entity icon --- .../DD-Record-Organiser.vbproj | 2 + .../My Project/Resources.Designer.vb | 20 +++++++ .../My Project/Resources.resx | 24 +++++--- .../Resources/calendar_32x32.png | Bin 0 -> 2254 bytes .../changechartlegendalignment_32x32.png | Bin 0 -> 1789 bytes app/DD-Record-Organiser/frmMain.Designer.vb | 27 +++++---- app/DD-Record-Organiser/frmMain.resx | 54 ++---------------- app/DD-Record-Organiser/frmMain.vb | 3 +- 8 files changed, 58 insertions(+), 72 deletions(-) create mode 100644 app/DD-Record-Organiser/Resources/calendar_32x32.png create mode 100644 app/DD-Record-Organiser/Resources/changechartlegendalignment_32x32.png diff --git a/app/DD-Record-Organiser/DD-Record-Organiser.vbproj b/app/DD-Record-Organiser/DD-Record-Organiser.vbproj index 9e84fc7..10c6394 100644 --- a/app/DD-Record-Organiser/DD-Record-Organiser.vbproj +++ b/app/DD-Record-Organiser/DD-Record-Organiser.vbproj @@ -1178,6 +1178,8 @@ + + diff --git a/app/DD-Record-Organiser/My Project/Resources.Designer.vb b/app/DD-Record-Organiser/My Project/Resources.Designer.vb index 65bb6f7..081ddad 100644 --- a/app/DD-Record-Organiser/My Project/Resources.Designer.vb +++ b/app/DD-Record-Organiser/My Project/Resources.Designer.vb @@ -410,6 +410,16 @@ Namespace My.Resources End Get End Property + ''' + ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. + ''' + Friend ReadOnly Property calendar_32x32() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("calendar_32x32", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' @@ -450,6 +460,16 @@ Namespace My.Resources End Get End Property + ''' + ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. + ''' + Friend ReadOnly Property changechartlegendalignment_32x32() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("changechartlegendalignment_32x32", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' diff --git a/app/DD-Record-Organiser/My Project/Resources.resx b/app/DD-Record-Organiser/My Project/Resources.resx index 816028d..2f4f149 100644 --- a/app/DD-Record-Organiser/My Project/Resources.resx +++ b/app/DD-Record-Organiser/My Project/Resources.resx @@ -136,8 +136,8 @@ ..\Resources\DD_Icons-ADDI.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a - - ..\Resources\brainpool.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + ..\Resources\Home_5699_32.bmp;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a ..\Resources\action_add_16xMD.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a @@ -235,6 +235,9 @@ ..\Resources\database_error.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + ..\Resources\changechartlegendalignment_32x32.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + ..\Resources\page_excel.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a @@ -421,6 +424,9 @@ ..\Resources\database_go1.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + ..\Resources\brainpool.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + ..\Resources\refresh_16xLG.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a @@ -445,8 +451,8 @@ ..\Resources\user_suit.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a - - ..\Resources\Home_5699_32.bmp;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + ..\Resources\Table_748.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a ..\Resources\table_refresh.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a @@ -499,9 +505,6 @@ ..\Resources\page_refresh.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a - - ..\Resources\Table_748.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a - ..\Resources\add1.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a @@ -565,13 +568,16 @@ ..\Resources\HomeHS.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + ..\Resources\arrow_Down_16xLG.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + ..\Resources\112_RefreshArrow_Blue_24x24_721.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a ..\Resources\action_Cancel_16xLG.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a - - ..\Resources\arrow_Down_16xLG.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + ..\Resources\calendar_32x32.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/calendar_32x32.png b/app/DD-Record-Organiser/Resources/calendar_32x32.png new file mode 100644 index 0000000000000000000000000000000000000000..89faceee1242ec9dd446f1d18f7e09dfc9b22351 GIT binary patch literal 2254 zcmV;<2r>7GP)Px#1ZP1_K>z@;j|==^1poj59dt!lbW~|{Y-IpLVQgh?WMOhUQ)6glWOZz1aywRO zWp{-jhJc`6OAHa z7XjHpkwp{{WD$)hsH}kiRyeLvt0yV~qKNg_^&G=C`##JJ%rFd_efqw4<{M^;v^njZ z^E>zbX1Mox-h1DB@5h4YeR2-hEXXdX=5P_Q*uz5p;=g_VpT6EtM&2oI7A0pL?;sG9 za=440mk>PAH(~KN=sV{l{lLzdmt)gQasNp_0=K7wo?j!Rj9z#SFZ!_T-}=5munC5L zpED~9yS8q4zb7d0QO~xGV6Lrw4^>gS;P@wSU~M2StX_$(&Fj$h(eKbnbZq(%9f2R> z?#8uf-xz@Q4Qp`c_iJ!_{Tj5cT;bQZ>FrjYYhqD% z&?bw%?ilRXn_<7&1ZCY(ln3uX!HG8PUKN18$|8(hsKdzlTG-lZU~MJ-Pz~$ZGqALr zhNbxwhQFx5aN|kzmFD{O{oBC|7*ChMKn&z%;L2~`vyvvy2G6u`vH0HR^{`)Sg6Zg9 z7!If4@5#X^+Y*9`#v4fZ)haxW`2^bBIB538LX#Z>b=FR(Gj~9_Cko2lkx-;ZLY^89 zd2$$fgV+1@?ff_Z13R~&Kk5@GbCPj+)jPZ_ulO0@DYbvu07GFi^aV+HnjVInmA}S@ zpZpvVZ@!7YCI&&16GP%Vp~{SgDq{y!EKb6Tvf$v)37t+ZuqyXlIv{XRX+n|wf8Vd0{jPlP-lm0iUwhLkSUBx zIHxe;gH13A>)0f01hTuCO zE)3hpVIFnDVt3JZ{M(dQ&@Ji~9A@mZ@NXG~U-}u~t+1q|s#8p}TXYIdSN?)VVuUi9 zFRniK2vui$$;h}j)|wqK6sJR9lm@fG41HlLbOos}lel@*ZFYCT6*jP(;KN85c&YeI zhgf4az|-4s=?NMxJ`o+}i%+%mqOzq2dW+o~t4$6PO(D@_m~|%T@{^!Fma*41Dghn^Uw?Bt-ATuyvPXh>W$>=ZK*m(|J!zT<1))qQ0* zMFE;foVN@Ylfq~hjx}bx5K-u@G|g7Xv=+*ASfJF~XkZ5hH6wxnjSXrN)+lsP%XLu6 zwbT+M&IkjU=h(n^{S0K6{!vsvZx=3wI4U~zFV(Yt_}YDYCZCYB*)?_2|~Wfor-)o-xzejUe=n$B6#st)h; z7SVYjL@C>X%G)?paU1<=8}g}$^UJ?NAH@SP^zsqC4Jw%y{X6JJB$OsHK=4xR+;f%< ze9zaw@{Ge*MFC3N#a*=$R6riYT6)$~Z5i`St-DoGmQto1Dv@{mX}Y4P=z5-_3u}_0qnldW1RdXm z)kTccRXk2-iIbr%Jx0*EVq)kD@BN1kk!ekA;D>$&5^~ybyy-EH)IUO5eJ@Juh}vG1 z)I3CSO%ICBJV4Ru2Piy!9|fnnafryTAWn88@8mt?o#?{;@=oL)@5H`i9mpZF%kC2G z$U4H@K}P8v?E9<(pC;7#84$Z5HnU~?a`zx^K2{2DNNuk>zSb)fF}D&|dWHnz`QhyI zf1jWVQwUnKQ_!LykN^Mx literal 0 HcmV?d00001 diff --git a/app/DD-Record-Organiser/Resources/changechartlegendalignment_32x32.png b/app/DD-Record-Organiser/Resources/changechartlegendalignment_32x32.png new file mode 100644 index 0000000000000000000000000000000000000000..6a718f73c0d3faeb56a66dcc66f2f13f62c454d1 GIT binary patch literal 1789 zcmVPx#1ZP1_K>z@;j|==^1poj58FWQhbW?9;ba!ELWdK2BZ(?O2No`?gWm08fWO;GP zWjp`?05Eh#SaeirbZlh+LuGDsWpX=EZ*ysMX>V>jL2PMfZf#|5bURFMV_|e@Z*Dt5 zZewU~ayxC<9t;2g21ZFlK~z{ry_e}vl}8lDsr%mLk1=h!{0U9Eq)F|EMr>^bxyYh` z?8we#=Yp&%C{z@r?okV}x}i2{lPYROKoA8kJNL4kp6ATG3rJ1uhm!pAoSA|1JTve3 z-m8!PS;ee=3)cKc)@o3r&pV9Is>=GiO~)JV)0?OQXI7vddXFkW{l9ap&fu<4QG5Hk z4&k%9;#4R7-#^9GH;KJ*8a`{vYgK^R*#+{>&TEVsYDcYmY`=rr!?nk&*I3`g;^HC| z9lwD9>m)$w$vd>j0qh1VAts{p)KyVV_hKUHUi3kFP*x_5)9e1EU3nd}GpC)BYyXhB zyCs3t6!94~hJQ+(#ep>AoudT~P-qWOQgfSAku*jKk5}zRfT3Nv0rXDz0dk)$CwD_B zUGw#&8P6PjpVdZ}9=L_?GFoNsYUn34^{|qr{yIWeLO$lXc?saE>_C9^2(Y%e`j!fy zn}Zpxs#fz*G{9P$BY=iZx~MNZoGyI3gQj_YM|!K6S9K23H>u4scPa2A8vi|yhMR)u zqT@rFLV$%u%0Jd_1vq@-rUXD@4+8@MX4-HX^Ct7u>CB{tFTbXSFTSGIn0Q%_uDnm5 z$2AJ5G1rmrp!5FQ>73toYR_}f)C@lY4v>4a)e3;;fdJFI!)cotRH5cpV#;9da{YYpTc7(p0Ien~m*ob6rnLtxREvd1G$E2vFW^ z1t_R&my3Zvh)6t2MK!mmkne?XLaB=%lk50RD$tr=#faVz@&I3~TyPAu3pqzEvX8V$ zfVufa$|}8%02>iteI7p#JQwUDJh6fXUQW=!AQeGtmeLSyFW>8_k!dc!*<5Ma?#^FXQ zKu&p!JQo~KSb_?m8f##t8!HS`z-xvH#;mbhnH$mHiS&ldy7vp>Gn zH0iaONexrONSoL(jGpzot@=5}YA&s~Sq0#?ZA!sa1lWuK8=b{Xax=$xF*J??h#@yM z%&;rLGO;5DFnaD5x}j{S>QOajQV(Az_k;?Nly}7nkm9;3&jpJiu_e+JJM3ZeMkyP$+F9pXGTc+B~JVvRFo!Lxm zYM4QnlTy?~BV!(Znaxvd=0!8WrbIpt6~IHm(Z$+C@2(HnOf=F|8`}BXUiVrGk_($? zm;>O27wwb)TO~k3&Sn0%UEt&KQcz^k5+l=WIl4Ji47fIogdW8cXzvK?2qn21X=qdh zh;m*q18j~*0R9eu;|V-ixWq(uWNVChF$3m24A_io7+I+CV?9nRXrx!8GyKAvqsX*# zR)E;7OL8%WIh_Lm%*Kq(2nJ$itm&QEjSQYVV-<$A>HuyJzi&7|ssz}E09#`CLf~TH zcpMQft117HU^LcaqoFYe9?ARw&3 zGBI{yGg4+yZ3u-4YMWUX^r@;Jbq`V3(;*2k$N})e3s05+?;^m~$c*!HF<$Yae^|a{ zCJmwL7?pu#Vh4s@Y}f@e8N+m#9z(pZ_jY4l=51=yb`0p61U z2UE|=w-p=@LI9&iV$_P2YUs2yHqqn3k(t-#fE%y;LubqY+weSaGp**jv2G%2G==Il z)zD^Qn;X#ez%XN5L+zgQQfNZGbpm0@zsffiTn-Z+k-!Acq_n0M^trlNWvKk;Z%w`{)IXU;$I4iKTSb#Ozdge7ki2VK@1aJOOBXY z3Sb3$qfRO!eZ1v=J;xaf0MYC0Lk8l_uqmK f82k;J`>g&4n(S!Tk`J`%00000NkvXXu0mjfpwU47 literal 0 HcmV?d00001 diff --git a/app/DD-Record-Organiser/frmMain.Designer.vb b/app/DD-Record-Organiser/frmMain.Designer.vb index 8732e55..ac72c23 100644 --- a/app/DD-Record-Organiser/frmMain.Designer.vb +++ b/app/DD-Record-Organiser/frmMain.Designer.vb @@ -22,16 +22,15 @@ Partial Class frmMain 'Das Bearbeiten mit dem Code-Editor ist nicht möglich. _ Private Sub InitializeComponent() - Me.components = New System.ComponentModel.Container() Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmMain)) - Me.NotifyIcon1 = New System.Windows.Forms.NotifyIcon(Me.components) - Me.Timer1 = New System.Windows.Forms.Timer(Me.components) + Me.NotifyIcon1 = New System.Windows.Forms.NotifyIcon() + Me.Timer1 = New System.Windows.Forms.Timer() Me.DD_DMSDataSet = New DD_Record_Organiser.DD_DMSDataSet() - Me.VWPMO_WF_USER_ACTIVEBindingSource = New System.Windows.Forms.BindingSource(Me.components) + Me.VWPMO_WF_USER_ACTIVEBindingSource = New System.Windows.Forms.BindingSource() Me.VWPMO_WF_USER_ACTIVETableAdapter = New DD_Record_Organiser.DD_DMSDataSetTableAdapters.VWPMO_WF_USER_ACTIVETableAdapter() Me.TableAdapterManager = New DD_Record_Organiser.DD_DMSDataSetTableAdapters.TableAdapterManager() Me.ribbonMain = New DevExpress.XtraBars.Ribbon.RibbonControl() - Me.MainMenu = New DevExpress.XtraBars.Ribbon.ApplicationMenu(Me.components) + Me.MainMenu = New DevExpress.XtraBars.Ribbon.ApplicationMenu() Me.itemInfo = New DevExpress.XtraBars.BarButtonItem() Me.itemSettings = New DevExpress.XtraBars.BarButtonItem() Me.itemExit = New DevExpress.XtraBars.BarButtonItem() @@ -60,6 +59,7 @@ Partial Class frmMain Me.RibbonPageGroup2 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup() Me.groupQuickAccessForm = New DevExpress.XtraBars.Ribbon.RibbonPageGroup() Me.pageForms = New DevExpress.XtraBars.Ribbon.RibbonPage() + Me.groupQuickAccessForm2 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup() Me.pageAdmin = New DevExpress.XtraBars.Ribbon.RibbonPage() Me.RibbonPageGroupProgram = New DevExpress.XtraBars.Ribbon.RibbonPageGroup() Me.RibbonPageGroupTask = New DevExpress.XtraBars.Ribbon.RibbonPageGroup() @@ -67,11 +67,10 @@ Partial Class frmMain Me.RibbonPageGroupWindream = New DevExpress.XtraBars.Ribbon.RibbonPageGroup() Me.RibbonPageGroup1 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup() Me.RibbonStatusBar1 = New DevExpress.XtraBars.Ribbon.RibbonStatusBar() - Me.DefaultLookAndFeel1 = New DevExpress.LookAndFeel.DefaultLookAndFeel(Me.components) + Me.DefaultLookAndFeel1 = New DevExpress.LookAndFeel.DefaultLookAndFeel() Me.BarButtonItem11 = New DevExpress.XtraBars.BarButtonItem() - Me.TimerClose3Minutes = New System.Windows.Forms.Timer(Me.components) + Me.TimerClose3Minutes = New System.Windows.Forms.Timer() Me.RibbonPageGroup3 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup() - Me.groupQuickAccessForm2 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup() CType(Me.DD_DMSDataSet, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.VWPMO_WF_USER_ACTIVEBindingSource, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.ribbonMain, System.ComponentModel.ISupportInitialize).BeginInit() @@ -212,7 +211,7 @@ Partial Class frmMain 'BarButtonItem1 ' resources.ApplyResources(Me.BarButtonItem1, "BarButtonItem1") - Me.BarButtonItem1.Glyph = CType(resources.GetObject("BarButtonItem1.Glyph"), System.Drawing.Image) + Me.BarButtonItem1.Glyph = Global.DD_Record_Organiser.My.Resources.Resources.calendar_32x32 Me.BarButtonItem1.Id = 11 Me.BarButtonItem1.Name = "BarButtonItem1" Me.BarButtonItem1.RibbonStyle = DevExpress.XtraBars.Ribbon.RibbonItemStyles.Large @@ -373,6 +372,11 @@ Partial Class frmMain Me.pageForms.Name = "pageForms" resources.ApplyResources(Me.pageForms, "pageForms") ' + 'groupQuickAccessForm2 + ' + Me.groupQuickAccessForm2.Name = "groupQuickAccessForm2" + resources.ApplyResources(Me.groupQuickAccessForm2, "groupQuickAccessForm2") + ' 'pageAdmin ' Me.pageAdmin.Groups.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPageGroup() {Me.RibbonPageGroupProgram, Me.RibbonPageGroupTask, Me.RibbonPageGroupMenue, Me.RibbonPageGroupWindream, Me.RibbonPageGroup1}) @@ -455,11 +459,6 @@ Partial Class frmMain Me.RibbonPageGroup3.Name = "RibbonPageGroup3" resources.ApplyResources(Me.RibbonPageGroup3, "RibbonPageGroup3") ' - 'groupQuickAccessForm2 - ' - Me.groupQuickAccessForm2.Name = "groupQuickAccessForm2" - resources.ApplyResources(Me.groupQuickAccessForm2, "groupQuickAccessForm2") - ' 'frmMain ' Me.Appearance.BackColor = CType(resources.GetObject("frmMain.Appearance.BackColor"), System.Drawing.Color) diff --git a/app/DD-Record-Organiser/frmMain.resx b/app/DD-Record-Organiser/frmMain.resx index 6b5df15..a404b9f 100644 --- a/app/DD-Record-Organiser/frmMain.resx +++ b/app/DD-Record-Organiser/frmMain.resx @@ -1216,48 +1216,6 @@ Kalender - - - iVBORw0KGgoAAAANSUhEUgAAACAAAAAgCAYAAABzenr0AAAABGdBTUEAALGPC/xhBQAAAB10RVh0VGl0 - bGUAQ2FsZW5kYXI7U2NoZWR1bGVyO1ZpZXeFqTJSAAAIT0lEQVRYR6WXeVSU1xnGXRKTaGLSffm3f7Q9 - +bOnqcmJNWmNmGoVE40iYRcB2UGRRRQRZBGNKKisgQBWOK5RqycqAqKI9dj1HMM2+z7MDMwwDJt9+r53 - 5htmirQ57ZzzO/f9Zrj3ed5733vvx4LnfXIO1yzILqjmcBGx2MNC/uK/ff6fvt5PRt4pbhYlZx3vIBCT - criLnpcQPNA3YfE36DvnI/3AzpmXY9NLcf9JPwK3p4OeXyOkjF54Di/6sOzf+r5BsAmGf58zKwu7tm54 - vyco8FHPto1grq19D1VRu+D4J3BgbSAurF6Jrs3r0PXR79BJdGz6EB2BH+LuxrVo3xiA9g1rcOf3a3B7 - /Rq0rlzh17fp7V/i5trf4EbA+7i6etXjllXvfECabNprYlF30CaLvu4Y7NebYb/aBGXdUZQH70DBiTbs - XhWAvsoijFyow8j5WtjaamBtJf5QDevZM7C0nIal+RSGv6jAcONJ9JXm+vX928EMGE+XwUAM5GXgym/f - s5ImzwbPtHCx+N7m9bBfa4Lp6F4YDqfg78nBKNsSgorGG0j41So8jvkE2tw4aPbFQpMdA3XWTqgzd0C5 - JwrK3ZFQpEdCnhoOeXIYeoPX+/Xt/DgAAzu3oT/qEyhzknF51Tu8LK/4GeAptX/ZAENhMvQFSXiaHoac - lb/Ghp/8HBFvvom/JgZBkxND4juhyoyGKmMHVCxOwoq0CMhTwiFLDoUsMRR/Dg1E1op3Rd/Qn/4MD7eu - E+J9kVugyEzExXdXsIGlrCsZeOHOhgCMXiIDhxKhz0+ALi8eppN5MFcVwVi+fzbrvdFQZkhZR0CRSuKU - tSwpFEMJIRiKD8ZgXDCUuanQHNpLGSehL2oL+sI34+vwjyHPiMf5t99iA8v8DNxat5rWuB66g/FCXHtg - l3u6KWs1iUtZe6fck7VcZB0CWfynGCLhwdggDMQEoT96q8i6P2ILCZN42Ed4GrIJsrRYtL71izkGXjxa - 143pmWeYmPYwNQPX1DO4KHZNEvQ8zkxOEzNwThAUO0VMLTHm0zokXNOwM+Nu+Leskuts4FU/A2W19zBJ - AvwHflBnh2uKBmF4kCmMSjinMOKDTTAJ69gkbAS3jMXBTAj4+8yia2xAOleEgSWlNfdE1v7OSZRcs5Bt - jDtPwOpw0UAuDNvHYR51wmJ30Xf825RX0C3qFhxm7LPwbxmFX/oZ4K2wpKSqU0yzW3QKTVf+gkZihDKa - L64+9whVZ3vJyLg31podMBSnQ1+UBrPBDH1hKnQFqTCTuHnUbXZ3wRU2sJzgw0gYeKn4TIdYYzbA09tw - 6QkaLj4RHeaLT7X0orKlB3qL3RurTQ4STSHRZJh1Jujyk6A9mAjTiAtGgmckLf8yG3jd18DLhafuisKS - 1tVgHYeeGKbs5otVJKYyOqAzj3pjxqQ1eTFqjW5I3ECYRyeQcvDSXAMFFe2i6HhquZhq2v5EPCLnznnj - 8ob7ON7QDY3R5o2VBjs0++MFRq0B6pw4qLJjYbCRecJEy5B84CIb4AvKa+CV/BN3hAGpiKrP9aKKMNqc - 88bHPu/Gsfp7JGr1xnIyoCZBdRaJagxQZu6Ekg4vnjU9GTCSgaT9F9jAt3wNLD1Yfkusv1S9GvMYQetp - ccwbK/SjkBMKvcUbyw2j0Gv00KkNBLUqD2RAZ3WKZUjIPc8Gvi0Z4K2wNO+zr4QBsV3IQGVzD0429UBH - QvPFR6o7UErIdcPeWKYjQ3w/0DGtU+rFBSWjE1NrcQp4GeKz2yQD/G4gDCzbf+ymqH4z7WsulBOND8S6 - stB8ccnpuygmlAabNx7S0iyIIzoMGoVeXE58R2hIXDPsFDMRl9XKBr7ja+DVfWU3RQGaSJy3DBeTwmgX - jjVmuxBR6K00zVbItBbKdFig1NtoYAcGNSOCAY0NahLWKHRQy3VQybXUEiTOCAOZ59jAd/0MZJf+UVQ/ - bxculKNUUGW1XWJdS2tmp7fkDGVa5c60qLIdhcSgdgQFlbeQX3FLGBiM2y5gcXEx0buAmmpHNTwmliFm - 71wDr2UWXxfVb7Dxfh3HkZrOWdGqDu/0FtF5IUQp24LK2zhUcRv9ahvyqYjzy79CH8UDMfTyEb0NKpkW - /TvoRiSUJjJA8FLs3HOWDXzP18DyjMNXRQFK28VdtRJUQB7EWnrWU20Z80ytu1VRllKmHCslSJhR8EFF - z9FuA98n+LVMbIXle+iCMJKwljrz4Lzd1GYaXLTuAcWgIhMayDOokmKFgAQ8sdxkh5zEZrFDRq2M6orP - iajdLWzgB74GXucLwkhTL/aynjpQKzFEy8BLIdONUMzwd1R0PgwIaPqpHjjup9aNDf1UF9zy8ijYQHrz - HANv8AXxNf2B8xm9YHgYm3HjmKHreZraabqip+h6nqILa5Kho5ta2wQd34TVRYzTVTxOZ4mToS09RtC5 - YmLoCu/9hw6RaU1s4Id+BhJy2nC86TGO1D9CWX0vSuuI2l6U1DxEcU0Pis48QNHpByg8fR8Fp7pxiMiv - IE52I+/kPeSd6ML+8k7kHu/EvmMdyCGyy+4S7cg6wtxBRukd7PusA58m1PkZELsgNrNl/HL3IG4+Vgpu - SG2vO77WKxMxtxJXeoYE4vnh7PN/orX9KYJiq1yk6d2G4jLaElmyNXrPF6boPc1Upc1UKE20Vo00XURq - AyJSG4kGhKcwnyM8uR5hSfUIZRLrBCEJtZSdh/gaBMfXIngXtUxcDbbHVSMo5oz5g8CMUNL0eyfkgP9R - 4Duaj0h2J8H7VYK3ji9cSBI8pb78yIcfe+CYx+TXMc6etcWHA54Jrgf+4Xnwev0vvOQDP/NYnDBpLlj4 - LyAMut4SBqhSAAAAAElFTkSuQmCC - - Entitäten Designer @@ -3031,6 +2989,12 @@ Konfiguration DevExpress.XtraBars.Ribbon.RibbonPage, DevExpress.XtraBars.v15.1, Version=15.1.7.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a + + groupQuickAccessForm2 + + + DevExpress.XtraBars.Ribbon.RibbonPageGroup, DevExpress.XtraBars.v15.1, Version=15.1.7.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a + pageAdmin @@ -3091,12 +3055,6 @@ Konfiguration DevExpress.XtraBars.Ribbon.RibbonPageGroup, DevExpress.XtraBars.v15.1, Version=15.1.7.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a - - groupQuickAccessForm2 - - - DevExpress.XtraBars.Ribbon.RibbonPageGroup, DevExpress.XtraBars.v15.1, Version=15.1.7.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a - frmMain diff --git a/app/DD-Record-Organiser/frmMain.vb b/app/DD-Record-Organiser/frmMain.vb index 45b4b2b..6033622 100644 --- a/app/DD-Record-Organiser/frmMain.vb +++ b/app/DD-Record-Organiser/frmMain.vb @@ -161,7 +161,7 @@ Public Class frmMain Dim image As Bitmap = Nothing If IsDBNull(row.Item("MENU_IMG")) Then - image = LoadNoImage() + image = My.Resources.ResourceManager.GetObject("changechartlegendalignment_32x32") Else Dim bimg() As Byte = row.Item("MENU_IMG") Dim bitmap As Bitmap = ByteArrayToBitmap(bimg) @@ -187,6 +187,7 @@ Public Class frmMain item.Caption = title item.Tag = tag item.Glyph = image + item.LargeGlyph = image AddHandler item.ItemClick, AddressOf ToolbarButtonItemClick groupQuickAccessForm2.ItemLinks.Add(item) From 57fd15b4c199b7979db5645e314539b1cc42e773 Mon Sep 17 00:00:00 2001 From: JenneJ Date: Mon, 7 Mar 2016 15:37:10 +0100 Subject: [PATCH 3/3] jj 07.03.2016 start translation of editor property grid --- .../ClassControlProperties.vb | 200 +++++---- .../DD-Record-Organiser.vbproj | 20 + .../Strings/ControlProperties.Designer.vb | 400 ++++++++++++++++++ .../Strings/ControlProperties.en.Designer.vb | 0 .../Strings/ControlProperties.en.resx | 231 ++++++++++ .../Strings/ControlProperties.resx | 231 ++++++++++ 6 files changed, 997 insertions(+), 85 deletions(-) create mode 100644 app/DD-Record-Organiser/Strings/ControlProperties.Designer.vb create mode 100644 app/DD-Record-Organiser/Strings/ControlProperties.en.Designer.vb create mode 100644 app/DD-Record-Organiser/Strings/ControlProperties.en.resx create mode 100644 app/DD-Record-Organiser/Strings/ControlProperties.resx diff --git a/app/DD-Record-Organiser/ClassControlProperties.vb b/app/DD-Record-Organiser/ClassControlProperties.vb index b3bc5a9..48a5b49 100644 --- a/app/DD-Record-Organiser/ClassControlProperties.vb +++ b/app/DD-Record-Organiser/ClassControlProperties.vb @@ -1,6 +1,36 @@ Imports System.ComponentModel +Imports System.Resources + Module ClassControlProperties + ' ++++++ LOCALIZE PROPERTIES ++++++ + + Private Function Lookup(key As String) + Try + Return My.Resources.ControlProperties.ResourceManager.GetString(key) + Catch ex As Exception + Return key + End Try + End Function + + Public Class LocalizedDescriptionAttribute + Inherits DescriptionAttribute + + Public Sub New(key As String) + MyBase.New(Lookup(key)) + End Sub + End Class + + Public Class LocalizedCategoryAttribute + Inherits CategoryAttribute + + Public Sub New(key As String) + MyBase.New(Lookup(key)) + End Sub + End Class + + ' +++++ END LOCALIZE PROPERTIES +++++ + ' +++++ ABSTRACT CLASSES +++++ Public MustInherit Class BaseProperties Private _id As Integer @@ -8,8 +38,8 @@ Module ClassControlProperties Private _location As Point Private _name As String - - + + Public Property ID() As Integer Get @@ -20,8 +50,8 @@ Module ClassControlProperties End Set End Property - - + + Public Property Size() As Size Get Return _size @@ -31,8 +61,8 @@ Module ClassControlProperties End Set End Property - - + + Public Property Location() As Point Get Return _location @@ -42,8 +72,8 @@ Module ClassControlProperties End Set End Property - - + + Public Property Name() As String Get Return _name @@ -73,8 +103,8 @@ Module ClassControlProperties Private _font As Font Private _font_color As Color - - + + Public Property ColumnTitle() As String Get Return _column_title @@ -84,8 +114,8 @@ Module ClassControlProperties End Set End Property - - + + Public Property IsRequired() As Boolean Get Return _required @@ -95,8 +125,8 @@ Module ClassControlProperties End Set End Property - - + + Public Property IsReadOnly() As Boolean Get Return _read_only @@ -106,19 +136,19 @@ Module ClassControlProperties End Set End Property - - - Public Property SQLConnection() As SQLValue - Get - Return New SQLValue(_sql_connection) - End Get - Set(value As SQLValue) - _sql_connection = value.Value - End Set - End Property + ' + ' + 'Public Property SQLConnection() As SQLValue + ' Get + ' Return New SQLValue(_sql_connection) + ' End Get + ' Set(value As SQLValue) + ' _sql_connection = value.Value + ' End Set + 'End Property - - + + Public Property SQLCommand() As SQLValue Get Return New SQLValue(_sql_command) @@ -127,8 +157,8 @@ Module ClassControlProperties _sql_command = value.Value End Set End Property - - + + Public Property Font() As Font Get Return _font @@ -138,8 +168,8 @@ Module ClassControlProperties End Set End Property - - + + Public Property FontColor() As Color Get Return _font_color @@ -158,8 +188,8 @@ Module ClassControlProperties Private _tab_stop As Boolean Private _show_column As Boolean - - + + Public Property TabIndex() As Integer Get Return _tab_index @@ -168,8 +198,8 @@ Module ClassControlProperties _tab_index = value End Set End Property - - + + Public Property TabStop() As Boolean Get Return _tab_stop @@ -178,8 +208,8 @@ Module ClassControlProperties _tab_stop = value End Set End Property - - + + Public Property DefaultValue() As String Get @@ -190,8 +220,8 @@ Module ClassControlProperties End Set End Property - - + + Public Property ShowColumn() As Boolean Get Return _show_column @@ -202,7 +232,7 @@ Module ClassControlProperties End Property End Class - + ' +++++ CONTROL CLASSES +++++ Public Class LabelProperties @@ -211,8 +241,8 @@ Module ClassControlProperties Private _caption As String = "" - - + + Public Overloads Property ColumnTitle() As String Get Return "" @@ -222,8 +252,8 @@ Module ClassControlProperties End Set End Property - - + + Public Property Caption() As String Get Return _caption @@ -240,8 +270,8 @@ Module ClassControlProperties Private _multiline As Boolean Private _format As String - - + + Public Property Format() As EnumFormatOptions Get Return _format @@ -251,8 +281,8 @@ Module ClassControlProperties End Set End Property - - + + Public Property Multiline() As Boolean Get Return _multiline @@ -269,8 +299,8 @@ Module ClassControlProperties Private _static_list As String Private _format As EnumFormatOptions - - + + Public Property Format() As EnumFormatOptions Get Return _format @@ -290,8 +320,8 @@ Module ClassControlProperties End Set End Property - - + + Public Property StaticList() As String Get Return _static_list @@ -307,8 +337,8 @@ Module ClassControlProperties Private _default_value As EnumDateTimePickerDefaultValueOptions = EnumDateTimePickerDefaultValueOptions.Empty - - + + Public Overloads Property DefaultValue() As EnumDateTimePickerDefaultValueOptions Get Return _default_value @@ -324,8 +354,8 @@ Module ClassControlProperties Private _caption As String = "" Private _default_value As Boolean = False - - + + Public Property Caption() As String Get Return _caption @@ -335,8 +365,8 @@ Module ClassControlProperties End Set End Property - - + + Public Overloads Property DefaultValue As Boolean Get @@ -355,8 +385,8 @@ Module ClassControlProperties Private _default_value As Boolean = False - - + + Public Property Caption() As String Get Return _caption @@ -366,8 +396,8 @@ Module ClassControlProperties End Set End Property - - + + Public Overloads Property DefaultValue As Boolean Get @@ -390,8 +420,8 @@ Module ClassControlProperties Private _caption As String = "" Private _back_color As Color - - + + Public Property Caption() As String Get Return _caption @@ -401,8 +431,8 @@ Module ClassControlProperties End Set End Property - - + + Public Property BackColor() As Color Get Return _back_color @@ -428,8 +458,8 @@ Module ClassControlProperties Private _place As String Private _description As String - - + + Public Property Caption() As String Get Return _caption @@ -439,8 +469,8 @@ Module ClassControlProperties End Set End Property - - + + Public Property Subject() As String Get Return _subject @@ -450,8 +480,8 @@ Module ClassControlProperties End Set End Property - - + + Public Property Subject2() As String Get Return _subject2 @@ -461,8 +491,8 @@ Module ClassControlProperties End Set End Property - - + + Public Property Place() As String Get Return _place @@ -472,8 +502,8 @@ Module ClassControlProperties End Set End Property - - + + Public Property Description() As String Get Return _description @@ -483,8 +513,8 @@ Module ClassControlProperties End Set End Property - - + + Public Property FromDate() As String Get Return _from_date @@ -494,8 +524,8 @@ Module ClassControlProperties End Set End Property - - + + Public Property ToDate() As String Get Return _to_date @@ -513,8 +543,8 @@ Module ClassControlProperties Private _form_id As Integer Private _screen_id As Integer - - + + Public Property Caption() As String Get Return _caption @@ -524,8 +554,8 @@ Module ClassControlProperties End Set End Property - - + + Public Property FormID() As Integer Get Return _form_id @@ -535,8 +565,8 @@ Module ClassControlProperties End Set End Property - - + + Public Property ScreenID() As Integer Get Return _screen_id diff --git a/app/DD-Record-Organiser/DD-Record-Organiser.vbproj b/app/DD-Record-Organiser/DD-Record-Organiser.vbproj index 10c6394..f40e86e 100644 --- a/app/DD-Record-Organiser/DD-Record-Organiser.vbproj +++ b/app/DD-Record-Organiser/DD-Record-Organiser.vbproj @@ -253,6 +253,16 @@ + + ControlProperties.en.resx + True + True + + + True + True + ControlProperties.resx + True True @@ -576,6 +586,16 @@ + + ResXFileCodeGenerator + ControlProperties.en.Designer.vb + My.Resources + + + My.Resources + ResXFileCodeGenerator + ControlProperties.Designer.vb + frmAbout.vb diff --git a/app/DD-Record-Organiser/Strings/ControlProperties.Designer.vb b/app/DD-Record-Organiser/Strings/ControlProperties.Designer.vb new file mode 100644 index 0000000..0e0a654 --- /dev/null +++ b/app/DD-Record-Organiser/Strings/ControlProperties.Designer.vb @@ -0,0 +1,400 @@ +'------------------------------------------------------------------------------ +' +' Dieser Code wurde von einem Tool generiert. +' Laufzeitversion:4.0.30319.34209 +' +' Änderungen an dieser Datei können falsches Verhalten verursachen und gehen verloren, wenn +' der Code erneut generiert wird. +' +'------------------------------------------------------------------------------ + +Option Strict On +Option Explicit On + +Imports System + +Namespace My.Resources + + 'Diese Klasse wurde von der StronglyTypedResourceBuilder automatisch generiert + '-Klasse über ein Tool wie ResGen oder Visual Studio automatisch generiert. + 'Um einen Member hinzuzufügen oder zu entfernen, bearbeiten Sie die .ResX-Datei und führen dann ResGen + 'mit der /str-Option erneut aus, oder Sie erstellen Ihr VS-Projekt neu. + ''' + ''' Eine stark typisierte Ressourcenklasse zum Suchen von lokalisierten Zeichenfolgen usw. + ''' + _ + Friend Class ControlProperties + + Private Shared resourceMan As Global.System.Resources.ResourceManager + + Private Shared resourceCulture As Global.System.Globalization.CultureInfo + + _ + Friend Sub New() + MyBase.New + End Sub + + ''' + ''' Gibt die zwischengespeicherte ResourceManager-Instanz zurück, die von dieser Klasse verwendet wird. + ''' + _ + Friend Shared ReadOnly Property ResourceManager() As Global.System.Resources.ResourceManager + Get + If Object.ReferenceEquals(resourceMan, Nothing) Then + Dim temp As Global.System.Resources.ResourceManager = New Global.System.Resources.ResourceManager("DD_Record_Organiser.ControlProperties", GetType(ControlProperties).Assembly) + resourceMan = temp + End If + Return resourceMan + End Get + End Property + + ''' + ''' Überschreibt die CurrentUICulture-Eigenschaft des aktuellen Threads für alle + ''' Ressourcenzuordnungen, die diese stark typisierte Ressourcenklasse verwenden. + ''' + _ + Friend Shared Property Culture() As Global.System.Globalization.CultureInfo + Get + Return resourceCulture + End Get + Set + resourceCulture = value + End Set + End Property + + ''' + ''' Sucht eine lokalisierte Zeichenfolge, die Termin Einstellungen ähnelt. + ''' + Friend Shared ReadOnly Property category_appointment() As String + Get + Return ResourceManager.GetString("category_appointment", resourceCulture) + End Get + End Property + + ''' + ''' Sucht eine lokalisierte Zeichenfolge, die Daten ähnelt. + ''' + Friend Shared ReadOnly Property category_data() As String + Get + Return ResourceManager.GetString("category_data", resourceCulture) + End Get + End Property + + ''' + ''' Sucht eine lokalisierte Zeichenfolge, die Database Configurations ähnelt. + ''' + Friend Shared ReadOnly Property category_database() As String + Get + Return ResourceManager.GetString("category_database", resourceCulture) + End Get + End Property + + ''' + ''' Sucht eine lokalisierte Zeichenfolge, die Datums Einstellungen ähnelt. + ''' + Friend Shared ReadOnly Property category_date() As String + Get + Return ResourceManager.GetString("category_date", resourceCulture) + End Get + End Property + + ''' + ''' Sucht eine lokalisierte Zeichenfolge, die Font Configurations ähnelt. + ''' + Friend Shared ReadOnly Property category_font() As String + Get + Return ResourceManager.GetString("category_font", resourceCulture) + End Get + End Property + + ''' + ''' Sucht eine lokalisierte Zeichenfolge, die Form Einstellungen ähnelt. + ''' + Friend Shared ReadOnly Property category_form() As String + Get + Return ResourceManager.GetString("category_form", resourceCulture) + End Get + End Property + + ''' + ''' Sucht eine lokalisierte Zeichenfolge, die ID ähnelt. + ''' + Friend Shared ReadOnly Property category_id() As String + Get + Return ResourceManager.GetString("category_id", resourceCulture) + End Get + End Property + + ''' + ''' Sucht eine lokalisierte Zeichenfolge, die Other Configurations ähnelt. + ''' + Friend Shared ReadOnly Property category_other() As String + Get + Return ResourceManager.GetString("category_other", resourceCulture) + End Get + End Property + + ''' + ''' Sucht eine lokalisierte Zeichenfolge, die ViewConfigurations ähnelt. + ''' + Friend Shared ReadOnly Property category_view() As String + Get + Return ResourceManager.GetString("category_view", resourceCulture) + End Get + End Property + + ''' + ''' Sucht eine lokalisierte Zeichenfolge, die Gibt die Hintergrundfarbe des Elements an. ähnelt. + ''' + Friend Shared ReadOnly Property desc_backcolor() As String + Get + Return ResourceManager.GetString("desc_backcolor", resourceCulture) + End Get + End Property + + ''' + ''' Sucht eine lokalisierte Zeichenfolge, die Gibt den Beschreibungstext dieses Elements an. ähnelt. + ''' + Friend Shared ReadOnly Property desc_caption() As String + Get + Return ResourceManager.GetString("desc_caption", resourceCulture) + End Get + End Property + + ''' + ''' Sucht eine lokalisierte Zeichenfolge, die Gibt den Spaltentitel des Elements an. ähnelt. + ''' + Friend Shared ReadOnly Property desc_col_title() As String + Get + Return ResourceManager.GetString("desc_col_title", resourceCulture) + End Get + End Property + + ''' + ''' Sucht eine lokalisierte Zeichenfolge, die Gibt den Spaltentitel des Elements an. ähnelt. + ''' + Friend Shared ReadOnly Property desc_columntitle() As String + Get + Return ResourceManager.GetString("desc_columntitle", resourceCulture) + End Get + End Property + + ''' + ''' Sucht eine lokalisierte Zeichenfolge, die Gibt den Standardwert dieses Elements an. ähnelt. + ''' + Friend Shared ReadOnly Property desc_defaultvalue() As String + Get + Return ResourceManager.GetString("desc_defaultvalue", resourceCulture) + End Get + End Property + + ''' + ''' Sucht eine lokalisierte Zeichenfolge, die Gibt die Beschreibung des Termins an. Dynamische Werte aus anderen Controls können mit der Syntax [%controlname] eingefügt werden ähnelt. + ''' + Friend Shared ReadOnly Property desc_description() As String + Get + Return ResourceManager.GetString("desc_description", resourceCulture) + End Get + End Property + + ''' + ''' Sucht eine lokalisierte Zeichenfolge, die Gibt die Schriftfarbe an. ähnelt. + ''' + Friend Shared ReadOnly Property desc_fontcolor() As String + Get + Return ResourceManager.GetString("desc_fontcolor", resourceCulture) + End Get + End Property + + ''' + ''' Sucht eine lokalisierte Zeichenfolge, die Gibt die Schriftart an. ähnelt. + ''' + Friend Shared ReadOnly Property desc_fontstyle() As String + Get + Return ResourceManager.GetString("desc_fontstyle", resourceCulture) + End Get + End Property + + ''' + ''' Sucht eine lokalisierte Zeichenfolge, die Gibt das Format des Textes an. ähnelt. + ''' + Friend Shared ReadOnly Property desc_format() As String + Get + Return ResourceManager.GetString("desc_format", resourceCulture) + End Get + End Property + + ''' + ''' Sucht eine lokalisierte Zeichenfolge, die Gibt die Form-ID der zu öffnenden Form an. ähnelt. + ''' + Friend Shared ReadOnly Property desc_formid() As String + Get + Return ResourceManager.GetString("desc_formid", resourceCulture) + End Get + End Property + + ''' + ''' Sucht eine lokalisierte Zeichenfolge, die Der Name eines Elements von dem das End-Datum gelesen wird. ähnelt. + ''' + Friend Shared ReadOnly Property desc_fromdate() As String + Get + Return ResourceManager.GetString("desc_fromdate", resourceCulture) + End Get + End Property + + ''' + ''' Sucht eine lokalisierte Zeichenfolge, die Gibt die eindeutige ID des Elements an. ähnelt. + ''' + Friend Shared ReadOnly Property desc_id() As String + Get + Return ResourceManager.GetString("desc_id", resourceCulture) + End Get + End Property + + ''' + ''' Sucht eine lokalisierte Zeichenfolge, die Gibt die Position des Elements an. ähnelt. + ''' + Friend Shared ReadOnly Property desc_location() As String + Get + Return ResourceManager.GetString("desc_location", resourceCulture) + End Get + End Property + + ''' + ''' Sucht eine lokalisierte Zeichenfolge, die Gibt an, ob das Feld mehrzeilig sein soll. ähnelt. + ''' + Friend Shared ReadOnly Property desc_multiline() As String + Get + Return ResourceManager.GetString("desc_multiline", resourceCulture) + End Get + End Property + + ''' + ''' Sucht eine lokalisierte Zeichenfolge, die Gibt den internen Namen des Elements an. ähnelt. + ''' + Friend Shared ReadOnly Property desc_name() As String + Get + Return ResourceManager.GetString("desc_name", resourceCulture) + End Get + End Property + + ''' + ''' Sucht eine lokalisierte Zeichenfolge, die Gibt den Ort des Termins an. Dynamische Werte aus anderen Controls können mit der Syntax [%controlname] eingefügt werden ähnelt. + ''' + Friend Shared ReadOnly Property desc_place() As String + Get + Return ResourceManager.GetString("desc_place", resourceCulture) + End Get + End Property + + ''' + ''' Sucht eine lokalisierte Zeichenfolge, die Gibt an, ob dieses Element nur lesbar ist. ähnelt. + ''' + Friend Shared ReadOnly Property desc_readonly() As String + Get + Return ResourceManager.GetString("desc_readonly", resourceCulture) + End Get + End Property + + ''' + ''' Sucht eine lokalisierte Zeichenfolge, die Gibt an ob dieses Element benötigt wird um die Eingabe abzuschließen. ähnelt. + ''' + Friend Shared ReadOnly Property desc_required() As String + Get + Return ResourceManager.GetString("desc_required", resourceCulture) + End Get + End Property + + ''' + ''' Sucht eine lokalisierte Zeichenfolge, die Gibt die Screen-ID der zu öffnenden Form an. ähnelt. + ''' + Friend Shared ReadOnly Property desc_screenid() As String + Get + Return ResourceManager.GetString("desc_screenid", resourceCulture) + End Get + End Property + + ''' + ''' Sucht eine lokalisierte Zeichenfolge, die Gibt an, ob das Feld als Spalte im Grid angezeigt wird. ähnelt. + ''' + Friend Shared ReadOnly Property desc_showcolumn() As String + Get + Return ResourceManager.GetString("desc_showcolumn", resourceCulture) + End Get + End Property + + ''' + ''' Sucht eine lokalisierte Zeichenfolge, die Gibt die Größe des Elements an ähnelt. + ''' + Friend Shared ReadOnly Property desc_size() As String + Get + Return ResourceManager.GetString("desc_size", resourceCulture) + End Get + End Property + + ''' + ''' Sucht eine lokalisierte Zeichenfolge, die Gibt die Datenbank-Abfrage für dieses Element an. Es können @RECORD_ID und @FORM_ID als Platzhalter verwendet werden. ähnelt. + ''' + Friend Shared ReadOnly Property desc_sqlcommand() As String + Get + Return ResourceManager.GetString("desc_sqlcommand", resourceCulture) + End Get + End Property + + ''' + ''' Sucht eine lokalisierte Zeichenfolge, die Eine Liste von statischen Werten, die durch ';' getrennt sind. Überschreibt die Daten aus 'Datenbank-Einstellungen' ähnelt. + ''' + Friend Shared ReadOnly Property desc_staticlist() As String + Get + Return ResourceManager.GetString("desc_staticlist", resourceCulture) + End Get + End Property + + ''' + ''' Sucht eine lokalisierte Zeichenfolge, die Gibt den Betreff des Termins an. Dynamische Werte aus anderen Controls können mit der Syntax [%controlname] eingefügt werden ähnelt. + ''' + Friend Shared ReadOnly Property desc_subject() As String + Get + Return ResourceManager.GetString("desc_subject", resourceCulture) + End Get + End Property + + ''' + ''' Sucht eine lokalisierte Zeichenfolge, die Gibt den optionalen zweiten Betreff des Termins an. Dynamische Werte aus anderen Controls können mit der Syntax [%controlname] eingefügt werden ähnelt. + ''' + Friend Shared ReadOnly Property desc_subject2() As String + Get + Return ResourceManager.GetString("desc_subject2", resourceCulture) + End Get + End Property + + ''' + ''' Sucht eine lokalisierte Zeichenfolge, die Gibt die Reihenfolge an, in der das Element durch die Tabulatortaste aktiviert wird. ähnelt. + ''' + Friend Shared ReadOnly Property desc_tabindex() As String + Get + Return ResourceManager.GetString("desc_tabindex", resourceCulture) + End Get + End Property + + ''' + ''' Sucht eine lokalisierte Zeichenfolge, die Gibt an, ob das Element durch die Tabulartortaste aktiviert werden soll. ähnelt. + ''' + Friend Shared ReadOnly Property desc_tabstop() As String + Get + Return ResourceManager.GetString("desc_tabstop", resourceCulture) + End Get + End Property + + ''' + ''' Sucht eine lokalisierte Zeichenfolge, die Der Name eines Elements von dem das Start-Datum gelesen wird. ähnelt. + ''' + Friend Shared ReadOnly Property desc_todate() As String + Get + Return ResourceManager.GetString("desc_todate", resourceCulture) + End Get + End Property + End Class +End Namespace diff --git a/app/DD-Record-Organiser/Strings/ControlProperties.en.Designer.vb b/app/DD-Record-Organiser/Strings/ControlProperties.en.Designer.vb new file mode 100644 index 0000000..e69de29 diff --git a/app/DD-Record-Organiser/Strings/ControlProperties.en.resx b/app/DD-Record-Organiser/Strings/ControlProperties.en.resx new file mode 100644 index 0000000..7f73f90 --- /dev/null +++ b/app/DD-Record-Organiser/Strings/ControlProperties.en.resx @@ -0,0 +1,231 @@ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + text/microsoft-resx + + + 2.0 + + + System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + Termin Einstellungen + + + Daten + + + Database Configurations + + + Datums Einstellungen + + + Font Configurations + + + Form Einstellungen + + + ID + + + Other Configurations + + + ViewConfigurations + + + Gibt die Hintergrundfarbe des Elements an. + + + Gibt den Beschreibungstext dieses Elements an. + + + Gibt den Spaltentitel des Elements an. + + + Gibt den Spaltentitel des Elements an. + + + Gibt den Standardwert dieses Elements an. + + + Gibt die Beschreibung des Termins an. Dynamische Werte aus anderen Controls können mit der Syntax [%controlname] eingefügt werden + + + Gibt die Schriftfarbe an. + + + Gibt die Schriftart an. + + + Gibt das Format des Textes an. + + + Gibt die Form-ID der zu öffnenden Form an. + + + Der Name eines Elements von dem das End-Datum gelesen wird. + + + Gibt die eindeutige ID des Elements an. + + + Gibt die Position des Elements an. + + + Gibt an, ob das Feld mehrzeilig sein soll. + + + Gibt den internen Namen des Elements an. + + + Gibt den Ort des Termins an. Dynamische Werte aus anderen Controls können mit der Syntax [%controlname] eingefügt werden + + + Gibt an, ob dieses Element nur lesbar ist. + + + Gibt an ob dieses Element benötigt wird um die Eingabe abzuschließen. + + + Gibt die Screen-ID der zu öffnenden Form an. + + + Gibt an, ob das Feld als Spalte im Grid angezeigt wird. + + + Gibt die Größe des Elements an + + + Gibt die Datenbank-Abfrage für dieses Element an. Es können @RECORD_ID und @FORM_ID als Platzhalter verwendet werden. + + + Eine Liste von statischen Werten, die durch ';' getrennt sind. Überschreibt die Daten aus 'Datenbank-Einstellungen' + + + Gibt den Betreff des Termins an. Dynamische Werte aus anderen Controls können mit der Syntax [%controlname] eingefügt werden + + + Gibt den optionalen zweiten Betreff des Termins an. Dynamische Werte aus anderen Controls können mit der Syntax [%controlname] eingefügt werden + + + Gibt die Reihenfolge an, in der das Element durch die Tabulatortaste aktiviert wird. + + + Gibt an, ob das Element durch die Tabulartortaste aktiviert werden soll. + + + Der Name eines Elements von dem das Start-Datum gelesen wird. + + \ No newline at end of file diff --git a/app/DD-Record-Organiser/Strings/ControlProperties.resx b/app/DD-Record-Organiser/Strings/ControlProperties.resx new file mode 100644 index 0000000..7f73f90 --- /dev/null +++ b/app/DD-Record-Organiser/Strings/ControlProperties.resx @@ -0,0 +1,231 @@ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + text/microsoft-resx + + + 2.0 + + + System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + Termin Einstellungen + + + Daten + + + Database Configurations + + + Datums Einstellungen + + + Font Configurations + + + Form Einstellungen + + + ID + + + Other Configurations + + + ViewConfigurations + + + Gibt die Hintergrundfarbe des Elements an. + + + Gibt den Beschreibungstext dieses Elements an. + + + Gibt den Spaltentitel des Elements an. + + + Gibt den Spaltentitel des Elements an. + + + Gibt den Standardwert dieses Elements an. + + + Gibt die Beschreibung des Termins an. Dynamische Werte aus anderen Controls können mit der Syntax [%controlname] eingefügt werden + + + Gibt die Schriftfarbe an. + + + Gibt die Schriftart an. + + + Gibt das Format des Textes an. + + + Gibt die Form-ID der zu öffnenden Form an. + + + Der Name eines Elements von dem das End-Datum gelesen wird. + + + Gibt die eindeutige ID des Elements an. + + + Gibt die Position des Elements an. + + + Gibt an, ob das Feld mehrzeilig sein soll. + + + Gibt den internen Namen des Elements an. + + + Gibt den Ort des Termins an. Dynamische Werte aus anderen Controls können mit der Syntax [%controlname] eingefügt werden + + + Gibt an, ob dieses Element nur lesbar ist. + + + Gibt an ob dieses Element benötigt wird um die Eingabe abzuschließen. + + + Gibt die Screen-ID der zu öffnenden Form an. + + + Gibt an, ob das Feld als Spalte im Grid angezeigt wird. + + + Gibt die Größe des Elements an + + + Gibt die Datenbank-Abfrage für dieses Element an. Es können @RECORD_ID und @FORM_ID als Platzhalter verwendet werden. + + + Eine Liste von statischen Werten, die durch ';' getrennt sind. Überschreibt die Daten aus 'Datenbank-Einstellungen' + + + Gibt den Betreff des Termins an. Dynamische Werte aus anderen Controls können mit der Syntax [%controlname] eingefügt werden + + + Gibt den optionalen zweiten Betreff des Termins an. Dynamische Werte aus anderen Controls können mit der Syntax [%controlname] eingefügt werden + + + Gibt die Reihenfolge an, in der das Element durch die Tabulatortaste aktiviert wird. + + + Gibt an, ob das Element durch die Tabulartortaste aktiviert werden soll. + + + Der Name eines Elements von dem das Start-Datum gelesen wird. + + \ No newline at end of file