반응형

*C# API 를 이용한 Wav 파일 재생 예제...

 

 

- 사용한 컨트롤 : Button 3개, 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.Runtime.InteropServices;

namespace CSharp_MediaPlayer
{

    public partial class Form1 : Form
    {
         [DllImport("winmm.dll")]
        private static extern long mciSendString(string strCommand, StringBuilder strReturn, int iReturnLength, IntPtr hwndCallback);
        public Form1()
        {
            InitializeComponent();
        }

        private void button1_Click(object sender, EventArgs e)
        {
            //File Open
            OpenFileDialog ofd = new OpenFileDialog();

            ofd.Filter = "WAV File(*.wav) | *.wav";

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

        }

        private void button2_Click(object sender, EventArgs e)
        {
            //Play
            if (!System.IO.File.Exists(label1.Text)) 
            {
                return;
            }
            mciSendString("open \"" + label1.Text + "\" type mpegvideo alias MediaFile", null, 0, IntPtr.Zero);
            mciSendString("play MediaFile", null, 0, IntPtr.Zero);
           

        }

        private void button3_Click(object sender, EventArgs e)
        {
            //Stop
            mciSendString("Close MediaFile", null, 0, IntPtr.Zero );
        }
    }
}

 

 

*예제 결과

 

 

https://kdsoft-zeros.tistory.com/193

 

[VBNET] [API] mciSendString - WAV 파일 재생

*VBNET API 를 이용한 Wav 파일 재생 예제... - 사용한 컨트롤 : Button 3개, Label 1개 전체 소스 코드 Form1.vb Imports System.Runtime.InteropServices Imports System.Text Public Class Form1 <dllimport("..< p=""> </dllimport("..<>

kdsoft-zeros.tistory.com

 

반응형
반응형
int imsiNum[] = new int[7];

        for(int i=0; i<7; i++)
        {
            Random rnd = new Random();
            imsiNum[i] = rnd.nextInt(45) + 1;
            for(int j=0; j<i;j++)
            {
                if(imsiNum[i] == imsiNum[j])
                {
                    i = i -1;
                }
            }
        }

 

반응형
반응형

* VBNET Sendkeys 를 이용한 화면 캡쳐 (Screen Capture) 예제...

 

Main

 

 

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

 

전체 소스 코드

Form1.vb

 

Public Class Form1

    Private Sub button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles button1.Click
        'Alt+PrntScr 키 누른 효과
        'SendKeys.SendWait("%{PRTSC}")
        'PrntScr 키 누른 효과
        SendKeys.SendWait("{PRTSC}")

        '클립보드에서 PrntScr 키로 화면 캡쳐한 이미지 얻어내기
        Dim ig As Image = Clipboard.GetImage()
        If ig Is Nothing Then
            Return
        End If

        'PictureBox 에 Image 표시
        pictureBox1.Image = ig
        'PictureBox 화면 갱신
        pictureBox1.Refresh()
    End Sub

    Private Sub button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles button2.Click
        'Picture Box 이미지 가져 오기
        Dim bt As Bitmap = New Bitmap(pictureBox1.Image)
        Dim sfd As SaveFileDialog = New SaveFileDialog()

        sfd.Filter = "JPG File(*.jpg) | *.jpg"

        If sfd.ShowDialog() = DialogResult.OK Then
            bt.Save(sfd.FileName)
        End If

    End Sub

End Class

 

 

다음은 마이크로소프트 사에서 제공하는 문서 내용 가져온 Sendkeys 명령 KeyCode

(https://docs.microsoft.com/ko-kr/dotnet/api/system.windows.forms.sendkeys.send?view=netframework-4.8)

 

키코드

Backspace {백스페이스}, {B} 또는 {BKSP}
BREAK {중단}
CAPS LOCK {CAPSLOCK}
DEL 또는 삭제 {삭제} 또는 {삭제}
아래쪽 화살표 {를}
END {END}
Enter 키 {0} 입력} 또는 ~
Esc {ESC}
HELP {도움말}
Home {0} 홈}
기능 또는 삽입 {삽입} 또는 {기능}
왼쪽 화살표 {LEFT}
NUM LOCK {NUMLOCK}
Page Down {PGDN}
Page Up {PGUP}
PRINT SCREEN {PRTSC} (사용 하도록 예약)
오른쪽 화살표 {RIGHT}
스크롤 잠금 {SCROLLLOCK}
Tab {TAB}
위쪽 화살표 {UP}
F1 {F1}
F2 {F2}
F3 {F3}
F4 {F4}
F5 {F5}
F6 {F6}
F7 {F7}
F8 {F8}
F9 {F9}
F10 {F10}
F11 {F11}
F12 {F12}
F13 {F13}
F14 {F14}
F15 {F15}
F16 {F16}
키패드 추가 {0} 추가}
키패드 빼기 {빼기}
키패드 곱하기 {곱하기}
키패드 나누기 {나누기}

