okamura – ページ 16 – テックメモ

2021-02-152024-05-03

AutoHotkey キー設定スクリプト

長らくChangeKeyとAutoHotkeyを併用していた。ChangeKeyを先に使い始めたためそのような状態になっていたが、先日ようやくAutoHotkeyだけの環境にした。通常のスタートアップだと一部の管理者権限のソフトでは反応しないこともあるけど仕方ない。

※現在未使用

;--------------------------------------------------------
; Keycode Remap
;--------------------------------------------------------

Escape::RShift
; 左上

Tab::LWin
; 左上

Backspace::Delete
; 右上

RShift::Tab
; Enter下

sc00c::sc01a
;「=」→「@」

sc01a::sc028
;「@」→「:」

sc028::sc00c
;「:」→「-」

sc027::Enter
;「;」→「Enter」

sc079::Backspace
; Space右1

sc070::sc027
; Space右2

;--------------------------------------------------------

; Google日本語入力
; Muhenkan > IMEを無効化
; Hankaku/Zenkaku > IMEを有効化

~sc07b::
If (A_PriorHotkey = A_ThisHotkey && 300 > A_TimeSincePriorHotkey) {
  Send, {sc029}
}
Exit

; Space左1

;--------------------------------------------------------

; sc029::LAlt
; Space左2(Lite2のみ)

; LAlt::Tab
; Space左3(Lite2のみ)

LWin::Tab
; Space左3(Hybridのみ)

;--------------------------------------------------------
; LWin
;--------------------------------------------------------

#1::Send, {F12}
#2::Send, {F2}

;--------------------------------------------------------
; RShift
;--------------------------------------------------------

>+h::Send, {Left}
>+j::Send, {Down}
>+k::Send, {Up}
>+l::Send, {Right}

