テックメモ – ページ 26 – 自分用のメモです。内容が間違っていたり、作りかけで動作しないコードなどあるのでご注意ください。

2019-12-172021-07-29

VBA 重複削除

重複を取り除く方法はいくつかあると思うけど、ネット上で一番有名なdictionaryを使う方法を採用。

Sub DeleteDuplicate()

Set dic = CreateObject("scripting.dictionary")

For Each r In Selection
  If Not dic.exists(r.Value) Then dic.Add r.Value, ""
Next

k = dic.keys
For i = 0 To dic.Count - 1
  Sheets("Sheet2").Cells(i + 1, 1).Value = k(i)
Next i

End Sub

Sub DeleteDuplicate()

Set dic = CreateObject("scripting.dictionary")

For Each r In Selection

If Not dic.exists(r.Value) Then dic.Add r.Value, ""

k = dic.keys

For i = 0 To dic.Count - 1

Sheets("Sheet2").Cells(i + 1, 1).Value = k(i)

Next i

End Sub

少し違うバージョン

Sub DeleteDuplicate()
 
Set dic = CreateObject("scripting.dictionary")

Set w = ActiveSheet

For r = 2 To 4111

  k = w.Cells(r, 1).Value
  v = w.Cells(r, 2).Value

  If Not dic.exists(k) Then dic.Add k, v
  
Next

kk = dic.keys
vv = dic.items

For i = 0 To dic.Count - 1
  w.Cells(i + 1, 4).Value = kk(i)
  w.Cells(i + 1, 5).Value = vv(i)
Next i
 
End Sub

Sub DeleteDuplicate()

Set dic = CreateObject("scripting.dictionary")

Set w = ActiveSheet

For r = 2 To 4111

k = w.Cells(r, 1).Value

v = w.Cells(r, 2).Value

If Not dic.exists(k) Then dic.Add k, v

kk = dic.keys

vv = dic.items

For i = 0 To dic.Count - 1

w.Cells(i + 1, 4).Value = kk(i)

w.Cells(i + 1, 5).Value = vv(i)

Next i

End Sub

2019-12-112020-01-15

VBA 関数の参照先アドレス(行)の増減

大量の関数を複写や移動するとき、参照先アドレスの数値(行)だけ一括で増減したいときがある。

例えばデータ用のシートに対して印刷用のシートからの参照していて、行数の関係が対応していないためそのまま複写できない場合など。

今回は式の中にアドレスが1つだけの場合を想定している。

Sub AddSub()
 
sumValue = InputBox("行加算")
 
For Each cell In Selection
 
 targetRowValue = cell.Value ' sheet!A80
 
 If targetRowValue = "" Or Left(targetRowValue, 1) <> "#" Then GoTo brk
 
 tmp = InStr(targetRowValue, "!")
 targetAddress = Mid(targetRowValue, tmp + 1) ' A2
 targetSheetName = Left(targetRowValue, tmp) ' sheet!
 
 tmp = StrReverse(targetAddress & "9")
 tmp = Val(tmp)
 tmp = StrReverse(tmp)
 targetAddressNum = Left(tmp, Len(tmp) - 1) ' 2
 
 targetAddressAsc = Replace(targetAddress, targetAddressNum, "") ' A
  
 cell.Value = targetSheetName & targetAddressAsc & (0 + targetAddressNum + sumValue)
  
brk:
 
Next
 
End Sub

Sub AddSub()

sumValue = InputBox("行加算")

For Each cell In Selection

targetRowValue = cell.Value ' sheet!A80

If targetRowValue = "" Or Left(targetRowValue, 1) <> "#" Then GoTo brk

tmp = InStr(targetRowValue, "!")

targetAddress = Mid(targetRowValue, tmp + 1) ' A2

targetSheetName = Left(targetRowValue, tmp) ' sheet!

tmp = StrReverse(targetAddress & "9")

tmp = Val(tmp)

tmp = StrReverse(tmp)

targetAddressNum = Left(tmp, Len(tmp) - 1) ' 2

targetAddressAsc = Replace(targetAddress, targetAddressNum, "") ' A

cell.Value = targetSheetName & targetAddressAsc & (0 + targetAddressNum + sumValue)

brk:

End Sub

2019-11-202020-01-16

VBA フォルダ作成

以前フォルダの構成をエクセルに書き出す機能を作ってみた。

VBA フォルダ・ファイルのリンクの一覧

逆にエクセルからフォルダを作成できると便利という場面も多いので作ってみた。

Sub CreateFolder()

Set w = Sheets("表紙")

basePath = Application.ActiveWorkbook.Path

r = 1
Do While w.Cells(r, 1).Value <> ""

  targetPath = basePath & "\" & w.Cells(r, 1).Value
  
  If "" <> Dir(targetPath, vbDirectory) Then
    MsgBox w.Cells(r, 1).Value & "は既に存在します。"
    Exit Sub
  End If

r = r + 1
Loop

