삽질하는 개발자...

* C# Listview 컨트롤에 그룹화 항목 만들기 예제...

- 사용한 컨트롤 : Button 1개 , Listview 1개

  Listview 에 Columns -> col item 4개를 추가 해 줍니다.

전체 소스 코드

Form1.cs

using System;
using System.Collections.Generic;
using System.ComponentModel;
using System.Data;
using System.Drawing;
using System.Linq;
using System.Text;
using System.Windows.Forms;

namespace CSharp_ListView
{
    public partial class Form1 : Form
    {

        public Form1()
        {
            InitializeComponent();

        }

        private void button1_Click(object sender, EventArgs e)
        {
            lvMain.Groups.Clear();
            lvMain.Items.Clear();

            ListViewGroup lg = new ListViewGroup("Group1");
            ListViewGroup lg2 = new ListViewGroup("Group2");
            lvMain.Groups.Add(lg);
            lvMain.Groups.Add(lg2);


            ListViewItem lvi = new ListViewItem();

            lvi.Text = "Group1 TEST";
            lvi.SubItems.Add("ddd");
            lvi.SubItems.Add("asdfaf");
            lvi.SubItems.Add("sdaffasf");


            ListViewItem lvi2 = new ListViewItem();

            lvi2.Text = "Group2 TEST";
            lvi2.SubItems.Add("ddd");
            lvi2.SubItems.Add("asdfaf");
            lvi2.SubItems.Add("sdaffasf");

            //먼저 아이템을 넣고
            lvMain.Items.Add(lvi);
            lvMain.Items.Add(lvi2);

            //그 아이템을 그룹화 함...
            lvMain.Groups[0].Items.Add(lvi);
            lvMain.Groups[1].Items.Add(lvi2);

           
        }

    }
}

*예제 결과

* C# EXE File icon 가져오기 예제...

- 사용한 컨트롤: Button 2개, Label 1개

전체 소스 코드

Form1.vb

Public Class Form1

    Private Sub button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles button1.Click
        'File Open
        Dim ofd As OpenFileDialog = New OpenFileDialog()

        ofd.Filter = "EXE File(*.exe) | *.exe"

        If ofd.ShowDialog() = DialogResult.OK Then

            label1.Text = ofd.FileName

        End If


    End Sub

    Private Sub button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles button2.Click
        'Icon Save
        '파일이 아니라면
        If Not System.IO.File.Exists(label1.Text) Then Return

        'exe file icon get
        Dim icn As Icon = Icon.ExtractAssociatedIcon(label1.Text)
        Dim img As Image = Image.FromHbitmap(icn.ToBitmap().GetHbitmap())
        img.Save("C:\TEST.ico")
        MessageBox.Show("icon Image Save Success...")

    End Sub

End Class

*예제 결과

* C# EXE File icon 가져오기 예제...

- 사용한 컨트롤: Button 2개, Label 1개

전체 소스 코드

Form1.cs

using System;
using System.Collections.Generic;
using System.ComponentModel;
using System.Data;
using System.Drawing;
using System.Linq;
using System.Text;
using System.Windows.Forms;

namespace CSharp_EXEIcon
{
    public partial class Form1 : Form
    {
        public Form1()
        {
            InitializeComponent();
        }

        private void button1_Click(object sender, EventArgs e)
        {
            //File Open

            OpenFileDialog ofd = new OpenFileDialog();

            ofd.Filter = "EXE File(*.exe) | *.exe";

            if (ofd.ShowDialog() == DialogResult.OK)
            {
                label1.Text = ofd.FileName;
            }

        }

        private void button2_Click(object sender, EventArgs e)
        {
            //icon Save
            //파일이 아니라면...
            if (!System.IO.File.Exists(label1.Text)) return;

            //exe file iCon get
            Icon icn = Icon.ExtractAssociatedIcon(label1.Text);

            //Image Save
            Image img = Image.FromHbitmap(icn.ToBitmap().GetHbitmap());
            img.Save("c:\\Test.ico");
            img.Dispose();

            MessageBox.Show("icon Image Save Success...");

        }
    }
}

*예제 결과

*C# App.Configuration 파일 추가 방법 및 파일 추가 후 key , value 값 읽기 예제...

- 사용한 컨트롤 : Button 1개, ListView 1개

- App.Configuration 파일 추가

- 아래의 그림과 같이 key 값 및 value 값 작성 후 저장

전체 소스 코드

Form1.vb

- App.Configuration 을 읽기 위해 System.Configuration 을 추가 해 줍니다.

Imports System.Configuration

Public Class Form1

    Dim ltKey As List(Of String) = New List(Of String)

    Protected Overrides Sub OnLoad(ByVal e As System.EventArgs)
        MyBase.OnLoad(e)

        'Key 값 추가...
        ltKey.Add("TEST")
        ltKey.Add("TEST2")

    End Sub

    Private Sub button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles button1.Click
        'App Configuration Read...

        For Each Str As String In ltKey

            Dim lvi As ListViewItem = New ListViewItem()

            lvi.Text = Str
            lvi.SubItems.Add(ConfigurationSettings.AppSettings(Str).ToString())

            listView1.Items.Add(lvi)

        Next

    End Sub

End Class

*예제 결과