SHIFT, CTRL 및 ALT 키 조합을 사용 하 여 결합 된 키를 지정 하려면 하나 이상의 다음 코드를 사용 하 여 키 코드 앞에 야 합니다.

테이블 2키코드

 

SendKeys 클래스는 Windows Vista에서 실행되는 애플리케이션에서 사용할 수 있도록 .NET Framework 3.0에서 업데이트되었습니다. Windows Vista의 향상된 보안(사용자 계정 컨트롤 또는 UAC라고 함) 때문에 이전 구현이 예상대로 작동하지 않습니다.

 

SendKeys 클래스는 타이밍 문제에 취약하며, 이를 해결하기 위해 일부 개발자가 노력해야 했습니다. 업데이트된 구현도 타이밍 문제에 취약하지만 약간 더 빠르며 해결 방법에 대한 변경이 필요할 수도 있습니다. SendKeys 클래스는 먼저 이전 구현을 사용하려고 시도하며, 실패할 경우 새 구현을 사용합니다. 따라서 SendKeys 클래스는 운영 체제마다 다르게 동작할 수 있습니다. 또한 SendKeys 클래스가 새 구현을 사용하는 경우 SendWait 메서드는 다른 프로세스로 전송된 메시지가 처리될 때까지 기다리지 않습니다.

 

 

애플리케이션이 운영 체제와 관계없이 일관된 동작에 의존하는 경우 app.config 파일에 다음 애플리케이션 설정을 추가하여 SendKeys 클래스에서 새 구현을 사용하도록 강제할 수 있습니다.

 

*예제 결과

 

소스코드에서 보듯이 Alt+PrntScr 키 조합을 해서 얻어 낸 결과로 폼(Form) 화면만 스크린 캡쳐 된 모습과

이미지 파일로 저장 하는 모습 입니다. (SendKeys.SendWait ("%{PRTSC}"))

 

 

다음으로 PrntScr 키 조합을 해서 얻어 낸 결과로 폼(Form) 화면만 스크린 캡쳐 된 모습과

이미지 파일로 저장 하는 모습 입니다. (SendKeys.SendWait ("{PRTSC}"))

 

 

https://kdsoft-zeros.tistory.com/189

 

[C#] Sendkeys - 화면 캡쳐 (Screen Capture)

* C# Sendkeys 를 이용한 화면 캡쳐 (Screen Capture) 예제... - 사용한 컨트롤 : Button 2개, PictureBox 1개 전체 소스 코드 Form1.cs using System; using System.Collections.Generic; using System.Componen..

kdsoft-zeros.tistory.com

 

반응형
반응형

* C# Sendkeys 를 이용한 화면 캡쳐 (Screen Capture) 예제...

 

Main

 

- 사용한 컨트롤 : Button 2개, PictureBox 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_SendKey_ScreenCapture
{
    public partial class Form1 : Form
    {
        public Form1()
        {
            InitializeComponent();
        }

        private void button1_Click(object sender, EventArgs e)
        {
            //Alt+PrntScr 키 누른 효과
            SendKeys.SendWait ("%{PRTSC}");
            //PrntScr 키 누른 효과
            //SendKeys.SendWait("{PRTSC}");

            //클립보드에서 PrntScr 키로 화면 캡쳐한 이미지 얻어내기
            Image ig = Clipboard.GetImage();
            if (ig == null) return;

            //PictureBox 에 Image 표시
            pictureBox1.Image = ig;
            //PictureBox 화면 갱신
            pictureBox1.Refresh();
        }

        private void button2_Click(object sender, EventArgs e)
        {
            //Picture Box 이미지 가져 오기
            Bitmap bt = new Bitmap(pictureBox1.Image);
            SaveFileDialog sfd = new SaveFileDialog();

            sfd.Filter = "JPG File(*.jpg) | *.jpg";

            if (sfd.ShowDialog() == DialogResult.OK)
            {
                bt.Save(sfd.FileName);
            }
        }
    }
}

 

 

 

다음은 마이크로소프트 사에서 제공하는 문서 내용 가져온 Sendkeys 명령 KeyCode

(https://docs.microsoft.com/ko-kr/dotnet/api/system.windows.forms.sendkeys.send?view=netframework-4.8)

 

키코드

Backspace {백스페이스}, {B} 또는 {BKSP}
BREAK {중단}
CAPS LOCK {CAPSLOCK}
DEL 또는 삭제 {삭제} 또는 {삭제}
아래쪽 화살표 {를}
END {END}
Enter 키 {0} 입력} 또는 ~
Esc {ESC}
HELP {도움말}
Home {0} 홈}
기능 또는 삽입 {삽입} 또는 {기능}
왼쪽 화살표 {LEFT}
NUM LOCK {NUMLOCK}
Page Down {PGDN}
Page Up {PGUP}
PRINT SCREEN {PRTSC} (사용 하도록 예약)
오른쪽 화살표 {RIGHT}
스크롤 잠금 {SCROLLLOCK}
Tab {TAB}
위쪽 화살표 {UP}
F1 {F1}
F2 {F2}
F3 {F3}
F4 {F4}
F5 {F5}
F6 {F6}
F7 {F7}
F8 {F8}
F9 {F9}
F10 {F10}
F11 {F11}
F12 {F12}
F13 {F13}
F14 {F14}
F15 {F15}
F16 {F16}
키패드 추가 {0} 추가}
키패드 빼기 {빼기}
키패드 곱하기 {곱하기}
키패드 나누기 {나누기}