r = 1
Do While w.Cells(r, 1).Value <> ""

  targetPath = basePath & "\" & w.Cells(r, 1).Value
  If "" = Dir(targetPath, vbDirectory) Then MkDir (targetPath) ' 指定が重複してた場合
  
r = r + 1
Loop

MsgBox "完了しました。"

End Sub

Sub CreateFolder()

Set w = Sheets("表紙")

basePath = Application.ActiveWorkbook.Path

r = 1

Do While w.Cells(r, 1).Value <> ""

targetPath = basePath & "\" & w.Cells(r, 1).Value

If "" <> Dir(targetPath, vbDirectory) Then

MsgBox w.Cells(r, 1).Value & "は既に存在します。"

Exit Sub

End If

r = r + 1

Loop

r = 1

Do While w.Cells(r, 1).Value <> ""

targetPath = basePath & "\" & w.Cells(r, 1).Value

If "" = Dir(targetPath, vbDirectory) Then MkDir (targetPath) ' 指定が重複してた場合

r = r + 1

Loop

MsgBox "完了しました。"

End Sub

2019-09-202020-02-03

C# Reflection

class Test
{
    public string UserName = "hello";
    public int UserAge = 0;
    public Test()
    {
        UserAge = 10;
    }
}

public Form1()
{
    InitializeComponent();

    // 通常アクセス
    Debug.Print(new Test().UserName); // hello

    // リフレクション

    var testObj = new Test(); // インスタンス生成
    var objType = testObj.GetType(); // Type取得

    Debug.Print(objType.Name); // Test

    var fieldInfo = objType.GetField("UserAge"); // TypeからFieldInfo取得 (存在しないとnull)

    Debug.Print(fieldInfo.GetValue(testObj).ToString()); // 10
    // GetValueはインスタンスを渡す点に注意

    fieldInfo.SetValue(testObj, 20);
    Debug.Print(testObj.UserAge.ToString()); // 20
}

class Test

{

public string UserName = "hello";

public int UserAge = 0;

public Test()

{

UserAge = 10;

}

public Form1()

{

InitializeComponent();

// 通常アクセス

Debug.Print(new Test().UserName); // hello

// リフレクション

var testObj = new Test(); // インスタンス生成

var objType = testObj.GetType(); // Type取得

Debug.Print(objType.Name); // Test

var fieldInfo = objType.GetField("UserAge"); // TypeからFieldInfo取得 (存在しないとnull)

Debug.Print(fieldInfo.GetValue(testObj).ToString()); // 10

// GetValueはインスタンスを渡す点に注意

fieldInfo.SetValue(testObj, 20);

Debug.Print(testObj.UserAge.ToString()); // 20

}

Getterにアクセスする場合もほぼ同じ。

foreach (var model in SalesDataGridViewModels)
{
  var objType = model.GetType();
  var propInfo = objType.GetProperty(ColumnSelect.Text);
  string targetString = propInfo.GetValue(model).ToString().Replace("　", " ");
}

foreach (var model in SalesDataGridViewModels)

{

var objType = model.GetType();

var propInfo = objType.GetProperty(ColumnSelect.Text);

string targetString = propInfo.GetValue(model).ToString().Replace("　", " ");

}

2019-09-172020-05-05

C# DirectX基本色々

using System;
using System.Drawing;
using System.Windows.Forms;

using Microsoft.DirectX;
using Microsoft.DirectX.Direct3D;

namespace WindowsFormsApp5
{
    public partial class Form1 : Form
    {
        private Device device = null;
        private Microsoft.DirectX.Direct3D.Font _font = null; // Direct3DX

        public Form1()
        {
            InitializeComponent();
            this.ClientSize = new Size(640, 480);

            // デバイス初期化
            SetupDevice(this);

            // マウスイベントで描画
            this.MouseMove += MainRender;

            // 処理ループの場合
            while (this.Created)
            {
                System.Threading.Thread.Sleep(1);
                Application.DoEvents();
            }
        }
        private void MainRender(object sender, EventArgs e)
        {
            device.Clear(
                ClearFlags.Target, // クリアするターゲット
                Color.Blue,
                1.0f,
                0);

            device.BeginScene();

            // 図形描画1
            DrawVertex(CreateVertex());

            // 図形描画2
            DrawMesh();

            // 文字列描画
            DrawText();

            device.EndScene();
            device.Present();
        }

        private void DrawMesh()
        {
            Material material = new Material();
            material.Ambient = Color.Red;
            material.Diffuse = Color.AliceBlue;

            device.Material = material;

            // レンダリングオプション
            device.RenderState.ZBufferEnable = true;

            // カメラ
            device.Transform.View = Matrix.LookAtLH(
                new Vector3(5,5,-10), // カメラの位置
                new Vector3(0,0,0), // カメラの向いている方向
                new Vector3(0,1,0)); // 空間の上を示す方向

            // 投影変換
            device.Transform.Projection = Matrix.PerspectiveFovLH(
                (float)Math.PI/4, // 視界の広さ
                1.0F,
                1.0F,
                100.0F);

            // 照明
            device.Lights[0].Type = LightType.Directional;
            device.Lights[0].Direction = new Vector3(1, -1, 1);
            device.Lights[0].Diffuse = Color.FromArgb(255, 255, 255);
            device.Lights[0].Enabled = true;

            var mesh = Mesh.Box(device, 5, 5, 5);
            mesh.DrawSubset(0);
        }