*C# App.Configuration 파일 추가 방법 및 파일 추가 후 key , value 값 읽기 예제...

- 사용한 컨트롤 : Button 1개, ListView 1개

- App.Configuration 파일 추가

- 아래의 그림과 같이 key 값 및 value 값 작성 후 저장

전체 소스 코드

Form1.cs

- App.Configuration 을 읽기 위해 System.Configuration 을 추가 해 줍니다.

using System;
using System.Collections.Generic;
using System.ComponentModel;
using System.Data;
using System.Drawing;
using System.Linq;
using System.Text;
using System.Windows.Forms;

using System.Configuration;

namespace CSharp_AppConfiguration
{
    public partial class Form1 : Form
    {
        List<string> ltKey = new List<string>();

        public Form1()
        {
            InitializeComponent();

            //key 값 추가...
            ltKey.Add("TEST");
            ltKey.Add("TEST2");
        }

        private void button1_Click(object sender, EventArgs e)
        {
            //App Configuration Read...

            foreach (string str in ltKey)
            {
                ListViewItem lvi = new ListViewItem();

                lvi.Text = str;
                lvi.SubItems.Add(ConfigurationSettings.AppSettings[str].ToString());

                listView1.Items.Add(lvi);

            }

        }
    }
}

*예제 결과

* VBNET Regex 를 이용한 간단한 이메일 주소 체크 예제...

- 사용한 컨트롤 : TextBox 1개, Button 1개, Label 1개

전체 소스 코드

Form1.vb

Imports System.Text.RegularExpressions

Public Class Form1

    Private Sub button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles button1.Click

        Dim bEmail As Boolean = Regex.IsMatch(textBox1.Text, "[a-zA-Z0-9!#$%&'*+/=?^_`{|}~-]+(?:\.[a-zA-Z0-9!#$%&'*+/=?^_`{|}~-]+)*@(?:[a-zA-Z0-9](?:[a-zA-Z0-9-]*[a-zA-Z0-9])?\.)+[a-zA-Z0-9](?:[a-zA-Z0-9-]*[a-zA-Z0-9])?")

        If bEmail Then
            label1.Text = "이메일 주소가 맞습니다."
        Else
            label1.Text = "이메일 주소가 아닙니다."
        End If

    End Sub

End Class

* 예제 결과

* C# Regex 를 이용한 간단한 이메일 주소 체크 예제...

- 사용한 컨트롤 : TextBox 1개, Button 1개, Label 1개

전체 소스 코드

Form1.cs

using System;
using System.Collections.Generic;
using System.ComponentModel;
using System.Data;
using System.Drawing;
using System.Linq;
using System.Text;
using System.Windows.Forms;


using System.Text.RegularExpressions;

namespace CSharp_IsEmailText
{
    public partial class Form1 : Form
    {
        public Form1()
        {
            InitializeComponent();
        }

        private void button1_Click(object sender, EventArgs e)
        {
            bool bEmail = Regex.IsMatch(textBox1.Text , @"[a-zA-Z0-9!#$%&'*+/=?^_`{|}~-]+(?:\.[a-zA-Z0-9!#$%&'*+/=?^_`{|}~-]+)*@(?:[a-zA-Z0-9](?:[a-zA-Z0-9-]*[a-zA-Z0-9])?\.)+[a-zA-Z0-9](?:[a-zA-Z0-9-]*[a-zA-Z0-9])?");

            if (bEmail)
            {
                label1.Text = "이메일 주소가 맞습니다.";
            }
            else
            {
                label1.Text = "이메일 주소가 아닙니다.";
            }
            
        }
    }
}

* 예제 결과

* VBNET String 을 이진수로 이진수를 String 으로 변환 예제...

- 사용한 컨트롤 : Button 2개, Label 2개, TextBox 1개

전체 소스 코드

Form1.vb

Imports System.Text

Public Class Form1

    Private Sub button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles button1.Click
        'String To 2진수
        If textBox1.Text = "" Then
            Return
        End If
        'String To 2진수
        Dim btBytes() As Byte = UnicodeEncoding.Unicode.GetBytes(textBox1.Text)
        Dim strbinary As String = String.Empty

        Dim b As Byte
        For Each b In btBytes
            ' byte를 2진수 문자열로 변경
            Dim strTmp As String = Convert.ToString(b, 2)
            strbinary += strTmp.PadLeft(8, "0"c)
        Next

        label1.Text = strbinary
    End Sub

    Private Sub button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles button2.Click
        '2진수 To String
        If label1.Text = "" Then
            Return
        End If

        Dim ibytes As Integer = label1.Text.Length / 8
        Dim btOutBytes() As Byte = New Byte(ibytes) {}

        Dim i As Integer
        For i = 0 To ibytes - 1
            ' 8자리 숫자 즉 1바이트 문자열 얻기
            Dim strBin As String = label1.Text.Substring(i * 8, 8)
            ' 2진수 문자열을 숫자로 변경
            btOutBytes(i) = CType(Convert.ToInt32(strBin, 2), Byte)
        Next

        ' Unicode 인코딩으로 바이트를 문자열로
        Dim strResult As String = UnicodeEncoding.Unicode.GetString(btOutBytes)
        label2.Text = strResult.Substring(0, strResult.Length - 1)

    End Sub
End Class

* 예제 결과