SHIFT, CTRL 및 ALT 키 조합을 사용 하 여 결합 된 키를 지정 하려면 하나 이상의 다음 코드를 사용 하 여 키 코드 앞에 야 합니다.

테이블 2키코드
SHIFT +
CTRL ^
Alt %

 

SendKeys 클래스는 Windows Vista에서 실행되는 애플리케이션에서 사용할 수 있도록 .NET Framework 3.0에서 업데이트되었습니다. Windows Vista의 향상된 보안(사용자 계정 컨트롤 또는 UAC라고 함) 때문에 이전 구현이 예상대로 작동하지 않습니다.

 

SendKeys 클래스는 타이밍 문제에 취약하며, 이를 해결하기 위해 일부 개발자가 노력해야 했습니다. 업데이트된 구현도 타이밍 문제에 취약하지만 약간 더 빠르며 해결 방법에 대한 변경이 필요할 수도 있습니다. SendKeys 클래스는 먼저 이전 구현을 사용하려고 시도하며, 실패할 경우 새 구현을 사용합니다. 따라서 SendKeys 클래스는 운영 체제마다 다르게 동작할 수 있습니다. 또한 SendKeys 클래스가 새 구현을 사용하는 경우 SendWait 메서드는 다른 프로세스로 전송된 메시지가 처리될 때까지 기다리지 않습니다.

 

애플리케이션이 운영 체제와 관계없이 일관된 동작에 의존하는 경우 app.config 파일에 다음 애플리케이션 설정을 추가하여 SendKeys 클래스에서 새 구현을 사용하도록 강제할 수 있습니다.

 

*예제 결과

 

소스코드에서 보듯이 Alt+PrntScr 키 조합을 해서 얻어 낸 결과로 폼(Form) 화면만 스크린 캡쳐 된 모습과

이미지 파일로 저장 하는 모습 입니다. (SendKeys.SendWait ("%{PRTSC}"))

 

 

다음으로 PrntScr 키 조합을 해서 얻어 낸 결과로 폼(Form) 화면만 스크린 캡쳐 된 모습과

이미지 파일로 저장 하는 모습 입니다. (SendKeys.SendWait ("{PRTSC}"))

 

 

https://kdsoft-zeros.tistory.com/190

 

[VBNET] SendKeys - 화면 캡쳐 (Screen Capture)