        private void DrawText()
        {
            FontDescription fd = new FontDescription();
            fd.Height = 24;
            fd.FaceName = "ＭＳ ゴシック";

            _font = new Microsoft.DirectX.Direct3D.Font(device, fd);
            _font.DrawText(
                null, // Spriteクラスの使用有無
                "テスト", 
                PointToClient(MousePosition).X,
                PointToClient(MousePosition).Y,
                Color.White);
        }

        public CustomVertex.TransformedColoredTextured[] CreateVertex()
        {
            int mouseX = PointToClient(MousePosition).X;
            int mouseY = PointToClient(MousePosition).Y;
            int width = 200;
            int height = 100;

            // TransformedColoredTextured
            // 頂点データ作成
            // 頂点の型 (2Dの座標、色、テクスチャの座標を保持)

            var verts = new CustomVertex.TransformedColoredTextured[4];

            // 左上
            verts[0].X = mouseX;
            verts[0].Y = mouseY;
            verts[0].Tu = 0.0f;
            verts[0].Tv = 1.0f;
            verts[0].Color = Color.Green.ToArgb();

            // 右上
            verts[1].X = mouseX + width;
            verts[1].Y = mouseY;
            verts[1].Tu = 0.0f;
            verts[1].Tv = 1.0f;

            // 左下
            verts[2].X = mouseX;
            verts[2].Y = mouseY + height;
            verts[2].Tu = 0.0f;
            verts[2].Tv = 1.0f;

            // 右下
            verts[3].X = mouseX + width;
            verts[3].Y = mouseY + height;
            verts[3].Tu = 0.0f;
            verts[3].Tv = 1.0f;

            return verts;
        }

        private void DrawVertex(CustomVertex.TransformedColoredTextured[] verts)
        {
            // 頂点配列を頂点バッファへ

            if (device == null) return;

            VertexBuffer vertexBuffer = new VertexBuffer(
                typeof(CustomVertex.TransformedColoredTextured),
                4,
                device,
                0,
                CustomVertex.TransformedColoredTextured.Format,
                Pool.Managed);

            GraphicsStream stm = vertexBuffer.Lock(0, 0, 0);
            stm.Write(verts);
            vertexBuffer.Unlock();
            device.SetStreamSource(0, vertexBuffer, 0);
            device.VertexFormat = CustomVertex.TransformedColoredTextured.Format;
            device.DrawPrimitives(PrimitiveType.TriangleStrip, 0, 2);
        }

