Autor Beitrag
SaidD
Hält's aus hier
Beiträge: 5



BeitragVerfasst: Fr 15.07.11 18:18 
Hallo an alle freundliche Helfer
Ich möchte den vb.net code zu c sharp umschreiben
Kann mir bitte jemand helfen

ausblenden volle Höhe Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
22:
23:
24:
25:
26:
27:
28:
29:
30:
31:
32:
33:
34:
35:
36:
 
Public Class Form1
    Dim settings As New My.MySettings
    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Try

            StyleManager1.ManagerStyle = settings.Theme

        Catch ex As Exception

            StyleManager1.ManagerStyle = DevComponents.DotNetBar.eStyle.Office2007Blue

        End Try
    End Sub

    Private Sub ButtonX4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ButtonX4.Click
        StyleManager1.ManagerStyle = DevComponents.DotNetBar.eStyle.Office2007VistaGlass
    End Sub

    Private Sub ButtonX1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ButtonX1.Click
        StyleManager1.ManagerStyle = DevComponents.DotNetBar.eStyle.Office2007Blue
    End Sub

    Private Sub ButtonX3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ButtonX3.Click
        StyleManager1.ManagerStyle = DevComponents.DotNetBar.eStyle.Office2007Silver
    End Sub

    Private Sub ButtonX2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ButtonX2.Click
        StyleManager1.ManagerStyle = DevComponents.DotNetBar.eStyle.Office2007Black
    End Sub

    Private Sub Form1_FormClosing(ByVal sender As System.Object, ByVal e As System.Windows.Forms.FormClosingEventArgs) Handles MyBase.FormClosing
        settings.Theme = StyleManager1.ManagerStyle
        settings.Save()
    End Sub
End Class


Moderiert von user profile iconTh69: Code-Tags hinzugefügt
Th69
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starontopic star
Moderator
Beiträge: 4798
Erhaltene Danke: 1059

Win10
C#, C++ (VS 2017/19/22)
BeitragVerfasst: Fr 15.07.11 19:13 
Hallo und :welcome:

dafür gibt es viele Converter im Netz, z.B. www.developerfusion....onvert/vb-to-csharp/

Sieht dann so aus:
ausblenden volle Höhe C#-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
22:
23:
24:
25:
26:
27:
28:
29:
30:
31:
32:
33:
34:
35:
36:
37:
38:
39:
40:
41:
42:
43:
44:
45:
46:
47:
48:
49:
using Microsoft.VisualBasic;

public class Form1
{
  My.MySettings settings = new My.MySettings();

  private void Form1_Load(System.Object sender, System.EventArgs e)
  {
    try {
      StyleManager1.ManagerStyle = settings.Theme;

    } catch (Exception ex) {
      StyleManager1.ManagerStyle = DevComponents.DotNetBar.eStyle.Office2007Blue;

    }
  }

  private void ButtonX4_Click(System.Object sender, System.EventArgs e)
  {
    StyleManager1.ManagerStyle = DevComponents.DotNetBar.eStyle.Office2007VistaGlass;
  }

  private void ButtonX1_Click(System.Object sender, System.EventArgs e)
  {
    StyleManager1.ManagerStyle = DevComponents.DotNetBar.eStyle.Office2007Blue;
  }

  private void ButtonX3_Click(System.Object sender, System.EventArgs e)
  {
    StyleManager1.ManagerStyle = DevComponents.DotNetBar.eStyle.Office2007Silver;
  }

  private void ButtonX2_Click(System.Object sender, System.EventArgs e)
  {
    StyleManager1.ManagerStyle = DevComponents.DotNetBar.eStyle.Office2007Black;
  }

  private void Form1_FormClosing(System.Object sender, System.Windows.Forms.FormClosingEventArgs e)
  {
    settings.Theme = StyleManager1.ManagerStyle;
    settings.Save();
  }

  public Form1()
  {
    FormClosing += Form1_FormClosing;
    Load += Form1_Load;
  }
}

Bedenke jedoch, daß dies nur ein Codefetzen ist, der ohne weiteres nicht funktionieren wird:
- in C# verwendet man die Setttings anders (nicht über 'Me.MySettings')
- die Buttons sowie die Button-Click-Ereignisse müssen noch (im Designer) zugewiesen werden
- die externe DevComponents-Komponente StyleManager wird benötigt