* VBNET Sendkeys 를 이용한 화면 캡쳐 (Screen Capture) 예제... - 사용한 컨트롤 : Button 2개, PictureBox 1개 전체 소스 코드 Form1.vb Public Class Form1 Private Sub button1_Click(ByVal sender As Syste..

kdsoft-zeros.tistory.com

 

반응형
반응형

 

* VBNET 사용자가 선택한 프로세스 죽이기 예제...

- WMI 를 사용하기 위해 참조 -> System.Management dll 을 추가 -> 소스 코드 Imports System.Management
  (WMI 는 현재 실행중인 프로세스 조회를 하기 위해)

Main

 

- 사용된 컨트롤: Button 2개, 리스트뷰 1개


전체 소스 코드

Form1.vb

 

Imports System.Management

Public Class Form1

    Private Sub button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles button1.Click
        'Search
        Dim strQry As String = "Select Name, ProcessID, ExecutablePath, WorkingSetSize From Win32_Process"
        Dim iCount As Integer = 1
        '리스트뷰 아이템 초기화
        listView1.Items.Clear()

        Dim oWMI As ManagementObjectSearcher = New ManagementObjectSearcher(New SelectQuery(strQry))

        For Each oItem As ManagementObject In oWMI.Get()

            Try

                Dim lvi As ListViewItem = New ListViewItem()

                lvi.Text = iCount.ToString()
                lvi.SubItems.Add(oItem.GetPropertyValue("Name").ToString())

                listView1.Items.Add(lvi)
                iCount += 1
            Catch ex As Exception

            End Try

        Next


    End Sub

    Private Sub button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles button2.Click
        'Kill
        Dim lvi As ListViewItem = listView1.FocusedItem
        '해당 프로세스 이름 가져 오기 (***.exe -> *** 로)
        Dim strTmp() As String = lvi.SubItems(1).Text.Split("."c)

        Dim pcProcess() As System.Diagnostics.Process = System.Diagnostics.Process.GetProcessesByName(strTmp(0))

        If pcProcess.Length > 0 Then
            pcProcess(0).Kill()
            MessageBox.Show("선택된 해당 프로세스를 종료 하였습니다.", "확 인", MessageBoxButtons.OK, MessageBoxIcon.Asterisk)

            'New Search...
            button1_Click(Nothing, Nothing)
        Else
            MessageBox.Show("선택된 해당 프로세스는 실행 되지 않았습니다.", "확 인", MessageBoxButtons.OK, MessageBoxIcon.Error)
        End If


    End Sub

End Class

 

 

*예제 결과

 

 

 

 

 

 

https://kdsoft-zeros.tistory.com/133

 

[VBNET] [WMI] 현재 실행 중인 프로세스 조회 (Process Search)

* VBNET WMI 를 이용한 현재 실행 중인 프로세스 조회 (Process Search) - WMI 를 사용하기 위해 참조 -> System.Management dll 을 추가 -> 소스 코드 imports System.Management 전체 소스 코드 Form1.vb Impor..

kdsoft-zeros.tistory.com

 

 

https://kdsoft-zeros.tistory.com/187

 

[C#] 선택된 프로세스 죽이기 (Kill Process)

* C# 사용자가 선택한 프로세스 죽이기 예제... - WMI 를 사용하기 위해 참조 -> System.Management dll 을 추가 -> 소스 코드 using System.Management (WMI 는 현재 실행중인 프로세스 조회를 하기 위해) - 사..

kdsoft-zeros.tistory.com

 

반응형
반응형

* C# 사용자가 선택한 프로세스 죽이기 예제...

- WMI 를 사용하기 위해 참조 -> System.Management dll 을 추가 -> 소스 코드 using System.Management
  (WMI 는 현재 실행중인 프로세스 조회를 하기 위해)

 

Main

 

- 사용된 컨트롤: Button 2개, 리스트뷰 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.Management;

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

        private void button1_Click(object sender, EventArgs e)
        {
        	//현재 실행 중인 프로세스 조회...
            string strWMIQry4 = "Select Name, ProcessID, ExecutablePath, WorkingSetSize From Win32_Process";
            int iCount = 1;
            listView1.Items.Clear();

            ManagementObjectSearcher oWMI = new ManagementObjectSearcher(new SelectQuery(strWMIQry4));
            foreach (ManagementObject oItem in oWMI.Get())
            {
                try
                {
                    ListViewItem lvi = new ListViewItem();
                    lvi.Text = iCount.ToString();
                    lvi.SubItems.Add(oItem.GetPropertyValue("Name").ToString());

                    listView1.Items.Add(lvi);
                    iCount++;
                }
                catch (Exception)
                {
                }

            }

        }

        private void button2_Click(object sender, EventArgs e)
        {
            ListViewItem lvi = listView1.FocusedItem;
            //해당 프로세스 이름 가져 오기 (***.exe -> *** 로)
            string[] strTmp = lvi.SubItems[1].Text.Split('.');


            System.Diagnostics.Process[] pcProcess = System.Diagnostics.Process.GetProcessesByName(strTmp[0]);

            if (pcProcess.Length > 0)
            {
                pcProcess[0].Kill();
                MessageBox.Show("선택된 해당 프로세스를 종료 하였습니다.", "확 인", MessageBoxButtons.OK, MessageBoxIcon.Asterisk);

                //New Search...
                button1_Click(null, null);
            }
            else
            {
                MessageBox.Show("선택된 해당 프로세스는 실행 되지 않았습니다.", "확 인", MessageBoxButtons.OK, MessageBoxIcon.Error );
            }

        }
    }
}

 

 

*예제 결과

 

 

 

https://kdsoft-zeros.tistory.com/132

 