        public void SetupDevice(Control target)
        {
            PresentParameters pp = new PresentParameters();
            pp.Windowed = true;
            pp.SwapEffect = SwapEffect.Discard;
            pp.PresentationInterval = PresentInterval.Immediate;

            // 通常ハードウェア処理の方が高性能だかグラフィックカードなどにより要変更

            device = new Device(
                0, // 物理デバイスインデックス(通常0)
                DeviceType.Hardware,　// ハードウェアアクセラレーション有効化
                target,
                CreateFlags.HardwareVertexProcessing, // ハードウェアによる頂点処理有効化
                pp);
        }
    }
}

100

101

102

103

104

105

106

107

108

109

110

111

112

113

114

115

116

117

118

119

120

121

122

123

124

125

126

127

128

129

130

131

132

133

134

135

136

137

138

139

140

141

142

143

144

145

146

147

148

149

150

151

152

153

154

155

156

157

158

159

160

161

162

163

164

165

166

167

168

169

170

171

172

173

174

175

176

177

178

179

180

181

182

183

184

185

using System;

using System.Drawing;

using System.Windows.Forms;

using Microsoft.DirectX;

using Microsoft.DirectX.Direct3D;

namespace WindowsFormsApp5

{

public partial class Form1 : Form

{

private Device device = null;

private Microsoft.DirectX.Direct3D.Font _font = null; // Direct3DX

public Form1()

{

InitializeComponent();

this.ClientSize = new Size(640, 480);

// デバイス初期化

SetupDevice(this);

// マウスイベントで描画

this.MouseMove += MainRender;

// 処理ループの場合

while (this.Created)

{

System.Threading.Thread.Sleep(1);

Application.DoEvents();

}

private void MainRender(object sender, EventArgs e)

{

device.Clear(

ClearFlags.Target, // クリアするターゲット

Color.Blue,

1.0f,

0);

device.BeginScene();

// 図形描画1

DrawVertex(CreateVertex());

// 図形描画2

DrawMesh();

// 文字列描画

DrawText();

device.EndScene();

device.Present();

}

private void DrawMesh()

{

Material material = new Material();

material.Ambient = Color.Red;

material.Diffuse = Color.AliceBlue;

device.Material = material;

// レンダリングオプション

device.RenderState.ZBufferEnable = true;

// カメラ

device.Transform.View = Matrix.LookAtLH(

new Vector3(5,5,-10), // カメラの位置

new Vector3(0,0,0), // カメラの向いている方向

new Vector3(0,1,0)); // 空間の上を示す方向

// 投影変換

device.Transform.Projection = Matrix.PerspectiveFovLH(

(float)Math.PI/4, // 視界の広さ

1.0F,

100.0F);

// 照明

device.Lights[0].Type = LightType.Directional;

device.Lights[0].Direction = new Vector3(1, -1, 1);

device.Lights[0].Diffuse = Color.FromArgb(255, 255, 255);

device.Lights[0].Enabled = true;

var mesh = Mesh.Box(device, 5, 5, 5);

mesh.DrawSubset(0);

}

private void DrawText()

{

FontDescription fd = new FontDescription();

fd.Height = 24;

fd.FaceName = "ＭＳゴシック";

_font = new Microsoft.DirectX.Direct3D.Font(device, fd);

_font.DrawText(

null, // Spriteクラスの使用有無

"テスト",

PointToClient(MousePosition).X,

PointToClient(MousePosition).Y,

Color.White);

}

public CustomVertex.TransformedColoredTextured[] CreateVertex()

{

int mouseX = PointToClient(MousePosition).X;

int mouseY = PointToClient(MousePosition).Y;

int width = 200;

int height = 100;

// TransformedColoredTextured

// 頂点データ作成

// 頂点の型 (2Dの座標、色、テクスチャの座標を保持)

var verts = new CustomVertex.TransformedColoredTextured[4];

// 左上

verts[0].X = mouseX;

verts[0].Y = mouseY;

verts[0].Tu = 0.0f;

verts[0].Tv = 1.0f;

verts[0].Color = Color.Green.ToArgb();

// 右上

verts[1].X = mouseX + width;

verts[1].Y = mouseY;

verts[1].Tu = 0.0f;

verts[1].Tv = 1.0f;

// 左下

verts[2].X = mouseX;

verts[2].Y = mouseY + height;

verts[2].Tu = 0.0f;

verts[2].Tv = 1.0f;

// 右下

verts[3].X = mouseX + width;

verts[3].Y = mouseY + height;

verts[3].Tu = 0.0f;

verts[3].Tv = 1.0f;

return verts;

}

private void DrawVertex(CustomVertex.TransformedColoredTextured[] verts)

{

// 頂点配列を頂点バッファへ

if (device == null) return;

VertexBuffer vertexBuffer = new VertexBuffer(

typeof(CustomVertex.TransformedColoredTextured),

device,

CustomVertex.TransformedColoredTextured.Format,

Pool.Managed);

GraphicsStream stm = vertexBuffer.Lock(0, 0, 0);

stm.Write(verts);

vertexBuffer.Unlock();

device.SetStreamSource(0, vertexBuffer, 0);

device.VertexFormat = CustomVertex.TransformedColoredTextured.Format;

device.DrawPrimitives(PrimitiveType.TriangleStrip, 0, 2);

}

public void SetupDevice(Control target)

{

PresentParameters pp = new PresentParameters();

pp.Windowed = true;

pp.SwapEffect = SwapEffect.Discard;

pp.PresentationInterval = PresentInterval.Immediate;

// 通常ハードウェア処理の方が高性能だかグラフィックカードなどにより要変更

device = new Device(

0, // 物理デバイスインデックス(通常0)

DeviceType.Hardware,　// ハードウェアアクセラレーション有効化

target,

CreateFlags.HardwareVertexProcessing, // ハードウェアによる頂点処理有効化

pp);

}

2019-09-112020-05-05

C# DirectX第一歩

DirectX Software Development Kit (SDK)
のインストールが必要な場合、
そのままインストールすると失敗するので、
Microsoft Visual C++ 関連を全て削除してからインストールする。
(2010が原因の模様で2010だけでもいけるっぽい)

public partial class Form1 : Form
{
private Device device = null;
public Form1()
{
    // 参照設定でDLL追加
    // C:\Windows\assembly\GAC\Microsoft.DirectX

    // app.configを以下の用に書き換える
    // <startup> を下記のように変更 
    // <startup useLegacyV2RuntimeActivationPolicy="true">

    // デバッグ > ウィンドウ > 例外設定
    // Managed Debugging Assistants > LoaderLockのチェックを外す。

    InitializeComponent();

    PresentParameters pp = new PresentParameters();
    pp.Windowed = true;
    pp.SwapEffect = SwapEffect.Discard;

    device = new Device(
        0,
        DeviceType.Hardware,
        this,
        CreateFlags.SoftwareVertexProcessing, pp);

    this.Paint += (s, e) =>
    {
        device.Clear(
            ClearFlags.Target,
            Color.DarkBlue,
            1.0f,
            0);
        device.BeginScene();
        device.EndScene();
        device.Present();
    };

    this.FormClosed += (s, e) =>
    {
        device.Dispose();
        device = null;
    };

}
}

public partial class Form1 : Form

{

private Device device = null;

public Form1()

{

// 参照設定でDLL追加

// C:\Windows\assembly\GAC\Microsoft.DirectX

// app.configを以下の用に書き換える

// <startup> を下記のように変更

// <startup useLegacyV2RuntimeActivationPolicy="true">

// デバッグ > ウィンドウ > 例外設定

// Managed Debugging Assistants > LoaderLockのチェックを外す。

InitializeComponent();

PresentParameters pp = new PresentParameters();

pp.Windowed = true;

pp.SwapEffect = SwapEffect.Discard;

device = new Device(

DeviceType.Hardware,

this,

CreateFlags.SoftwareVertexProcessing, pp);

this.Paint += (s, e) =>

{

device.Clear(

ClearFlags.Target,

Color.DarkBlue,

1.0f,

0);

device.BeginScene();

device.EndScene();

device.Present();

};

this.FormClosed += (s, e) =>

{

device.Dispose();

device = null;

};

}

2019-09-11

C# 非同期Thread/ThreadPool

public Form1()
{
    InitializeComponent();

    // Thread メソッド
    var t1 = new System.Threading.Thread(Test1);
    t1.Start();

    // Thread ラムダ
    new System.Threading.Thread(() =>
    {
        MessageBox.Show("hello world1");

        this.Invoke((Action)(()=> {
            button1.Text = "1";
        }));
        // 別スレッドからUIにアクセスする場合、Invokeから

    }).Start();

    // スレッドは高コストなので使い回す。ThreadPool

    System.Threading.ThreadPool.QueueUserWorkItem( _ =>
    {
        MessageBox.Show("hello world2");
    }, null);
    // QueueUserWorkItem
    // QueueUserWorkItem(実行するメソッド, メソッドの引数)
    // 実行するメソッドはWaitCallbackデリゲート型 = delegate void WaitCallback (Object state)
}

private void Test1() { }

public Form1()

{

InitializeComponent();

// Thread メソッド

var t1 = new System.Threading.Thread(Test1);

t1.Start();

// Thread ラムダ

new System.Threading.Thread(() =>

{

MessageBox.Show("hello world1");

this.Invoke((Action)(()=> {

button1.Text = "1";

}));

// 別スレッドからUIにアクセスする場合、Invokeから

}).Start();

// スレッドは高コストなので使い回す。ThreadPool

System.Threading.ThreadPool.QueueUserWorkItem( _ =>

{

MessageBox.Show("hello world2");

}, null);

// QueueUserWorkItem

// QueueUserWorkItem(実行するメソッド, メソッドの引数)

// 実行するメソッドはWaitCallbackデリゲート型 = delegate void WaitCallback (Object state)

}

private void Test1() { }

2019-09-102020-09-30

C# 非同期async/await(TAP)

        public Form1()
        {
            Test1();
            MessageBox.Show("done");
        }

        private async Task Test1()
        {
            // awaitは一旦スレッドを開放し、Task完了後に同じスレッドを利用する。
            // awaitがあると1の後、クリックするまで2は表示されない。
            // awaitがないと1の後すぐに2が表示される。
            // awaitの有無に関係なくdoneはすぐに表示される。
            await Task.Run(()=> {
                MessageBox.Show("1");
            });
            MessageBox.Show("2");
        }

public Form1()

{

Test1();

MessageBox.Show("done");

}

private async Task Test1()

{

// awaitは一旦スレッドを開放し、Task完了後に同じスレッドを利用する。

// awaitがあると1の後、クリックするまで2は表示されない。

// awaitがないと1の後すぐに2が表示される。

// awaitの有無に関係なくdoneはすぐに表示される。

await Task.Run(()=> {

MessageBox.Show("1");

});

MessageBox.Show("2");

}

        public Form1()
        {
            // Task作成(開始) --------------------------------------------------------

            var task1 = Task.Factory.StartNew(() => {
                MessageBox.Show("1/t");
            });
            // または
            // var task = Task.Run()
            // var = new Task()
            // などある

            MessageBox.Show("2");
            // 1/tは非同期になるので1/t,2は同時に表示される。

            // ContinueWith --------------------------------------------------------
            // 元Taskに継続Taskの作成
            task1.ContinueWith((t) => {
                MessageBox.Show("3/t");
            });
            // 1に継続しているので1/tを消すと3/tが表示される
            // 2を消しても表示されない(ただ2も消さないとMessageBoxで止まり継続Taskが作成されない)
        }

public Form1()

{

// Task作成(開始) --------------------------------------------------------

var task1 = Task.Factory.StartNew(() => {

MessageBox.Show("1/t");

});

// または

// var task = Task.Run()

// var = new Task()

// などある

MessageBox.Show("2");

// 1/tは非同期になるので1/t,2は同時に表示される。

// ContinueWith --------------------------------------------------------

// 元Taskに継続Taskの作成

task1.ContinueWith((t) => {

MessageBox.Show("3/t");

});

// 1に継続しているので1/tを消すと3/tが表示される

// 2を消しても表示されない(ただ2も消さないとMessageBoxで止まり継続Taskが作成されない)

}

        public Form1()
        {
            var t = Test1();
            MessageBox.Show(t.Result);
            // Resultを利用すると非同期の終了を待つ
        }

        private async Task<string> Test1()
        {
            // awaitがないと結果(Task)を取り出せない
            var t = await Task.Run(()=> {
                return "1";
            }).ConfigureAwait(false);
            // ConfigureAwaitがないとデッドロックする。
            // t.await後に元のスレッドを利用しようとするが、t.Resultでスレッドを利用中のため

            return t;

        }

public Form1()

{

var t = Test1();

MessageBox.Show(t.Result);

// Resultを利用すると非同期の終了を待つ

}

private async Task<string> Test1()

{

// awaitがないと結果(Task)を取り出せない

var t = await Task.Run(()=> {

return "1";

}).ConfigureAwait(false);

// ConfigureAwaitがないとデッドロックする。

// t.await後に元のスレッドを利用しようとするが、t.Resultでスレッドを利用中のため

return t;

}

        public Form1()
        {
            // 基本的な考え方
            // asyncをメソッドにつけると非同期メソッドとなり、非同期メソッドは文中でawaitが使える。
            // 非同期メソッドの返り値はTaskとなる。
            // awaitは指定したTaskの完了を待ち結果を取り出せる。

            // Task自体はasync関係なく作成できる
            Task.Run(() => {
                MessageBox.Show("1");
            });

            // Taskをawaitするにはasyncが必要。
            // 下記は不可
            
            // await Task.run(() => {
            //     MessageBox.Show("1");
            // });
            
            // 非同期メソッド(async)をラムダ式で表すこともできる。
            Func<Task<string>> f = async () => {
                return await Task.Run(() =>
                {
                    return "hello world";
                }).ConfigureAwait(false);
            };

            
            // ここで非同期メソッドは実行されている。
            var t = f();
            // 2が表示された後、hello worldが表示される。
            MessageBox.Show("2");
            MessageBox.Show(t.Result);
        }

public Form1()

{

// 基本的な考え方

// asyncをメソッドにつけると非同期メソッドとなり、非同期メソッドは文中でawaitが使える。

// 非同期メソッドの返り値はTaskとなる。

// awaitは指定したTaskの完了を待ち結果を取り出せる。

// Task自体はasync関係なく作成できる

Task.Run(() => {

MessageBox.Show("1");

});

// Taskをawaitするにはasyncが必要。

// 下記は不可

// await Task.run(() => {

// MessageBox.Show("1");

// });

// 非同期メソッド(async)をラムダ式で表すこともできる。

Func<Task<string>> f = async () => {

return await Task.Run(() =>

{

return "hello world";

}).ConfigureAwait(false);

};

// ここで非同期メソッドは実行されている。

var t = f();

// 2が表示された後、hello worldが表示される。

MessageBox.Show("2");

MessageBox.Show(t.Result);

}

        public Form1()
        {
            InitializeComponent();

            // TaskからUIを更新する場合
            Shown += (s, e) =>
            {
                Task.Run(() =>
                {
                    for (int i = 0; i < 1000000; i++)
                    {
                        Invoke(new Action(() =>
                        {
                            textBox1.Text = i.ToString();
                        }));
                    }
                });
            };
        }

public Form1()

{

InitializeComponent();

// TaskからUIを更新する場合

Shown += (s, e) =>

{

Task.Run(() =>

{

for (int i = 0; i < 1000000; i++)

{

Invoke(new Action(() =>

{

textBox1.Text = i.ToString();

}));

}

});

};

}

2019-09-092019-09-11

C# 非同期Async/Completed(EAP)

public Form1()
{
    System.Net.WebClient wc = new System.Net.WebClient();
    wc.DownloadStringCompleted += (s, e) =>
    {
        MessageBox.Show("done");
    };

    wc.DownloadStringAsync(new Uri("https://www.google.co.jp"));
}

public Form1()

{

System.Net.WebClient wc = new System.Net.WebClient();

wc.DownloadStringCompleted += (s, e) =>

{

MessageBox.Show("done");

};

wc.DownloadStringAsync(new Uri("https://www.google.co.jp"));

}

BackgroundWorker w = new BackgroundWorker();
public Form1()
{
    InitializeComponent();
    // xxxAsyncで実行、終了時にxxxCompletedのコールバック
    // BackgroundWorkerが標準でサポート

    w.DoWork += OnWork;
    w.RunWorkerCompleted += OnWorkCompleted;

    w.RunWorkerAsync();

    MessageBox.Show("end");
    // 待機がないとcompletedが表示される前にメインスレッドが終了する
}

private void OnWork(object sender, DoWorkEventArgs e)
{
    MessageBox.Show("work");
}
private void OnWorkCompleted(object sender, RunWorkerCompletedEventArgs e)
{
    MessageBox.Show("completed");
}

BackgroundWorker w = new BackgroundWorker();

public Form1()

{

InitializeComponent();

// xxxAsyncで実行、終了時にxxxCompletedのコールバック

// BackgroundWorkerが標準でサポート

w.DoWork += OnWork;

w.RunWorkerCompleted += OnWorkCompleted;

w.RunWorkerAsync();

MessageBox.Show("end");

// 待機がないとcompletedが表示される前にメインスレッドが終了する

}

private void OnWork(object sender, DoWorkEventArgs e)

{

MessageBox.Show("work");

}

private void OnWorkCompleted(object sender, RunWorkerCompletedEventArgs e)

{

MessageBox.Show("completed");

}

対応している型

System.ComponentModel.Component
System.ComponentModel.BackgroundWorker
System.Media.SoundPlayer
System.Net.WebClient
System.Net.NetworkInformation.Ping
System.Windows.Forms.PictureBox
System.Net.Mail.SmtpClient
System.Deployment.Application.ApplicationDeployment
System.Deployment.Application.InPlaceHostingManager
System.Activities.WorkflowInvoker
System.ServiceModel.Activities.WorkflowControlClient
System.Net.PeerToPeer.PeerNameResolver
System.Net.PeerToPeer.Collaboration.ContactManager
System.Net.PeerToPeer.Collaboration.Peer
System.Net.PeerToPeer.Collaboration.PeerContact
System.Net.PeerToPeer.Collaboration.PeerNearMe
System.ServiceModel.Discovery.AnnouncementClient
System.ServiceModel.Discovery.DiscoveryClient

2019-09-092022-10-13

C# 動的に画像生成

System.Drawing

        public async Task<IActionResult> CreateImage()
        {
            using (System.Drawing.Bitmap bitmap = new System.Drawing.Bitmap(500, 80))
            {
                using (System.Drawing.Graphics graphics = System.Drawing.Graphics.FromImage(bitmap))
                {
                    //背景描画
                    using (SolidBrush solidBrush = new SolidBrush(Color.White))
                    {
                        //graphics.FillRectangle(solidBrush, new Rectangle(0, 0, 200, 200));
                        graphics.FillRectangle(solidBrush, graphics.VisibleClipBounds);
                    }

                    // 図形描画
                    using (SolidBrush solidBrush = new SolidBrush(Color.Blue))
                    {
                        graphics.DrawPie(Pens.Red, 0, 0, 80, 80, 300, 300);
                    }

                    // 文字描画
                    string serial = "管理番号：0001";

                    using (System.Drawing.Font font = new System.Drawing.Font("メイリオ", 36))
                    using (SolidBrush solidBrush = new SolidBrush(Color.Black))
                    {
                        graphics.TextRenderingHint = TextRenderingHint.AntiAlias;
                        graphics.DrawString(serial, font, solidBrush, new System.Drawing.Point(0, 0));
                    }

                    // Controllerで実行する場合(ASP.NET)
                    var ms = new MemoryStream();
                    bitmap.Save(ms, System.Drawing.Imaging.ImageFormat.Png);
                    ms.Position = 0;
                    return new FileStreamResult(ms, "image/png");

                    // PictureBoxの場合
                    // PictureBox1.Image = bitmap;
                }
            }
        }

public async Task<IActionResult> CreateImage()

{

using (System.Drawing.Bitmap bitmap = new System.Drawing.Bitmap(500, 80))

{

using (System.Drawing.Graphics graphics = System.Drawing.Graphics.FromImage(bitmap))

{

//背景描画

using (SolidBrush solidBrush = new SolidBrush(Color.White))

{

//graphics.FillRectangle(solidBrush, new Rectangle(0, 0, 200, 200));

graphics.FillRectangle(solidBrush, graphics.VisibleClipBounds);

}

// 図形描画

using (SolidBrush solidBrush = new SolidBrush(Color.Blue))

{

graphics.DrawPie(Pens.Red, 0, 0, 80, 80, 300, 300);

}

// 文字描画

string serial = "管理番号：0001";

using (System.Drawing.Font font = new System.Drawing.Font("メイリオ", 36))

using (SolidBrush solidBrush = new SolidBrush(Color.Black))

{

graphics.TextRenderingHint = TextRenderingHint.AntiAlias;

graphics.DrawString(serial, font, solidBrush, new System.Drawing.Point(0, 0));

}

// Controllerで実行する場合(ASP.NET)

var ms = new MemoryStream();

bitmap.Save(ms, System.Drawing.Imaging.ImageFormat.Png);

ms.Position = 0;

return new FileStreamResult(ms, "image/png");

// PictureBoxの場合

// PictureBox1.Image = bitmap;

}

QRコードの場合(ZXing.SkiaSharp)

        public async Task<IActionResult> CreateImage(string? id)
        {
            using System.Drawing.Bitmap bitmap = new System.Drawing.Bitmap(500, 70);
            using System.Drawing.Graphics graphics = System.Drawing.Graphics.FromImage(bitmap);

            using (SolidBrush solidBrush = new SolidBrush(Color.White))
            {
                graphics.FillRectangle(solidBrush, graphics.VisibleClipBounds);
            }

            var writer = new BarcodeWriter
            {
                Format = ZXing.BarcodeFormat.QR_CODE,
                Options = new ZXing.Common.EncodingOptions
                {
                    Width = 200,
                    Height = 200,
                    Margin = 2,
                }
            };

            var ms = new MemoryStream();
            var bmp = writer.Write("abcabc");
            bmp.Encode(ms, SKEncodedImageFormat.Png, 100);
            ms.Position = 0;

            return new FileStreamResult(ms, "image/png");
        }

public async Task<IActionResult> CreateImage(string? id)

{

using System.Drawing.Bitmap bitmap = new System.Drawing.Bitmap(500, 70);

using System.Drawing.Graphics graphics = System.Drawing.Graphics.FromImage(bitmap);

using (SolidBrush solidBrush = new SolidBrush(Color.White))

{

graphics.FillRectangle(solidBrush, graphics.VisibleClipBounds);

}

var writer = new BarcodeWriter

{

Format = ZXing.BarcodeFormat.QR_CODE,

Options = new ZXing.Common.EncodingOptions

{

Width = 200,

Height = 200,

Margin = 2,

}

};

var ms = new MemoryStream();

var bmp = writer.Write("abcabc");

bmp.Encode(ms, SKEncodedImageFormat.Png, 100);

ms.Position = 0;

return new FileStreamResult(ms, "image/png");

}

SkiaSharp+ZXing.SkiaSharpを利用し1つの画像として生成

        public async Task<IActionResult> CreateImage(string? id)
        {
            using SkiaSharp.SKBitmap bitmap = new SkiaSharp.SKBitmap(500, 70);
            using SkiaSharp.SKCanvas canvas = new SkiaSharp.SKCanvas(bitmap);

            //背景描画1
            canvas.Clear(SKColors.White);

            //背景描画2
            SkiaSharp.SKPaint paint1 = new SkiaSharp.SKPaint();
            paint1.Style = SkiaSharp.SKPaintStyle.Fill;
            paint1.Color = SkiaSharp.SKColors.Blue;
            //canvas.DrawRect (canvas.LocalClipBounds, paint1);

            // 文字描画
            SkiaSharp.SKPaint paint2 = new SkiaSharp.SKPaint();
            paint2.Style = SkiaSharp.SKPaintStyle.Fill;
            paint2.Color = SkiaSharp.SKColors.Black ;
            paint2.TextSize = 36;
            paint2.Typeface = SkiaSharp.SKTypeface.FromFamilyName("Yu Gothic UI");
            paint2.IsAntialias = true;
            canvas.DrawText("管理番号：" + id, 70, 48, paint2);

            //QRコード描画
            var writer = new BarcodeWriter
            {
                Format = ZXing.BarcodeFormat.QR_CODE,
                Options = new ZXing.Common.EncodingOptions
                {
                    Width = 70,
                    Height = 70,
                    Margin = 0,
                }
            };

            var ms = new MemoryStream();
            var qr = writer.Write(Url.Content("/TestTable33/Details/" + id));
            canvas.DrawImage(SkiaSharp.SKImage.FromBitmap(qr), new SkiaSharp.SKPoint(0,0));
            bitmap.Encode(ms, SKEncodedImageFormat.Png, 100);
            ms.Position = 0;
            return new FileStreamResult(ms, "image/png");
        }

public async Task<IActionResult> CreateImage(string? id)

{

using SkiaSharp.SKBitmap bitmap = new SkiaSharp.SKBitmap(500, 70);

using SkiaSharp.SKCanvas canvas = new SkiaSharp.SKCanvas(bitmap);

//背景描画1

canvas.Clear(SKColors.White);

//背景描画2

SkiaSharp.SKPaint paint1 = new SkiaSharp.SKPaint();

paint1.Style = SkiaSharp.SKPaintStyle.Fill;

paint1.Color = SkiaSharp.SKColors.Blue;

//canvas.DrawRect (canvas.LocalClipBounds, paint1);

// 文字描画

SkiaSharp.SKPaint paint2 = new SkiaSharp.SKPaint();

paint2.Style = SkiaSharp.SKPaintStyle.Fill;

paint2.Color = SkiaSharp.SKColors.Black ;

paint2.TextSize = 36;

paint2.Typeface = SkiaSharp.SKTypeface.FromFamilyName("Yu Gothic UI");

paint2.IsAntialias = true;

canvas.DrawText("管理番号：" + id, 70, 48, paint2);

//QRコード描画

var writer = new BarcodeWriter

{

Format = ZXing.BarcodeFormat.QR_CODE,

Options = new ZXing.Common.EncodingOptions

{

Width = 70,

Height = 70,

Margin = 0,

}

};

var ms = new MemoryStream();

var qr = writer.Write(Url.Content("/TestTable33/Details/" + id));

canvas.DrawImage(SkiaSharp.SKImage.FromBitmap(qr), new SkiaSharp.SKPoint(0,0));

bitmap.Encode(ms, SKEncodedImageFormat.Png, 100);

ms.Position = 0;

return new FileStreamResult(ms, "image/png");

}