>+q::Send, {&}
>+w::Send, {'}
>+a::Send, {^}
>+s::Send, {$}

>+u::Send, {|}
>+i::Send, {\}
>+o::Send, {@}
>+p::Send, {`%}

>+n::Send, {(}
>+m::Send, {)}

>+4::Send, {Enter}
>+7::Send, {Home}
>+8::Send, {End}

>+sc079::Send, {Delete}
; Space右1

>+sc027::Send, {Tab}
;「;」

;--------------------------------------------------------
; LControl
;--------------------------------------------------------

^sc07b::Send, {Esc}
; Space左1

~^c::
if (A_PriorHotkey = A_ThisHotkey && 500 > A_TimeSincePriorHotkey) {
  Send, {End}
  Send, +{Home} 
  Send, ^{c} 
}
Exit

;--------------------------------------------------------
; LAlt
;--------------------------------------------------------

!1::Send, {Home}
!2::Send, {End}

!q::Send, !{Left}
!w::Send, !{Right}
!e::Send, ^{w}

!a::Send, ^{PgUp}
!s::Send, ^{PgDn}
!d::Send, ^+{t}
!f::Send, ^{F5}

!v::
WinGet, var, MinMax, A
WinGet, i, ID, A  
If (var = 1) {
  Send, #{Down}
  WinMove, ahk_id %i%,,,,1100,650
  WinGetPos, x, y, w, h, ahk_id %i%
  MouseMove, w//2, 10
} Else If (var = 0) {
  WinGetPos, x, y, w, h, ahk_id %i%
  MouseMove, w//2, 10
  If (A_PriorHotkey = A_ThisHotkey && 500 > A_TimeSincePriorHotkey) {
    MouseMove, w-7, h-7
  }
}
Exit

~sc029 & MButton::Send, #{Tab}
~sc029 & WheelDown::AltTab

;--------------------------------------------------------
; マウスボタン
;--------------------------------------------------------

Pause::Reload

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

;--------------------------------------------------------

; Keycode Remap

;--------------------------------------------------------

Escape::RShift

; 左上

Tab::LWin

; 左上

Backspace::Delete

; 右上

RShift::Tab

; Enter下

sc00c::sc01a

;「=」→「@」

sc01a::sc028

;「@」→「:」

sc028::sc00c

;「:」→「-」

sc027::Enter

;「;」→「Enter」

sc079::Backspace

; Space右1

sc070::sc027

; Space右2

;--------------------------------------------------------

; Google日本語入力

; Muhenkan > IMEを無効化

; Hankaku/Zenkaku > IMEを有効化

~sc07b::

If (A_PriorHotkey = A_ThisHotkey && 300 > A_TimeSincePriorHotkey) {

Send, {sc029}

}

Exit

; Space左1

;--------------------------------------------------------

; sc029::LAlt

; Space左2(Lite2のみ)

; LAlt::Tab

; Space左3(Lite2のみ)

LWin::Tab

; Space左3(Hybridのみ)

;--------------------------------------------------------

; LWin

;--------------------------------------------------------

#1::Send, {F12}

#2::Send, {F2}

;--------------------------------------------------------

; RShift

;--------------------------------------------------------

>+h::Send, {Left}

>+j::Send, {Down}

>+k::Send, {Up}

>+l::Send, {Right}

>+q::Send, {&}

>+w::Send, {'}

>+a::Send, {^}

>+s::Send, {$}

>+u::Send, {|}

>+i::Send, {\}

>+o::Send, {@}

>+p::Send, {`%}

>+n::Send, {(}

>+m::Send, {)}

>+4::Send, {Enter}

>+7::Send, {Home}

>+8::Send, {End}

>+sc079::Send, {Delete}

; Space右1

>+sc027::Send, {Tab}

;「;」

;--------------------------------------------------------

; LControl

;--------------------------------------------------------

^sc07b::Send, {Esc}

; Space左1

~^c::

if (A_PriorHotkey = A_ThisHotkey && 500 > A_TimeSincePriorHotkey) {

Send, {End}

Send, +{Home}

Send, ^{c}

}

Exit

;--------------------------------------------------------

; LAlt

;--------------------------------------------------------

!1::Send, {Home}

!2::Send, {End}

!q::Send, !{Left}

!w::Send, !{Right}

!e::Send, ^{w}

!a::Send, ^{PgUp}

!s::Send, ^{PgDn}

!d::Send, ^+{t}

!f::Send, ^{F5}

!v::

WinGet, var, MinMax, A

WinGet, i, ID, A

If (var = 1) {

Send, #{Down}

WinMove, ahk_id %i%,,,,1100,650

WinGetPos, x, y, w, h, ahk_id %i%

MouseMove, w//2, 10

} Else If (var = 0) {

WinGetPos, x, y, w, h, ahk_id %i%

MouseMove, w//2, 10

If (A_PriorHotkey = A_ThisHotkey && 500 > A_TimeSincePriorHotkey) {

MouseMove, w-7, h-7

}

Exit

~sc029 & MButton::Send, #{Tab}

~sc029 & WheelDown::AltTab

;--------------------------------------------------------

; マウスボタン

;--------------------------------------------------------

Pause::Reload

・追記

AutoHotkeyのみの環境になってからしばらくしてキーボードをLite2からHybrid Type-Sに変更した。AutoHotkeyのリマップだけだと問題がでることも多いので、HHKBのリマップツールを採用することにした。

現在は下記の通り

SetMouseDelay, 0
SendMode, InputThenPlay

;--------------------------------------------------------
; Google日本語入力
;--------------------------------------------------------

; "C:\Program Files (x86)\Google\Google Japanese Input\GoogleIMEJaTool.exe" -mode=config_dialog

; sc07b 無変換
; Muhenkan > IMEを無効化
; Shift Muhenkan > IMEを無効化

; sc070 ひらがな
; Hiragana > IMEを有効化

; sc079 変換
; Henkan > エントリー削除
; Shift Henkan > エントリー削除
 
;--------------------------------------------------------
; 無変換(Space左側)
;--------------------------------------------------------

~sc07b::
If (A_PriorHotkey = A_ThisHotkey && 500 > A_TimeSincePriorHotkey)
{
  Send, {sc070}
}
Exit

;--------------------------------------------------------
; 変換(左上2段目)
;--------------------------------------------------------

sc079 & 1::Send, {F12}
sc079 & 2::Send, {F2}

sc079 & q::Send, {Esc}
sc079 & w::Send, {LWin}
sc079 & e::Send, #{e}
sc079 & r::Send, #{r}

;--------------------------------------------------------
; RShift(左上1段目)
;--------------------------------------------------------

>+h::Send, {Left}
>+j::Send, {Down}
>+k::Send, {Up}
>+l::Send, {Right}

>+q::Send, {&}
>+w::Send, {'}
>+e::Send, {``}

>+a::Send, {^}
>+s::Send, {$}
>+d::Send, {~}

>+u::Send, {|}
>+i::Send, {\}
>+o::Send, {@}
>+p::Send, {`%}

>+n::Send, {(}
>+m::Send, {)}

>+4::Send, {Enter}
>+7::Send, {Home}
>+8::Send, {End}

>+Enter::Send, {Tab}
>+Backspace::Send, {Delete}

;--------------------------------------------------------
; LControl
;--------------------------------------------------------

~<^c::
If (A_PriorHotkey = A_ThisHotkey && 500 > A_TimeSincePriorHotkey)
{
  Send, {End}
  Send, +{Home} 
  Send, ^{c} 
}
Exit

;--------------------------------------------------------
; LAlt
;--------------------------------------------------------

; エクセル以外単独押下無効

LAlt::
If (WinActive("ahk_class XLMAIN"))
{
  Send, {LAlt}
}
Exit

<!WheelUp::
If (WinActive("ahk_class illustrator"))
{
  Send, !{WheelUp}
}
Else
{
  Send, {PgUp}
}
Exit

<!WheelDown::
If (WinActive("ahk_class illustrator"))
{
  Send, !{WheelDown}
}
Else
{
  Send, {PgDn}
}
Exit

<!1::Send, {Home}
<!2::Send, {End}

<!q::Send, !{Left} ; 戻る
<!w::Send, !{Right} ; 進む
<!e::Send, ^{w} ; 閉じる

<!a::Send, ^{PgUp} ; 前のタブ
<!s::Send, ^{PgDn} ; 次のタブ
<!d::Send, ^+{t} ; 再び開く
<!f::Send, ^{F5} ; 更新

<!v::
If (A_PriorHotkey = A_ThisHotkey && 500 > A_TimeSincePriorHotkey)
{
  keyDownCount += 1

  If (keyDownCount >= 3)
  {
    keyDownCount = 0
  }
}
Else
{
  keyDownCount = 0
}

WinGet, min_max, MinMax, A
WinGet, this_id, ID, A  

If (min_max = 1) ; 最大化
{
  SendEvent, #{Down}
  WinMove, ahk_id %this_id%, , , , 1100, 750
} 

WinGetPos, x, y, w, h, ahk_id %this_id%

If (keyDownCount = 0)
{
  MouseMove, w//2, 10
}
Else If (keyDownCount = 1)
{
  MouseMove, w-5, h-5
}
Else If (keyDownCount = 2)
{
  MouseMove, w-30, 15
}
Exit

~LAlt & MButton::Send, #{Tab}

;--------------------------------------------------------
; マウス
;--------------------------------------------------------

NumLock::
  Menu, Tray, Icon
  Reload
Exit

Pause::
WinGet, id, list
Loop, %id%
{
  StringTrimRight, this_id, id%A_Index%, 0
  WinGetTitle, this_title, ahk_id %this_id%

  if(RegExMatch(this_title, "Google Chrome") > 0)
  {
    WinGet, min_max, MinMax, ahk_id %this_id%
    if (min_max = 0)
    {
      WinClose, ahk_id %this_id%
    }
  }
}
Exit

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

186

187

188

189

190

191

192

193

194

195

196

197

198

199

200

201

202

203

SetMouseDelay, 0

SendMode, InputThenPlay

;--------------------------------------------------------

; Google日本語入力

;--------------------------------------------------------

; "C:\Program Files (x86)\Google\Google Japanese Input\GoogleIMEJaTool.exe" -mode=config_dialog

; sc07b 無変換

; Muhenkan > IMEを無効化

; Shift Muhenkan > IMEを無効化

; sc070 ひらがな

; Hiragana > IMEを有効化

; sc079 変換

; Henkan > エントリー削除

; Shift Henkan > エントリー削除

;--------------------------------------------------------

; 無変換(Space左側)

;--------------------------------------------------------

~sc07b::

If (A_PriorHotkey = A_ThisHotkey && 500 > A_TimeSincePriorHotkey)

{

Send, {sc070}

}

Exit

;--------------------------------------------------------

; 変換(左上2段目)

;--------------------------------------------------------

sc079 & 1::Send, {F12}

sc079 & 2::Send, {F2}

sc079 & q::Send, {Esc}

sc079 & w::Send, {LWin}

sc079 & e::Send, #{e}

sc079 & r::Send, #{r}

;--------------------------------------------------------

; RShift(左上1段目)

;--------------------------------------------------------

>+h::Send, {Left}

>+j::Send, {Down}

>+k::Send, {Up}

>+l::Send, {Right}

>+q::Send, {&}

>+w::Send, {'}

>+e::Send, {``}

>+a::Send, {^}

>+s::Send, {$}

>+d::Send, {~}

>+u::Send, {|}

>+i::Send, {\}

>+o::Send, {@}

>+p::Send, {`%}

>+n::Send, {(}

>+m::Send, {)}

>+4::Send, {Enter}

>+7::Send, {Home}

>+8::Send, {End}

>+Enter::Send, {Tab}

>+Backspace::Send, {Delete}

;--------------------------------------------------------

; LControl

;--------------------------------------------------------

~<^c::

If (A_PriorHotkey = A_ThisHotkey && 500 > A_TimeSincePriorHotkey)

{

Send, {End}

Send, +{Home}

Send, ^{c}

}

Exit

;--------------------------------------------------------

; LAlt

;--------------------------------------------------------

; エクセル以外単独押下無効

LAlt::

If (WinActive("ahk_class XLMAIN"))

{

Send, {LAlt}

}

Exit

<!WheelUp::

If (WinActive("ahk_class illustrator"))

{

Send, !{WheelUp}

}

Else

{

Send, {PgUp}

}

Exit

<!WheelDown::

If (WinActive("ahk_class illustrator"))

{

Send, !{WheelDown}

}

Else

{

Send, {PgDn}

}

Exit

<!1::Send, {Home}

<!2::Send, {End}

<!q::Send, !{Left} ; 戻る

<!w::Send, !{Right} ; 進む

<!e::Send, ^{w} ; 閉じる

<!a::Send, ^{PgUp} ; 前のタブ

<!s::Send, ^{PgDn} ; 次のタブ

<!d::Send, ^+{t} ; 再び開く

<!f::Send, ^{F5} ; 更新

<!v::

If (A_PriorHotkey = A_ThisHotkey && 500 > A_TimeSincePriorHotkey)

{

keyDownCount += 1

If (keyDownCount >= 3)

{

keyDownCount = 0

}

Else

{

keyDownCount = 0

}

WinGet, min_max, MinMax, A

WinGet, this_id, ID, A

If (min_max = 1) ; 最大化

{

SendEvent, #{Down}

WinMove, ahk_id %this_id%, , , , 1100, 750

}

WinGetPos, x, y, w, h, ahk_id %this_id%

If (keyDownCount = 0)

{

MouseMove, w//2, 10

}

Else If (keyDownCount = 1)

{

MouseMove, w-5, h-5

}

Else If (keyDownCount = 2)

{

MouseMove, w-30, 15

}

Exit

~LAlt & MButton::Send, #{Tab}

;--------------------------------------------------------

; マウス

;--------------------------------------------------------

NumLock::

Menu, Tray, Icon

Reload

Exit

Pause::

WinGet, id, list

Loop, %id%

{

StringTrimRight, this_id, id%A_Index%, 0

WinGetTitle, this_title, ahk_id %this_id%

if(RegExMatch(this_title, "Google Chrome") > 0)

{

WinGet, min_max, MinMax, ahk_id %this_id%

if (min_max = 0)

{

WinClose, ahk_id %this_id%

}

Exit

2021-01-142021-01-16

C# PDFiumでPDFを読み込む

業務で利用するPDFを取り込んだらどうだろうと思い実験。とりあえず、ページ移動とブックマークのようなものだけ。

NuGetから、
・PdfiumViewer
・PdfiumViewer.Native.x86.v8-xfa
の２つをインストール。

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

namespace PDFViewer
{
    public partial class Form1 : Form
    {
        PdfDocument _Document;
        int _PageNum = 1;
        int _PageW;
        int _PageH;

        public Form1()
        {
            InitializeComponent();

            _Document = PdfDocument.Load(@"G:\Download\i.pdf");
            var size = _Document.PageSizes[0];
            _PageW = PointToPixel(size.Width);
            _PageH = PointToPixel(size.Height);

            HeaderEventAttach();
            SideEventAttach();

            RenderDocument();

            int maxPage = _Document.PageCount - 1;
            hScrollBar1.Maximum = maxPage + hScrollBar1.LargeChange - 1;
            hScrollBar1.Scroll += (s, e) =>
            {
                _PageNum = e.NewValue;
                RenderDocument();
            };
        }

        private void SideEventAttach()
        {
            MemoText.KeyDown += (s, e) =>
            {
                if (e.KeyCode != Keys.Enter) return;

                var sender = (TextBox)s;
                if (sender.Text == "") return;

                listBox1.ValueMember = "Page";
                listBox1.DisplayMember = "Title";

                listBox1.Items.Add(new {
                    Page = _PageNum.ToString(),
                    Title = sender.Text + "#" + _PageNum.ToString()
                });

                MemoText.Text = "";
            };

            listBox1.MouseDoubleClick += (s, e) =>
            {
                if (listBox1.IndexFromPoint(new Point(e.X, e.Y)) == -1) return;

                if ((ModifierKeys & Keys.Control) == Keys.Control)
                {
                    listBox1.Items.RemoveAt(listBox1.SelectedIndex);
                }
                else
                {
                    dynamic items = listBox1.SelectedItem;
                    int.TryParse(items.Page, out int result);
                    _PageNum = result;

                    RenderDocument();
                }
            };
        }

        private void HeaderEventAttach()
        {
            NextButton.Click += (s, e) =>
            {
                if (_PageNum > _Document.PageCount - 1) return;

                _PageNum++;
                RenderDocument();
                hScrollBar1.Value = _PageNum;
            };

            PrevButton.Click += (s, e) =>
            {
                if (_PageNum <= 0) return;
                
                _PageNum--;
                RenderDocument();
                hScrollBar1.Value = _PageNum;
            };

            PageNumText.KeyDown += (s, e) =>
            {
                if (e.KeyCode == Keys.Enter)
                {
                    var sender = (TextBox)s;
                    int.TryParse(sender.Text, out int result);
                    _PageNum = result;
                    RenderDocument();
                }

                if (e.KeyCode == Keys.Right)
                {
                    NextButton.PerformClick();
                    RenderDocument();
                }

                if (e.KeyCode == Keys.Left)
                {
                    PrevButton.PerformClick();
                    RenderDocument();
                }
            };
        }

        private void RenderDocument()
        {
            pictureBox1.Image = _Document.Render(_PageNum - 1, _PageW, _PageH, DeviceDpi, DeviceDpi, false);
            PageNumText.Text = Convert.ToString(_PageNum);
        }

        private int PointToPixel(float point)
        {
            return (int)(DeviceDpi * point) / 72;
        }
    }
}

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

using PdfiumViewer;

using System;

using System.Drawing;

using System.Windows.Forms;

namespace PDFViewer

{

public partial class Form1 : Form

{

PdfDocument _Document;

int _PageNum = 1;

int _PageW;

int _PageH;

public Form1()

{

InitializeComponent();

_Document = PdfDocument.Load(@"G:\Download\i.pdf");

var size = _Document.PageSizes[0];

_PageW = PointToPixel(size.Width);

_PageH = PointToPixel(size.Height);

HeaderEventAttach();

SideEventAttach();

RenderDocument();

int maxPage = _Document.PageCount - 1;

hScrollBar1.Maximum = maxPage + hScrollBar1.LargeChange - 1;

hScrollBar1.Scroll += (s, e) =>

{

_PageNum = e.NewValue;

RenderDocument();

};

}

private void SideEventAttach()

{

MemoText.KeyDown += (s, e) =>

{

if (e.KeyCode != Keys.Enter) return;

var sender = (TextBox)s;

if (sender.Text == "") return;

listBox1.ValueMember = "Page";

listBox1.DisplayMember = "Title";

listBox1.Items.Add(new {

Page = _PageNum.ToString(),

Title = sender.Text + "#" + _PageNum.ToString()

});

MemoText.Text = "";

};

listBox1.MouseDoubleClick += (s, e) =>

{

if (listBox1.IndexFromPoint(new Point(e.X, e.Y)) == -1) return;

if ((ModifierKeys & Keys.Control) == Keys.Control)

{

listBox1.Items.RemoveAt(listBox1.SelectedIndex);

}

else

{

dynamic items = listBox1.SelectedItem;

int.TryParse(items.Page, out int result);

_PageNum = result;

RenderDocument();

}

};

}

private void HeaderEventAttach()

{

NextButton.Click += (s, e) =>

{

if (_PageNum > _Document.PageCount - 1) return;

_PageNum++;

RenderDocument();

hScrollBar1.Value = _PageNum;

};

PrevButton.Click += (s, e) =>

{

if (_PageNum <= 0) return;

_PageNum--;

RenderDocument();

hScrollBar1.Value = _PageNum;

};

PageNumText.KeyDown += (s, e) =>

{

if (e.KeyCode == Keys.Enter)

{

var sender = (TextBox)s;

int.TryParse(sender.Text, out int result);

_PageNum = result;

RenderDocument();

}

if (e.KeyCode == Keys.Right)

{

NextButton.PerformClick();

RenderDocument();

}

if (e.KeyCode == Keys.Left)

{

PrevButton.PerformClick();

RenderDocument();

}

};

}

private void RenderDocument()

{

pictureBox1.Image = _Document.Render(_PageNum - 1, _PageW, _PageH, DeviceDpi, DeviceDpi, false);

PageNumText.Text = Convert.ToString(_PageNum);

}

private int PointToPixel(float point)

{

return (int)(DeviceDpi * point) / 72;

}

2021-01-132022-04-04

簿記原価計算ざっくり復習

●原価計算の種類

「個別」と「総合」
「実際」と「標準」
「全部」と「直接」
の8通りの組み合わせがある。

●勘定科目の振り替え①

・材料購入
材料 200 | 買掛金 200
(材料：資産勘定)

・工程投入
仕掛品 100 | 材料 100
(仕掛品：資産勘定)

・完成
製品 100 | 仕掛品 100
(製品：資産勘定)

・販売
売上原価 100 | 製品 100
売掛金 120 | 売上 120
(売上原価：費用勘定)

販売したら売上原価という費用になる。
120 – 100 = 20という計算。

このように振り替えられていくのが基本。

●勘定科目の振り替え②

間接費がある場合。

・材料購入
材料 100 | 買掛金 100
(材料：資産勘定)

・工程投入
仕掛品 50 | 材料 100
製造間接費 50
(仕掛品：資産勘定)
(製造間接費：資産勘定)

・締め

製造間接費は最終的に仕掛品になるが、
この製造間接費→仕掛品のとき製品ごとに配賦する。

仕掛品 50 | 製造間接費 50

●材料費

・構成

月初材料在庫
購入分
↓
仕掛品(直接商品分)
製造間接費(間接消費分)
月末材料在庫

●労務費

直接工でも間接的な作業をしている分は間接労務費となる。

・賃率

直接工の賃金は直接労務費と間接労務費に分ける必要があるため、賃率を算出する必要がある。

直接工の支払賃金(原価対象賃金) ÷ 作業時間

●総合原価計算

ある期間の製造原価を数量で割るという考え方。
直接材料とそれ以外に分ける。

●標準総合原価計算

標準原価＝原価標準×生産量
(原価標準＝目標とする１単位あたりの原価)

＊＊＊

中小企業での実際

当期、期首、期末という表現にしているが、だいたい月単位で実施する。

●在庫(棚卸)の評価

大まかに対象は製品、仕掛品、材料となり、
それぞれ、ある程度合理的な評価を継続する必要がある。

材料は取得原価。(最終仕入原価法)
製品・仕掛品は売価還元法。
棚卸しない材料、また労務費、経費は当期費用。
(売価還元法との整合性については法人税法基本通達2-2-9)

・売価還元法(法人税基本通達5-2-4)

製品・仕掛品は仕入がないので売価還元となる。

原価率算出
・原価率 = A / B (原価/売価)
A = 期中仕入 + 期首在庫(原価)
B = 期中売上 + 期末在庫(売価)
※考え方が分かりづらいが、期首にあった在庫は期中に仕入れたと考え、期末に残った在庫は期中に売り上げたと考えてしまうイメージ。そうすることで当期に在庫が残らず全て売れた場合の原価率となる。

●個別原価、見積原価

多くの中小企業は多品種少量生産なので、気になる製品だけ個別原価を出している企業も多い。

一番簡単な計算方法は、
・材料費として利用した量。
・労務費として時間＊賃率。
・経費として原価＊経費率をかける。
この経費の部分に間接費＋販管費が含まれると考える。

●期間原価

当期仕入をすべて費用計上し、当期売上と比較しながらキャッシュフローを把握する。受注生産でストック在庫がないなら、運転資金に注意しつつ、これだけでも役に立つ(むしろこれしか実施していない企業も多い)

●賃率

売価還元法では製造原価のために賃率は必要ないが、上記個別原価や見積もりなどで利用されることが多い。

1.販管費とする間接部門と直接部門を分ける。(直接工や間接工は分けない)
2.直接部門の人件費(賃金、賞与等)を直接部門の総労働時間で割って賃率を算出する。

2021-01-102021-01-11

C# クラス生成＋リスト追加の高速化

・class → structへ変換
・AsParallel() / Linqの利用
・Capacity / Listの利用
・foreach() → AsParallel().ForAll()へ変換
・foreach() → Parallel.ForEach()へ変換
・List<ClassItem> → ConcurrentBag<ClassItem>へ変換
で実験。

                List<string> tmpList = new List<string>(RawItems);
                tmpList.Capacity = RawItemCount;

                foreach (string tmpString in needle.Split('|'))
                {
                    tmpList = tmpList.AsParallel().Where(x => x.ToLower().Contains(tmpString.ToLower())).ToList();
                }
                items = tmpList.Take(VisibleCount);

List<string> tmpList = new List<string>(RawItems);

tmpList.Capacity = RawItemCount;

foreach (string tmpString in needle.Split('|'))

{

tmpList = tmpList.AsParallel().Where(x => x.ToLower().Contains(tmpString.ToLower())).ToList();

}

items = tmpList.Take(VisibleCount);

            List<ItemClass> itemClassList = new List<ItemClass>(RawItemCount);

            foreach (var item in items)
            {
                itemClassList.Add(new ItemClass()
                {
                    DisplayItemPath = Path.GetFileName(item) + "  . . .  ■" + Path.GetDirectoryName(item),
                    ItemPath = item
                });
            }

            //var obj = new object();
            //items.AsParallel().ForAll(item => {
            //    lock (obj)
            //    {
            //        itemClassList.Add(new ItemClass()
            //        {
            //            DisplayItemPath = Path.GetFileName(item) + "  . . .  ■" + Path.GetDirectoryName(item),
            //            ItemPath = item
            //        });
            //    }
            //});

            //var obj = new object();
            //System.Threading.Tasks.Parallel.ForEach(items, item =>
            //{
            //    lock (obj)
            //    {
            //        itemClassList.Add(new ItemClass()
            //        {
            //            DisplayItemPath = Path.GetFileName(item) + "  . . .  ■" + Path.GetDirectoryName(item),
            //            ItemPath = item
            //        });
            //    }
            //});

List<ItemClass> itemClassList = new List<ItemClass>(RawItemCount);

foreach (var item in items)

{

itemClassList.Add(new ItemClass()

{

DisplayItemPath = Path.GetFileName(item) + " . . . ■" + Path.GetDirectoryName(item),

ItemPath = item

});

}

//var obj = new object();

//items.AsParallel().ForAll(item => {

// lock (obj)

// {

// itemClassList.Add(new ItemClass()

// {

// DisplayItemPath = Path.GetFileName(item) + " . . . ■" + Path.GetDirectoryName(item),

// ItemPath = item

// });

// }

//});

//var obj = new object();

//System.Threading.Tasks.Parallel.ForEach(items, item =>

//{

// lock (obj)

// {

// itemClassList.Add(new ItemClass()

// {

// DisplayItemPath = Path.GetFileName(item) + " . . . ■" + Path.GetDirectoryName(item),

// ItemPath = item

// });

// }

//});

            var itemClassList = new System.Collections.Concurrent.ConcurrentBag<ItemClass>();

            var obj = new object();
            System.Threading.Tasks.Parallel.ForEach(items, item =>
            {
                itemClassList.Add(new ItemClass()
                {
                    DisplayItemPath = Path.GetFileName(item) + " . . . ■" + Path.GetDirectoryName(item),
                    ItemPath = item
                });

            });

var itemClassList = new System.Collections.Concurrent.ConcurrentBag<ItemClass>();

var obj = new object();

System.Threading.Tasks.Parallel.ForEach(items, item =>

{

itemClassList.Add(new ItemClass()

{

DisplayItemPath = Path.GetFileName(item) + " . . . ■" + Path.GetDirectoryName(item),

ItemPath = item

});

2021-01-09

C# Task/CancellationTokenでキャンセル

using System.Threading.Tasks;
using System.Windows.Forms;

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

            var f = new TestForm();
            f.Show();

            // Form1からTestFormを起動し5秒後にTestFormのTextを設定する。
            // 当然、Text設定前にTestFormを閉じれば、Invokeで例外が発生する。
            // CancellationTokenでキャンセルする。
        }
    }

    class TestForm :Form
    {
        public TestForm()
        {
            var source = new System.Threading.CancellationTokenSource();
            var token = source.Token;

            this.FormClosing += (s, e) => {
                source.Cancel();
                source.Dispose();
            };

            Task.Run(() =>
            {
                System.Threading.Thread.Sleep(5000);
                if(!token.IsCancellationRequested) this.Invoke((MethodInvoker)(() => { this.Text = "Hello"; }));

            }, token);
        }
    }
}

using System.Threading.Tasks;

using System.Windows.Forms;

namespace WindowsFormsApp1

{

public partial class Form1 : Form

{

public Form1()

{

InitializeComponent();

var f = new TestForm();

f.Show();

// Form1からTestFormを起動し5秒後にTestFormのTextを設定する。

// 当然、Text設定前にTestFormを閉じれば、Invokeで例外が発生する。

// CancellationTokenでキャンセルする。

}

class TestForm :Form

{

public TestForm()

{

var source = new System.Threading.CancellationTokenSource();

var token = source.Token;

this.FormClosing += (s, e) => {

source.Cancel();

source.Dispose();

};

Task.Run(() =>

{

System.Threading.Thread.Sleep(5000);

if(!token.IsCancellationRequested) this.Invoke((MethodInvoker)(() => { this.Text = "Hello"; }));

}, token);

}

2021-01-082021-12-19

Windows タスクスケジューラ

ファイル名を指定して実行
taskschd.msc
からも登録できる。

・バッチから登録する場合

schtasks /create
で登録できる。

・オプション

/ru：実行ユーザーアカウント
ユーザーがログオンしているかどうかにかかわらず実行
にしたい場合
system
とするが、その場合、対話はできないので注意。また、
administrators
のようにグループでも指定もできる。administratorsの場合は、
ユーザーがログオンしているときの実行する
になる。

/tn：タイトル
/tr：実行ファイルパス
/sc：スケジュール

MINUTE：毎分
HOURLY：毎時間
DAILY：毎日
WEEKLY：毎週
MONTHLY：毎月
ONCE：１回
ONSTART：システム起動時
ONLOGON：ログオン時
ONIDLE：アイドル状態時

MINUTE：毎分

HOURLY：毎時間

DAILY：毎日

WEEKLY：毎週

MONTHLY：毎月

ONCE：１回

ONSTART：システム起動時

ONLOGON：ログオン時

ONIDLE：アイドル状態時

/mo：スケジュール修飾

MINUTE：1～1439(分)
HOURLY：1～23(時)
DAILY：1～365(日)
WEEKLY：1～52(週)

MINUTE：1～1439(分)

HOURLY：1～23(時)

DAILY：1～365(日)

WEEKLY：1～52(週)

/st：開始時刻(24時間形式)
/rl：実行レベル

・サンプル

schtasks /create /tn “title” /tr “exepath” /sc daily /st 12:00 /rl highest
毎日12時に実行+管理者権限で実行

schtasks /create /tn “title” /tr “exepath” /sc hourly /mo 6 /st 06:00 /rl highest
今日の6時から開始し以後6時間ごとに実行+管理者権限で実行

schtasks /create /ru system /tn “title” /tr “exepath” /sc onlogon /rl highest
ログオン時に実行+管理者権限で実行+ログオンに関わらず

・削除
schtasks /delete /tn “title”

・無効
schtasks /change /tn “title” /disable

不要なタスク停止

Officeに関わるものを停止するとOfficeが立ち上がらないことがある。

@echo off

rem システム評価ツール
SchTasks /change /disable /tn "\Microsoft\Windows\Maintenance\WinSAT"

rem カスタマーエクスペリエンスプログラム
SchTasks /change /disable /tn "\Microsoft\Windows\Application Experience\Microsoft Compatibility Appraiser"
SchTasks /change /disable /tn "\Microsoft\Windows\Application Experience\ProgramDataUpdater"
schtasks /change /disable /tn "\Microsoft\Windows\Application Experience\StartupAppTask"
SchTasks /change /disable /tn "\Microsoft\Windows\Customer Experience Improvement Program\Consolidator"
SchTasks /change /disable /tn "\Microsoft\Windows\Customer Experience Improvement Program\UsbCeip"
SchTasks /change /disable /tn "\Microsoft\Windows\CloudExperienceHost\CreateObjectTask"
SchTasks /change /disable /tn "\Microsoft\Windows\Autochk\Proxy"

rem 大量エネルギー消費の調査
SchTasks /change /disable /tn "\Microsoft\Windows\Power Efficiency Diagnostics\AnalyzeSystem"

rem Xbox
SchTasks /change /disable /tn "\Microsoft\XblGameSave\XblGameSaveTask"

rem ディスク診断
SchTasks /change /disable /tn "\Microsoft\Windows\DiskDiagnostic\Microsoft-Windows-DiskDiagnosticResolver"
SchTasks /change /disable /tn "\Microsoft\Windows\DiskDiagnostic\Microsoft-Windows-DiskDiagnosticDataCollector"

rem エラー報告
schtasks /change /Disable /TN "\Microsoft\Windows\Windows Error Reporting\QueueReporting"

rem 位置情報
rem schtasks /change /Disable /TN "\Microsoft\Windows\Location\Location"
rem schtasks /change /Disable /TN "\Microsoft\Windows\Location\WindowsActionDialog"

rem 地図情報
schtasks /change /Disable /TN "\Microsoft\Windows\Maps\MapsToastTask"
schtasks /change /Disable /TN "\Microsoft\Windows\Maps\MapsUpdateTask"

pause

@echo off

rem システム評価ツール

SchTasks /change /disable /tn "\Microsoft\Windows\Maintenance\WinSAT"

rem カスタマーエクスペリエンスプログラム

SchTasks /change /disable /tn "\Microsoft\Windows\Application Experience\Microsoft Compatibility Appraiser"

SchTasks /change /disable /tn "\Microsoft\Windows\Application Experience\ProgramDataUpdater"

schtasks /change /disable /tn "\Microsoft\Windows\Application Experience\StartupAppTask"

SchTasks /change /disable /tn "\Microsoft\Windows\Customer Experience Improvement Program\Consolidator"

SchTasks /change /disable /tn "\Microsoft\Windows\Customer Experience Improvement Program\UsbCeip"

SchTasks /change /disable /tn "\Microsoft\Windows\CloudExperienceHost\CreateObjectTask"

SchTasks /change /disable /tn "\Microsoft\Windows\Autochk\Proxy"

rem 大量エネルギー消費の調査

SchTasks /change /disable /tn "\Microsoft\Windows\Power Efficiency Diagnostics\AnalyzeSystem"

rem Xbox

SchTasks /change /disable /tn "\Microsoft\XblGameSave\XblGameSaveTask"

rem ディスク診断

SchTasks /change /disable /tn "\Microsoft\Windows\DiskDiagnostic\Microsoft-Windows-DiskDiagnosticResolver"

SchTasks /change /disable /tn "\Microsoft\Windows\DiskDiagnostic\Microsoft-Windows-DiskDiagnosticDataCollector"

rem エラー報告

schtasks /change /Disable /TN "\Microsoft\Windows\Windows Error Reporting\QueueReporting"

rem 位置情報

rem schtasks /change /Disable /TN "\Microsoft\Windows\Location\Location"

rem schtasks /change /Disable /TN "\Microsoft\Windows\Location\WindowsActionDialog"

rem 地図情報

schtasks /change /Disable /TN "\Microsoft\Windows\Maps\MapsToastTask"

schtasks /change /Disable /TN "\Microsoft\Windows\Maps\MapsUpdateTask"

pause

2021-01-072021-01-07

C# TabPageの複写

TabPageを動的に追加する場合、細かい設定は面倒なので、デザイナーで作っておいて複写したい。

TabPage、中に入れるControlどちらも、インスタンスに対して必要なプロパティを直接指定(nPage.Text = oPage.Textのように)した方が楽だけど、今回は自動で渡してみた。

    public partial class CustomerDescription : Form
    {
        public CustomerDescription()
        {
            InitializeComponent();

            tabControl1.TabPages.Add(TabPageClone(tabPage1, "hello"));
            tabControl1.TabPages.Add(TabPageClone(tabPage1, "world"));
            tabControl1.TabPages.Remove(tabPage1);
        }

        private TabPage TabPageClone(TabPage oPage, string pageCaption)
        {
            TabPage nPage = new TabPage();
            nPage.Text = pageCaption;

            foreach (var pi in typeof(TabPage).GetProperties())
            {
                var propInfo = typeof(TabPage).GetProperty(pi.Name, BindingFlags.Instance | BindingFlags.Public | BindingFlags.NonPublic);

                if (propInfo != null && propInfo.PropertyType.IsValueType && propInfo.CanWrite && propInfo.CanRead)
                {
                    propInfo.SetValue(nPage, propInfo.GetValue(oPage));
                }
            }

            foreach (Control oCtrl in oPage.Controls)
            {
                Control nCtrl = (Control)Activator.CreateInstance(oCtrl.GetType());
                //Control nCtrl = (Control)oCtrl.GetType().GetConstructor(Type.EmptyTypes).Invoke(null);

                foreach (var pi in oCtrl.GetType().GetProperties())
                {
                    var propInfo = oCtrl.GetType().GetProperty(pi.Name, BindingFlags.Instance | BindingFlags.Public | BindingFlags.NonPublic);
                    //var propInfo = oCtrl.GetType().GetProperty(pi.Name).GetAccessors().First().GetBaseDefinition().DeclaringType.GetProperty(pi.Name);
                    
                    if (propInfo != null && propInfo.PropertyType.IsValueType && propInfo.CanWrite && propInfo.CanRead) propInfo.SetValue(nCtrl, propInfo.GetValue(oCtrl));
                }
                nPage.Controls.Add(nCtrl);
                nCtrl.Visible = true;

            }
            return nPage;
        }
    }

public partial class CustomerDescription : Form

{

public CustomerDescription()

{

InitializeComponent();

tabControl1.TabPages.Add(TabPageClone(tabPage1, "hello"));

tabControl1.TabPages.Add(TabPageClone(tabPage1, "world"));

tabControl1.TabPages.Remove(tabPage1);

}

private TabPage TabPageClone(TabPage oPage, string pageCaption)

{

TabPage nPage = new TabPage();

nPage.Text = pageCaption;

foreach (var pi in typeof(TabPage).GetProperties())

{

var propInfo = typeof(TabPage).GetProperty(pi.Name, BindingFlags.Instance | BindingFlags.Public | BindingFlags.NonPublic);

if (propInfo != null && propInfo.PropertyType.IsValueType && propInfo.CanWrite && propInfo.CanRead)

{

propInfo.SetValue(nPage, propInfo.GetValue(oPage));

}

foreach (Control oCtrl in oPage.Controls)

{

Control nCtrl = (Control)Activator.CreateInstance(oCtrl.GetType());

//Control nCtrl = (Control)oCtrl.GetType().GetConstructor(Type.EmptyTypes).Invoke(null);

foreach (var pi in oCtrl.GetType().GetProperties())

{

var propInfo = oCtrl.GetType().GetProperty(pi.Name, BindingFlags.Instance | BindingFlags.Public | BindingFlags.NonPublic);

//var propInfo = oCtrl.GetType().GetProperty(pi.Name).GetAccessors().First().GetBaseDefinition().DeclaringType.GetProperty(pi.Name);

if (propInfo != null && propInfo.PropertyType.IsValueType && propInfo.CanWrite && propInfo.CanRead) propInfo.SetValue(nCtrl, propInfo.GetValue(oCtrl));

}

nPage.Controls.Add(nCtrl);

nCtrl.Visible = true;

}

return nPage;

}

2021-01-062022-05-09

C# ファイル検索(インクリメンタルサーチ)

C# ファイル検索+指定秒数でサムネイル作成(FFmpeg)

以前からときどきfenrir(B@r09u3 Style Op.2)というフリーソフトを利用していたが、更新が止まっているようなので、自分用に同じようなソフトを作成した。もともとファイル検索だけできればいいので、機能も見た目も限定的。

using System;
using System.Collections.Generic;
using System.IO;
using System.Linq;
using System.Windows.Forms;

namespace CreateIndex
{
    class Program
    {
        static void Main(string[] args)
        {
            Console.WriteLine("インデックス作成中 ... ");

            string scanPath =  Application.StartupPath + @"\scan.txt";
            List<string> rawItems = new List<string>();

            foreach (string path in File.ReadAllLines(scanPath))
            {
                if (!Directory.Exists(path)) continue;

                var ln = Directory.EnumerateFiles(path, "*.*", SearchOption.AllDirectories).ToList();
                rawItems.AddRange(ln);
            }

            File.WriteAllLines(Application.StartupPath + @"\index.dat", rawItems);
        }
    }
}

using System;

using System.Collections.Generic;

using System.IO;

using System.Linq;

using System.Windows.Forms;

namespace CreateIndex

{

class Program

{

static void Main(string[] args)

{

Console.WriteLine("インデックス作成中 ... ");

string scanPath = Application.StartupPath + @"\scan.txt";

List<string> rawItems = new List<string>();

foreach (string path in File.ReadAllLines(scanPath))

{

if (!Directory.Exists(path)) continue;

var ln = Directory.EnumerateFiles(path, "*.*", SearchOption.AllDirectories).ToList();

rawItems.AddRange(ln);

}

File.WriteAllLines(Application.StartupPath + @"\index.dat", rawItems);

}

using System;
using System.Collections.Generic;
using System.Data;
using System.IO;
using System.Linq;
using System.Windows.Forms;
using System.Xml.Serialization;
using System.Text;

namespace FileSearch
{
    public partial class Form1 : Form
    {
        string RemoteIndexPath = Application.StartupPath + @"\remote_index_path.txt";
        string IndexPath = Application.StartupPath + @"\index.dat";

        List<string> RawItems = new List<string>();

        int VisibleCount = 100;
        int RawItemCount = 0;
        string WriteTime = "";
 
        public Form1()
        {
            InitializeComponent();

            if (!IndexLoad()) return;

            LoadPosition();

            var delayExecute = new DelayExecute();
            delayExecute.Execute += (s, e) => SetupDatasource();
            textBox1.TextChanged += (s, e) => delayExecute.ReserveExecute();

            listBox1.MouseDoubleClick += (s, e) => OpenFile(s, e);

            this.FormClosing += (s, e) => SavePosition();
        }

        private bool IndexLoad()
        {
            
            if (!File.Exists(RemoteIndexPath)) // リモートインデックスを指定するファイルがない場合
            {
                MessageBox.Show("インデックスファイルが見つかりませんでした。"); 
                return false;
            }
            
            string remoteIndexPath = File.ReadAllText(RemoteIndexPath);

            if (!File.Exists(IndexPath) && !File.Exists(remoteIndexPath)) // ローカル、リモートにない場合
            {
                MessageBox.Show("インデックスファイルが見つかりませんでした。");
                return false;
            }
            else if (File.Exists(IndexPath) && !File.Exists(remoteIndexPath)) // ローカルにあって、リモートにない場合
            {
                RawItems = File.ReadAllLines(IndexPath).ToList();
                RawItemCount = RawItems.Count();
                WriteTime = File.GetLastWriteTime(IndexPath).ToString("yyyy/MM/dd HH:mm:ss");
            }
            else if (!File.Exists(IndexPath) && File.Exists(remoteIndexPath)) // ローカルになくて、リモートにある場合
            {
                File.Copy(remoteIndexPath, IndexPath);
                RawItems = File.ReadAllLines(IndexPath).ToList();
                RawItemCount = RawItems.Count();
                WriteTime = File.GetLastWriteTime(IndexPath).ToString("yyyy/MM/dd HH:mm:ss");
            }
            else if (File.Exists(IndexPath) && File.Exists(remoteIndexPath)) // ローカル、リモートにある場合
            {
                if (File.GetLastWriteTime(IndexPath) < File.GetLastWriteTime(remoteIndexPath)) // リモートの方が最新の場合
                { 
                    if (DialogResult.Yes == MessageBox.Show("最新のインデックスファイルが存在します。更新しますか？","", MessageBoxButtons.YesNo))
                    {
                        File.Copy(remoteIndexPath, IndexPath, true);
                    }
                    RawItems = File.ReadAllLines(IndexPath).ToList();
                    RawItemCount = RawItems.Count();
                    WriteTime = File.GetLastWriteTime(IndexPath).ToString("yyyy/MM/dd HH:mm:ss");
                }
                else // ローカルの方が最新の場合
                {
                    RawItems = File.ReadAllLines(IndexPath).ToList();
                    RawItemCount = RawItems.Count();
                    WriteTime = File.GetLastWriteTime(IndexPath).ToString("yyyy/MM/dd HH:mm:ss");
                }
            }
            return true;
        }

        private void SetupDatasource()
        {
            System.Diagnostics.Stopwatch stopwatch = new System.Diagnostics.Stopwatch();
            stopwatch.Start();

            string needle = "";

            Invoke((MethodInvoker)(() => {
                needle = textBox1.Text;
            }));

            IEnumerable<string> items = new List<string>(VisibleCount);
            
            if (needle == "")
            {
                items = RawItems.Take(VisibleCount);
            }
            else
            {
                List<string> tmpList = new List<string>(RawItems);
                tmpList.Capacity = RawItemCount;

                foreach (string tmpString in needle.Split('|'))
                {
                    tmpList = tmpList.AsParallel().Where(x => x.ToLower().Contains(tmpString.ToLower())).ToList();
                }
                items = tmpList.Take(VisibleCount);
            }

            var itemClassList = new System.Collections.Concurrent.ConcurrentBag<ItemClass>();

            System.Threading.Tasks.Parallel.ForEach(items, item =>
            {
                itemClassList.Add(new ItemClass()
                {
                    DisplayItemPath = Path.GetFileName(item) + " . . . ■" + Path.GetDirectoryName(item),
                    ItemPath = item
                });
            });

            stopwatch.Stop();

            Invoke((MethodInvoker)(() => {
                listBox1.DataSource = itemClassList.ToList();
                listBox1.DisplayMember = "DisplayItemPath";
                Text = items.Count() + "/" + RawItemCount + "件表示 (" + stopwatch.ElapsedMilliseconds.ToString() + "ms)：" + WriteTime + "インデックス";
            }));
        }

        private void OpenFile(object sender, MouseEventArgs e)
        {
            var itemPath = ((ItemClass)listBox1.SelectedItem).ItemPath;

            if (!File.Exists(itemPath))
            {
                MessageBox.Show("ファイルを開くことができませんでした。");
                return;
            } 

            if (ModifierKeys == Keys.Control)
            {
                System.Diagnostics.Process.Start(Path.GetDirectoryName(itemPath));
            }
            else
            {
                System.Diagnostics.Process.Start(itemPath);
            }
        }
        private void LoadPosition()
        {
            if (!File.Exists(Application.StartupPath + @"\dat.xml")) return;

            this.StartPosition = FormStartPosition.Manual;

            XmlSerializer xs = new XmlSerializer(typeof(List<int>));
            using (StreamReader sr = new StreamReader(Application.StartupPath + @"\dat.xml", Encoding.UTF8))
            {
                try
                {
                    List<int> items = (List<int>)xs.Deserialize(sr);

                    this.Width = (int)items[0];
                    this.Height = (int)items[1];
                    this.Top = (int)items[2];
                    this.Left = (int)items[3];
                }
                catch
                {
                    this.StartPosition = FormStartPosition.WindowsDefaultLocation;
                }
            }
        }

        private void SavePosition()
        {
            if (this.WindowState == FormWindowState.Maximized) return;

            XmlSerializer xs = new XmlSerializer(typeof(List<int>));
            using (StreamWriter sw = new StreamWriter(Application.StartupPath + @"\dat.xml", false, Encoding.UTF8))
            {
                List<int> items = new List<int>();

                items.Add(this.Width);
                items.Add(this.Height);
                items.Add(this.Top);
                items.Add(this.Left);

                xs.Serialize(sw, items);
            }
        }
    }

    struct ItemClass
    {
        public string DisplayItemPath { set; get; }
        public string ItemPath { set; get; }
    }

    class DelayExecute
    {
        public event EventHandler Execute;
        private int DelayTime = 500;

        System.Threading.Timer Timer;

        public DelayExecute()
        {
            Timer = new System.Threading.Timer(x => {
                Execute(this, EventArgs.Empty);
            });
        }

        public void ReserveExecute()
        {
            Timer.Change(DelayTime, System.Threading.Timeout.Infinite);
        }
    }
}

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

186

187

188

189

190

191

192

193

194

195

196

197

198

199

200

201

202

203

204

205

206

207

208

209

210

211

212

213

214

215

216

217

218

219

220

221

222

223

224

225

226

227

228

using System;

using System.Collections.Generic;

using System.Data;

using System.IO;

using System.Linq;

using System.Windows.Forms;

using System.Xml.Serialization;

using System.Text;

namespace FileSearch

{

public partial class Form1 : Form

{

string RemoteIndexPath = Application.StartupPath + @"\remote_index_path.txt";

string IndexPath = Application.StartupPath + @"\index.dat";

List<string> RawItems = new List<string>();

int VisibleCount = 100;

int RawItemCount = 0;

string WriteTime = "";

public Form1()

{

InitializeComponent();

if (!IndexLoad()) return;

LoadPosition();

var delayExecute = new DelayExecute();

delayExecute.Execute += (s, e) => SetupDatasource();

textBox1.TextChanged += (s, e) => delayExecute.ReserveExecute();

listBox1.MouseDoubleClick += (s, e) => OpenFile(s, e);

this.FormClosing += (s, e) => SavePosition();

}

private bool IndexLoad()

{

if (!File.Exists(RemoteIndexPath)) // リモートインデックスを指定するファイルがない場合

{

MessageBox.Show("インデックスファイルが見つかりませんでした。");

return false;

}

string remoteIndexPath = File.ReadAllText(RemoteIndexPath);

if (!File.Exists(IndexPath) && !File.Exists(remoteIndexPath)) // ローカル、リモートにない場合

{

MessageBox.Show("インデックスファイルが見つかりませんでした。");

return false;

}

else if (File.Exists(IndexPath) && !File.Exists(remoteIndexPath)) // ローカルにあって、リモートにない場合

{

RawItems = File.ReadAllLines(IndexPath).ToList();

RawItemCount = RawItems.Count();

WriteTime = File.GetLastWriteTime(IndexPath).ToString("yyyy/MM/dd HH:mm:ss");

}

else if (!File.Exists(IndexPath) && File.Exists(remoteIndexPath)) // ローカルになくて、リモートにある場合

{

File.Copy(remoteIndexPath, IndexPath);

RawItems = File.ReadAllLines(IndexPath).ToList();

RawItemCount = RawItems.Count();

WriteTime = File.GetLastWriteTime(IndexPath).ToString("yyyy/MM/dd HH:mm:ss");

}

else if (File.Exists(IndexPath) && File.Exists(remoteIndexPath)) // ローカル、リモートにある場合

{

if (File.GetLastWriteTime(IndexPath) < File.GetLastWriteTime(remoteIndexPath)) // リモートの方が最新の場合

{

if (DialogResult.Yes == MessageBox.Show("最新のインデックスファイルが存在します。更新しますか？","", MessageBoxButtons.YesNo))

{

File.Copy(remoteIndexPath, IndexPath, true);

}

RawItems = File.ReadAllLines(IndexPath).ToList();

RawItemCount = RawItems.Count();

WriteTime = File.GetLastWriteTime(IndexPath).ToString("yyyy/MM/dd HH:mm:ss");

}

else // ローカルの方が最新の場合

{

RawItems = File.ReadAllLines(IndexPath).ToList();

RawItemCount = RawItems.Count();

WriteTime = File.GetLastWriteTime(IndexPath).ToString("yyyy/MM/dd HH:mm:ss");

}

return true;

}

private void SetupDatasource()

{

System.Diagnostics.Stopwatch stopwatch = new System.Diagnostics.Stopwatch();

stopwatch.Start();

string needle = "";

Invoke((MethodInvoker)(() => {

needle = textBox1.Text;

}));

IEnumerable<string> items = new List<string>(VisibleCount);

if (needle == "")

{

items = RawItems.Take(VisibleCount);

}

else

{

List<string> tmpList = new List<string>(RawItems);

tmpList.Capacity = RawItemCount;

foreach (string tmpString in needle.Split('|'))

{

tmpList = tmpList.AsParallel().Where(x => x.ToLower().Contains(tmpString.ToLower())).ToList();

}

items = tmpList.Take(VisibleCount);

}

var itemClassList = new System.Collections.Concurrent.ConcurrentBag<ItemClass>();

System.Threading.Tasks.Parallel.ForEach(items, item =>

{

itemClassList.Add(new ItemClass()

{

DisplayItemPath = Path.GetFileName(item) + " . . . ■" + Path.GetDirectoryName(item),

ItemPath = item

});

stopwatch.Stop();

Invoke((MethodInvoker)(() => {

listBox1.DataSource = itemClassList.ToList();

listBox1.DisplayMember = "DisplayItemPath";

Text = items.Count() + "/" + RawItemCount + "件表示 (" + stopwatch.ElapsedMilliseconds.ToString() + "ms)：" + WriteTime + "インデックス";

}));

}

private void OpenFile(object sender, MouseEventArgs e)

{

var itemPath = ((ItemClass)listBox1.SelectedItem).ItemPath;

if (!File.Exists(itemPath))

{

MessageBox.Show("ファイルを開くことができませんでした。");

return;

}

if (ModifierKeys == Keys.Control)

{

System.Diagnostics.Process.Start(Path.GetDirectoryName(itemPath));

}

else

{

System.Diagnostics.Process.Start(itemPath);

}

private void LoadPosition()

{

if (!File.Exists(Application.StartupPath + @"\dat.xml")) return;

this.StartPosition = FormStartPosition.Manual;

XmlSerializer xs = new XmlSerializer(typeof(List<int>));

using (StreamReader sr = new StreamReader(Application.StartupPath + @"\dat.xml", Encoding.UTF8))

{

try

{

List<int> items = (List<int>)xs.Deserialize(sr);

this.Width = (int)items[0];

this.Height = (int)items[1];

this.Top = (int)items[2];

this.Left = (int)items[3];

}

catch

{

this.StartPosition = FormStartPosition.WindowsDefaultLocation;

}

private void SavePosition()

{

if (this.WindowState == FormWindowState.Maximized) return;

XmlSerializer xs = new XmlSerializer(typeof(List<int>));

using (StreamWriter sw = new StreamWriter(Application.StartupPath + @"\dat.xml", false, Encoding.UTF8))

{

List<int> items = new List<int>();

items.Add(this.Width);

items.Add(this.Height);

items.Add(this.Top);

items.Add(this.Left);

xs.Serialize(sw, items);

}

struct ItemClass

{

public string DisplayItemPath { set; get; }

public string ItemPath { set; get; }

}

class DelayExecute

{

public event EventHandler Execute;

private int DelayTime = 500;

System.Threading.Timer Timer;

public DelayExecute()

{

Timer = new System.Threading.Timer(x => {

Execute(this, EventArgs.Empty);

});

}

public void ReserveExecute()

{

Timer.Change(DelayTime, System.Threading.Timeout.Infinite);

}

2021-01-04

C# Timer遅延処理

インクリメンタルサーチ系を作るとき、だいたいTextChangedにそのまま処理をくっつけてしまうのだけど、量が多いとカクついてしまうので、TextChangedが連続していた場合Timerで遅延処理をつけたほうがいい。

using System;
using System.Windows.Forms;

namespace WindowsFormsApp2
{
    public partial class Form1 : Form
    {
        public Form1()
        {
            InitializeComponent();
            this.Text = "0";

            var delayExecute = new DelayExecute2();
            delayExecute.Execute += (s, e) => CutTree();

            textBox1.TextChanged += (s, e) =>
            {
                delayExecute.ReserveExecute();
            };

            button1.Click += (s, e) =>
            {
                this.Text = "0";
                textBox1.Text = "";
            };
        }

        private void CutTree()
        {
            int i = Convert.ToInt32(this.Text);
            Invoke(new Action(() => {
                this.Text = (i + 1).ToString();
            }));
        }
    }

    /* Timer

    System.Windows.Forms.Timer：WindowsForm向け。同一スレッド
    System.Threading.Timer：軽量、別スレッド
    System.Timers.Timer：高精度、別スレッド

    */

    class DelayExecute
    {
        public event EventHandler Execute;
        public int DelayTime = 500;

        System.Threading.Timer Timer;

        public DelayExecute()
        {
            Timer = new System.Threading.Timer(x => {
                Execute(this, EventArgs.Empty);
            });
        }
        public void ReserveExecute()
        {
            Timer.Change(DelayTime, System.Threading.Timeout.Infinite);
            //Change(遅延時間,間隔)Timeout.Infiniteで無効化
        }
    }

    class DelayExecute2
    {
        public event EventHandler Execute;

        System.Timers.Timer Timer;

        public DelayExecute2()
        {
            Timer = new System.Timers.Timer();
            Timer.AutoReset = false;
            Timer.Elapsed += (s, e) => Execute(this, EventArgs.Empty); // Interval後にElapsedの初回起動
            Timer.Interval = 500;
        }
        public void ReserveExecute()
        {
            Timer.Start();
            Timer.Interval = 500;
        }
    }
}

using System;

using System.Windows.Forms;

namespace WindowsFormsApp2

{

public partial class Form1 : Form

{

public Form1()

{

InitializeComponent();

this.Text = "0";

var delayExecute = new DelayExecute2();

delayExecute.Execute += (s, e) => CutTree();

textBox1.TextChanged += (s, e) =>

{

delayExecute.ReserveExecute();

};

button1.Click += (s, e) =>

{

this.Text = "0";

textBox1.Text = "";

};

}

private void CutTree()

{

int i = Convert.ToInt32(this.Text);

Invoke(new Action(() => {

this.Text = (i + 1).ToString();

}));

}

/* Timer

System.Windows.Forms.Timer：WindowsForm向け。同一スレッド

System.Threading.Timer：軽量、別スレッド

System.Timers.Timer：高精度、別スレッド

class DelayExecute

{

public event EventHandler Execute;

public int DelayTime = 500;

System.Threading.Timer Timer;

public DelayExecute()

{

Timer = new System.Threading.Timer(x => {

Execute(this, EventArgs.Empty);

});

}

public void ReserveExecute()

{

Timer.Change(DelayTime, System.Threading.Timeout.Infinite);

//Change(遅延時間,間隔)Timeout.Infiniteで無効化

}

class DelayExecute2

{

public event EventHandler Execute;

System.Timers.Timer Timer;

public DelayExecute2()

{

Timer = new System.Timers.Timer();

Timer.AutoReset = false;

Timer.Elapsed += (s, e) => Execute(this, EventArgs.Empty); // Interval後にElapsedの初回起動

Timer.Interval = 500;

}

public void ReserveExecute()

{

Timer.Start();

Timer.Interval = 500;

}

2021-01-012021-01-03

Javascript 要素をドラッグで移動

td要素の中にあるdiv要素をドラッグで別のtd要素の中に移動。div要素にはinputタグでデータを持たせクリック時に取得。

<!DOCTYPE html>
<html lang="ja">
<head>
  <meta charset="UTF-8">
  <title>test</title>

  <style>

  *{
    margin: 0;
    padding: 0;
  }

  td{
    border: solid 1px #ccc;
    width:300px;
    height:300px;
  }

  .container{
    background-color: black;
    padding: 2px;

    height: 40px;
    width: 290px;
    display: flex;
    flex-wrap: wrap;
  }

  .moveArea{
    width: 10%;
    background-color: red;
  }


  .textArea{
    width: 89%;
    background-color: green;
  }

  .dataArea{
    width: 1%;
    background-color: blue;
  }

  .drag {
    cursor: move;
    position: absolute;
    z-index: 1000;
  }

  </style>
</head>
<body>

<table>
<tr><td></td><td></td><tr>
<tr><td></td><td id="start"></td><tr>
</table>

<input type="textbox" id="target_id">
<input type="textbox" id="target_age">

<script>

window.onload = startup;

function startup(){
  
  setup_rect({"caption":"A部品","id":"1","age":"2"});
  setup_rect({"caption":"B部品","id":"2","age":"3"});

}

function setup_rect(value_list){

  let containerElement = document.createElement("div");
  containerElement.classList.add("container");

  let moveAreaElement = document.createElement("div");
  moveAreaElement.addEventListener('mousedown', mouse_down);
  moveAreaElement.innerHTML = "";
  moveAreaElement.classList.add("moveArea");
  containerElement.appendChild(moveAreaElement);

  let textAreaElement = document.createElement("div");
  textAreaElement.addEventListener('click', text_click);
  textAreaElement.innerHTML = value_list["caption"];
  textAreaElement.classList.add("textArea");
  containerElement.appendChild(textAreaElement);

  let dataAreaElement = document.createElement("div");
  dataAreaElement.innerHTML = 
  "<input type='hidden' name='id' value='" + value_list["id"] + "'>" + 
  "<input type='hidden' name='age' value='" + value_list["age"] + "'>";
  dataAreaElement.classList.add("dataArea");
  containerElement.appendChild(dataAreaElement);

  let target = document.querySelector("#start");
  target.appendChild(containerElement);
}

function text_click(event){

  let target_id = document.getElementById("target_id");
  let target_age = document.getElementById("target_age");

  for(let el of this.nextElementSibling.children){

    if (el.getAttribute("name") === "id") target_id.setAttribute("value", el.getAttribute("value"));
    if (el.getAttribute("name") === "age") target_age.setAttribute("value", el.getAttribute("value"));
    
  }
}

function mouse_move(event){

  let target = document.getElementsByClassName("drag")[0];

  let x = event.pageX - spaceX;
  let y = event.pageY - spaceY;

  target.style.top = y + "px";
  target.style.left = x + "px";
}

let spaceX = 0;
let spaceY = 0;

function mouse_down(event){

  spaceX = event.offsetX;
  spaceY = event.offsetY;

  let target = this.parentNode;
  target.classList.add("drag");

  mouse_move(event);
  document.addEventListener('mousemove', mouse_move);
  target.addEventListener('mouseup', mouse_up);
}

function mouse_up(event){

  spaceX = 0;
  spaceY = 0;

  this.classList.remove("drag");
  document.removeEventListener("mousemove", mouse_move);
  this.removeEventListener('mouseup', mouse_up);

  let x = event.clientX;
  let y = event.clientY;

  let el = document.elementFromPoint(x,y);
  if (el.tagName === "TD") el.appendChild(this);
}

</script>

</body>
</html>

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

<!DOCTYPE html>

<head>

<style>

margin: 0;

padding: 0;

}

td{

border: solid 1px #ccc;

width:300px;

height:300px;

}

.container{

background-color: black;

padding: 2px;

height: 40px;

width: 290px;

display: flex;

flex-wrap: wrap;

}

.moveArea{

width: 10%;

background-color: red;

}

.textArea{

width: 89%;

background-color: green;

}

.dataArea{

width: 1%;

background-color: blue;

}

.drag {

cursor: move;

position: absolute;

z-index: 1000;

}

</style>

</head>

<body>

<table>

</table>

window.onload = startup;

function startup(){

setup_rect({"caption":"A部品","id":"1","age":"2"});

setup_rect({"caption":"B部品","id":"2","age":"3"});

}

function setup_rect(value_list){

let containerElement = document.createElement("div");

containerElement.classList.add("container");

let moveAreaElement = document.createElement("div");

moveAreaElement.addEventListener('mousedown', mouse_down);

moveAreaElement.innerHTML = "";

moveAreaElement.classList.add("moveArea");

containerElement.appendChild(moveAreaElement);

let textAreaElement = document.createElement("div");

textAreaElement.addEventListener('click', text_click);

textAreaElement.innerHTML = value_list["caption"];

textAreaElement.classList.add("textArea");

containerElement.appendChild(textAreaElement);

let dataAreaElement = document.createElement("div");

dataAreaElement.innerHTML =

"<input type='hidden' name='id' value='" + value_list["id"] + "'>" +

"<input type='hidden' name='age' value='" + value_list["age"] + "'>";

dataAreaElement.classList.add("dataArea");

containerElement.appendChild(dataAreaElement);

let target = document.querySelector("#start");

target.appendChild(containerElement);

}

function text_click(event){

let target_id = document.getElementById("target_id");

let target_age = document.getElementById("target_age");

for(let el of this.nextElementSibling.children){

if (el.getAttribute("name") === "id") target_id.setAttribute("value", el.getAttribute("value"));

if (el.getAttribute("name") === "age") target_age.setAttribute("value", el.getAttribute("value"));

}

function mouse_move(event){

let target = document.getElementsByClassName("drag")[0];

let x = event.pageX - spaceX;

let y = event.pageY - spaceY;

target.style.top = y + "px";

target.style.left = x + "px";

}

let spaceX = 0;

let spaceY = 0;

function mouse_down(event){

spaceX = event.offsetX;

spaceY = event.offsetY;

let target = this.parentNode;

target.classList.add("drag");

mouse_move(event);

document.addEventListener('mousemove', mouse_move);

target.addEventListener('mouseup', mouse_up);

}

function mouse_up(event){

spaceX = 0;

spaceY = 0;

this.classList.remove("drag");

document.removeEventListener("mousemove", mouse_move);

this.removeEventListener('mouseup', mouse_up);

let x = event.clientX;

let y = event.clientY;

let el = document.elementFromPoint(x,y);

if (el.tagName === "TD") el.appendChild(this);

}

</script>

</body>

</html>