[C#] [WMI] 현재 실행 중인 프로세스 조회 (Process Search)

* C# WMI 를 이용한 현재 실행 중인 프로세스 조회 (Process Search) - WMI 를 사용하기 위해 참조 -> System.Management dll 을 추가 -> 소스 코드 using System.Management 전체 소스 코드 Form1.cs using Syst..

kdsoft-zeros.tistory.com

 

https://kdsoft-zeros.tistory.com/188

 

[VBNET] 선택된 프로세스 죽이기 (Kill Process)

* VBNET 사용자가 선택한 프로세스 죽이기 예제... - WMI 를 사용하기 위해 참조 -> System.Management dll 을 추가 -> 소스 코드 Imports System.Management (WMI 는 현재 실행중인 프로세스 조회를 하기 위해)..

kdsoft-zeros.tistory.com

 

반응형
반응형

* VBNET 화면 캡쳐 (Screen Capture) 예제...

 

 

Main

 

 

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

 

전체 소스 코드

Form1.vb

 

Public Class Form1
    Dim btMain As Bitmap

    Private Sub btTSC_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btTSC.Click

        'Total Screen Capture
        btMain = New Bitmap(Screen.PrimaryScreen.Bounds.Width, Screen.PrimaryScreen.Bounds.Height)

        Using g As Graphics = Graphics.FromImage(btMain)
            g.CopyFromScreen(Screen.PrimaryScreen.Bounds.X, _
                             Screen.PrimaryScreen.Bounds.Y, _
                             0, 0, _
                             btMain.Size, _
                            CopyPixelOperation.SourceCopy)
            'Picture Box Display
            pbMain.Image = btMain

        End Using

    End Sub

    Private Sub btFilesave_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btFilesave.Click

        'File Save
        If Not btMain Is Nothing Then
            Dim sfd As SaveFileDialog = New SaveFileDialog()

            sfd.Filter = "JPG File(*.jpg) | *.jpg"

            If sfd.ShowDialog() = DialogResult.OK Then
                btMain.Save(sfd.FileName)
            End If

        End If

    End Sub

End Class

 

 

*예제 결과

 

- 전체 화면 캡쳐한 모습

 

 

-파일로 저장하는 모습

 

 

 

https://kdsoft-zeros.tistory.com/185

 

[C#] 화면 캡쳐 (Screen Capture)

* C# 화면 캡쳐 (Screen Capture) 예제... -사용한 컨트롤: Button 2개, PictureBox 1개 전체 소스 코드 Form1.cs using System; using System.Collections.Generic; using System.ComponentModel; using System...

kdsoft-zeros.tistory.com

 

반응형
반응형

* C# 화면 캡쳐 (Screen Capture) 예제...

 

Main

 

-사용한 컨트롤: Button 2개, PictureBox 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_ScreenCapture
{
    public partial class Form1 : Form
    {
        Bitmap btMain;

        public Form1()
        {
            InitializeComponent();
        }

        private void btTSC_Click(object sender, EventArgs e)
        {
            ////Total Screen Capture
            btMain = new Bitmap(Screen.PrimaryScreen.Bounds.Width,
                                Screen.PrimaryScreen.Bounds.Height);
            using (Graphics g = Graphics.FromImage(btMain))
            {
                g.CopyFromScreen(Screen.PrimaryScreen.Bounds.X,
                                    Screen.PrimaryScreen.Bounds.Y,
                                    0, 0,
                                    btMain.Size,
                                    CopyPixelOperation.SourceCopy);

                //Picture Box Display
                pbMain.Image = btMain;
                
            }
        }

        private void btFilesave_Click(object sender, EventArgs e)
        {
            //File Save
            if (btMain != null)
            {
                SaveFileDialog sfd = new SaveFileDialog();

                sfd.Filter = "JPG File(*.jpg) | *.jpg";

                if (sfd.ShowDialog() == DialogResult.OK)
                {
                    btMain.Save(sfd.FileName);
                }

            }

        }
    }
}

 

 

*예제 결과

 

- 전체 화면 캡쳐한 모습

 

 

-파일로 저장하는 모습

 

 

 

https://kdsoft-zeros.tistory.com/186

 

[VBNET] 화면 캡쳐 (Screen Capture)

* VBNET 화면 캡쳐 (Screen Capture) 예제... -사용한 컨트롤: Button 2개, PictureBox 1개 전체 소스 코드 Form1.vb Public Class Form1 Dim btMain As Bitmap Private Sub btTSC_Click(ByVal sender As System...

kdsoft-zeros.tistory.com

 

반응형

+ Recent posts