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

2022-02-282024-05-03

Chrome拡張機能 Google検索にfavicon2

今は標準で表示されるので､不使用｡

あまりjQueryを聞かなくなったので。脱jQuery版。

{
  "manifest_version": 3,
  "name": "GoogleSearch Add Favicons",
  "version": "0.0.2",
  "content_scripts":[
    {
      "matches": ["https://www.google.co.jp/search?*"],
      "js": ["script.js"]
    }
  ]
}

{

"manifest_version": 3,

"name": "GoogleSearch Add Favicons",

"version": "0.0.2",

"content_scripts":[

{

"matches": ["https://www.google.co.jp/search?*"],

"js": ["script.js"]

}

]

}

window.addEventListener('load', function() {
let elements = document.querySelectorAll('a > h3');
  for (let i = 0; i < elements.length; i++) {
    let url = elements[i].parentElement.getAttribute('href');
    let domain = url.match(/^https?:\/\/[-0-9a-z.]+/i);
    let fav = 'https://www.google.com/s2/favicons?domain=' + domain[0];
    let img = document.createElement('img');
    img.src = fav;
    elements[i].insertBefore(img, elements[i].firstChild);
  }
});

window.addEventListener('load', function() {

let elements = document.querySelectorAll('a > h3');

for (let i = 0; i < elements.length; i++) {

let url = elements[i].parentElement.getAttribute('href');

let domain = url.match(/^https?:\/\/[-0-9a-z.]+/i);

let fav = 'https://www.google.com/s2/favicons?domain=' + domain[0];

let img = document.createElement('img');

img.src = fav;

elements[i].insertBefore(img, elements[i].firstChild);

}

});

2022-02-27

C# Timer 一定間隔実行

using System;
using System.Windows.Forms;

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

            Timer timer = new Timer();
            DateTime start = DateTime.Now;

            int counter = 0;
            timer.Interval = 1000 * 5; // 5秒
            timer.Tick += (s, e) =>
            {
                // 先ず5秒後に1度目、10秒後に2度目だが、
                // 2回目が9.9～になり、3回表示されるときがある。

                counter++;
                TimeSpan ts = (DateTime.Now - start);
                if (ts.TotalSeconds >= 10) 
                {
                    timer.Stop();
                    MessageBox.Show("10秒経過しました, " + counter.ToString());
                }
                else
                {
                    MessageBox.Show(ts.TotalSeconds.ToString() + ", " + counter.ToString());
                }
            };

            timer.Start();
        }
    }
}

using System;

using System.Windows.Forms;

namespace BackupDb

{

public partial class Form1 : Form

{

public Form1()

{

InitializeComponent();

Timer timer = new Timer();

DateTime start = DateTime.Now;

int counter = 0;

timer.Interval = 1000 * 5; // 5秒

timer.Tick += (s, e) =>

{

// 先ず5秒後に1度目、10秒後に2度目だが、

// 2回目が9.9～になり、3回表示されるときがある。

counter++;

TimeSpan ts = (DateTime.Now - start);

if (ts.TotalSeconds >= 10)

{

timer.Stop();

MessageBox.Show("10秒経過しました, " + counter.ToString());

}

else

{

MessageBox.Show(ts.TotalSeconds.ToString() + ", " + counter.ToString());

}

};

timer.Start();

}

一定間隔で実行する実験

2022-02-112023-03-25

Chrome拡張機能不要なタブを閉じる

特定の文字列を含むタブ+右側のタブをショートカットで閉じる。

Chromeのタブ操作はほぼショートカットなのだけど、使用頻度の高い「右側のタブを閉じる」だけマウス操作になってしまっており不便だった。

manifest.json

{
  "manifest_version": 3,
  "name": "CloseTabs",
  "version": "0.0.2",
  "background": {
    "service_worker": "script.js"
  },
  "permissions": [
    "tabs"
  ],
  "commands": {
    "close-tabs": {
      "suggested_key": {
        "default": "Alt+Shift+E"
      },
      "description": "CloseTabs"
    },
    "close-right-tabs": {
      "suggested_key": {
        "default": "Alt+Shift+Z"
      },
      "description": "CloseRightTabs"
    }
  }
}

{

"manifest_version": 3,

"name": "CloseTabs",

"version": "0.0.2",

"background": {

"service_worker": "script.js"

"permissions": [

"tabs"

"commands": {

"close-tabs": {

"suggested_key": {

"default": "Alt+Shift+E"

"description": "CloseTabs"

"close-right-tabs": {

"suggested_key": {

"default": "Alt+Shift+Z"

"description": "CloseRightTabs"

}

script.js

chrome.commands.onCommand.addListener(function (command) {
    if (command === 'close-tabs') {
        chrome.tabs.query({}, tabs => {
            for(let i=0; i<tabs.length; i++){
                if (tabs[i].title.indexOf('アラート! - ESET Internet Security') !== -1) {
                    chrome.tabs.remove(tabs[i].id);
                }
            }
        });
    } else if (command === 'close-right-tabs') {
        chrome.tabs.query({currentWindow: true}, tabs => {
            let rightSide = false;
            for(let i=0; i<tabs.length; i++) {
                if (rightSide) {
                    chrome.tabs.remove(tabs[i].id);
                } else {
                    if (tabs[i].active) rightSide = true;
                }
            }
        });
    }
});

chrome.commands.onCommand.addListener(function (command) {

if (command === 'close-tabs') {

chrome.tabs.query({}, tabs => {

for(let i=0; i<tabs.length; i++){

if (tabs[i].title.indexOf('アラート! - ESET Internet Security') !== -1) {

chrome.tabs.remove(tabs[i].id);

}

});

} else if (command === 'close-right-tabs') {

chrome.tabs.query({currentWindow: true}, tabs => {

let rightSide = false;

for(let i=0; i<tabs.length; i++) {

if (rightSide) {

chrome.tabs.remove(tabs[i].id);

} else {

if (tabs[i].active) rightSide = true;

}

});

}

});

AutoHotkeyから呼び出して利用中。
これで「右側のタブを閉じる」がAlt+Zで実行できる。Chrome拡張のショートカットの都合で今回はAutoHotkeyで置き換えているが通常は不要。

WinGetTitle, this_title, A
If(RegExMatch(this_title, "Google Chrome") > 0)
{
  Send, !+{E} ; Chrome拡張
}

WinGetTitle, this_title, A

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

{

Send, !+{E} ; Chrome拡張

}

<!z::Send, !+{Z} ; Chrome拡張

1	<!z::Send, !+{Z} ; Chrome拡張

Chrome側のショートカットの設定は、
︙＞その他ツール＞拡張機能＞≡＞キーボードショートカット
CoseRightTabs：Alt+Shift+Z
CloseTabs：Alt+Shift+E

2022-02-112022-02-13

Chrome拡張機能タブのタイトル取得

アイコンをクリックして実行するタイプ

manifest.json

{
  "manifest_version": 2,
  "name": "Tabs",
  "version": "0.0.1",
  "browser_action": { },
  "background": {
    "scripts": ["script.js"],
    "persistent": false
  },
  "permissions": [
    "tabs"
  ]
}

{

"manifest_version": 2,

"name": "Tabs",

"version": "0.0.1",

"browser_action": { },

"background": {

"scripts": ["script.js"],

"persistent": false

"permissions": [

"tabs"

]

}

script.js

chrome.browserAction.onClicked.addListener(
    function () {
        chrome.tabs.query({}, tabs => {
            for(let i=0; i<tabs.length; i++){
                alert(tabs[i].title);
            }
        });
    }
);

chrome.browserAction.onClicked.addListener(

function () {

chrome.tabs.query({}, tabs => {

for(let i=0; i<tabs.length; i++){

alert(tabs[i].title);

}

});

}

);

アクティブなウィンドウだけの場合

    if (command == 'xxx') {
        chrome.tabs.getAllInWindow(tabs => {
            for(let i=0; i<tabs.length; i++){
                chrome.tabs.update(tabs[i].id,{selected:true});
                alert(tabs[i].title);
            }
        });
    }

if (command == 'xxx') {

chrome.tabs.getAllInWindow(tabs => {

for(let i=0; i<tabs.length; i++){

chrome.tabs.update(tabs[i].id,{selected:true});

alert(tabs[i].title);

}

});

}

2022-02-102022-02-10

VBA 値が含まれる行をコピー

全シートを対象に値が含まれる行をコピー

Sub Initialize()
 
Application.ScreenUpdating = False
Application.EnableEvents = False
Application.DisplayAlerts = False
Application.Calculation = xlCalculationManual ' 関数利用注意

End Sub
 
Sub Finalize()

Application.Calculation = xlCalculationAutomatic
Application.DisplayAlerts = True
Application.EnableEvents = True
Application.ScreenUpdating = True
    
End Sub

Sub test1()

Initialize

'書き込みシート名
writeSheet = "工番集計"

' 1: 10列目に対象を含むか,  2: 11列目が日付として対象と一致するか。
ifValue = 2

' 最終行が1万より多い場合終了

For Each w In Sheets
  If w.Cells.SpecialCells(xlLastCell).Row > 10000 Then
    MsgBox w.Name & "の行数が多いため終了します"
    Exit Sub
  End If
Next w

' 検索文字列入力

nm = InputBox("値を入力してください")
If nm = "" Then Exit Sub
If ifValue = 2 And False = IsDate(nm) Then Exit Sub

' 書き込みシート準備

For Each w In Sheets
  If w.Name = writeSheet Then
    w.Delete
    Exit For
  End If
Next w

Sheets.Add After:=Sheets(1)
ActiveSheet.Name = writeSheet

currentRowNumber = 1

' 探索処理

Dim rg As Range
For Each w In Sheets

  bt = w.Cells.SpecialCells(xlLastCell).Row
  If bt <= 1 Then GoTo continue:
  Set rg = w.Range("A1:AA" & bt)
  
  For r = 1 To rg.Rows.Count
  
    Select Case ifValue
    
    Case 1
    
      If InStr(rg.Cells(r, 10).Value, nm) > 0 Then
        Sheets(writeSheet).Range("A" & currentRowNumber & ":AA" & currentRowNumber).Value = rg.Range("A" & r & ":AA" & r).Value
        currentRowNumber = currentRowNumber + 1
      End If
    
    Case 2
    
      If IsDate(rg.Cells(r, 11).Value) Then ' 日付に変換可能
        If CDate(rg.Cells(r, 11).Value) = CDate(nm) Then
          Sheets(writeSheet).Range("A" & currentRowNumber & ":AA" & currentRowNumber).Value = rg.Range("A" & r & ":AA" & r).Value
          currentRowNumber = currentRowNumber + 1
        End If
      End If
      
    End Select

  Next
  
continue:
Next w

Sheets(writeSheet).Activate
Sheets(writeSheet).Columns.AutoFit

Finalize

End Sub

Sub Initialize()

Application.ScreenUpdating = False

Application.EnableEvents = False

Application.DisplayAlerts = False

Application.Calculation = xlCalculationManual ' 関数利用注意

End Sub

Sub Finalize()

Application.Calculation = xlCalculationAutomatic

Application.DisplayAlerts = True

Application.EnableEvents = True

Application.ScreenUpdating = True

End Sub

Sub test1()

Initialize

'書き込みシート名

writeSheet = "工番集計"

' 1: 10列目に対象を含むか, 2: 11列目が日付として対象と一致するか。

ifValue = 2

' 最終行が1万より多い場合終了

For Each w In Sheets

If w.Cells.SpecialCells(xlLastCell).Row > 10000 Then

MsgBox w.Name & "の行数が多いため終了します"

Exit Sub

End If

Next w

' 検索文字列入力

nm = InputBox("値を入力してください")

If nm = "" Then Exit Sub

If ifValue = 2 And False = IsDate(nm) Then Exit Sub

' 書き込みシート準備

For Each w In Sheets

If w.Name = writeSheet Then

w.Delete

Exit For

End If

Next w

Sheets.Add After:=Sheets(1)

ActiveSheet.Name = writeSheet

currentRowNumber = 1

' 探索処理

Dim rg As Range

For Each w In Sheets

bt = w.Cells.SpecialCells(xlLastCell).Row

If bt <= 1 Then GoTo continue:

Set rg = w.Range("A1:AA" & bt)

For r = 1 To rg.Rows.Count

Select Case ifValue

Case 1

If InStr(rg.Cells(r, 10).Value, nm) > 0 Then

Sheets(writeSheet).Range("A" & currentRowNumber & ":AA" & currentRowNumber).Value = rg.Range("A" & r & ":AA" & r).Value

currentRowNumber = currentRowNumber + 1

End If

Case 2

If IsDate(rg.Cells(r, 11).Value) Then ' 日付に変換可能

If CDate(rg.Cells(r, 11).Value) = CDate(nm) Then

Sheets(writeSheet).Range("A" & currentRowNumber & ":AA" & currentRowNumber).Value = rg.Range("A" & r & ":AA" & r).Value

currentRowNumber = currentRowNumber + 1

End If

End Select

continue:

Next w

Sheets(writeSheet).Activate

Sheets(writeSheet).Columns.AutoFit

Finalize

End Sub

2022-02-072024-03-28

Dockerfile / DockerCompose メモ

ファイルの違い

Dockerfile：カスタマイズしたImageを作成するためのファイル
docker-compose.yml：複数のコンテナを組み合わせて実行するdocker-composeのための設定ファイル

基本的な流れ

公開イメージをpull
公開イメージ＋Dockerfileをbuildしオリジナルイメージを作成
オリジナルイメージをrunしてコンテナとして起動
(コンテナは一つのプロセスとして動作している)

Dockerコマンド

ビルド：
ベースイメージに対して機能を加えて独自のイメージを作り出す

docker build . -t イメージ名
カレントディレクトリのdockerfileを参照
tオプションで名前を指定する。

コンテナ実行：
docker run イメージ名
-d バックグラウンドで実行
–name コンテナに名前をつける(ハイフン*2)
-p ポートフォーワード(ホスト側：コンテナ側)

Dockerfileファイル命令

FROM：
ベースイメージの設定

MAINTAINER：
製作者

ENV：
環境変数
コンテナ用の環境変数

ARG：
環境変数
ビルド用(Dockerfile内)一時的な環境変数

WORKDIR：
作業ディレクトリ

RUN：
コマンド実行(イメージ作成時)

CMD：
コマンド実行(コンテナ実行時)

EXPOSE：
ポート解放
(docker run -p のみでポートは開く)

USER：
ユーザー切り替え

DockerCompose.yml命令

設定値は「:」
文字列は「’」「”」
複数の値は「-」
コメントは「#」

Docker Compoesごとに独立したネットワークになる。

version：
バージョン

services：
コンテナの名前定義

volumes：
コンテナが利用するボリューム定義

networks：
コンテナが利用するネットワーク定義

・サービスの命令

iamge
利用するイメージを指定する。

Dockerfileを利用する場合、build
(ymlから相対パスで指定)

volumes
ホスト：コンテナと記述する。

restart
docker run -d –restart
と同じ

depends_on
compose up/down
したときに指定したサービスが先に起動/終了するようになる。

environment
環境変数設定。

ports
ポートマッピング(ホスト：コンテナ)
(docker run -p xxx:xxxと同じ)

tty
docker run -it
の-tにあたる設定。

Volumes

バインドとボリュームがある。
ボリュームの場合、dockerエンジンの管理領域に永続化ストレージができる。

・ボリュームマウント

volumes:
　db_data:

ボリューム(パス指定のみ)
services:
　wordpress:
　　volumes:
　　　- /var/www/html

WSLでの位置
\\wsl$\docker-desktop-data\version-pack-data\community\docker\volumes\ランダム\_data

名前付きボリューム
services:
　wordpress:
　　volumes:
　　　- aaa:/var/www/html
volumes:
　aaa:

WSLでの位置
\\wsl$\docker-desktop-data\version-pack-data\community\docker\volumes\wordpressfolder_aaa\_data

・バインド

services:
　wordpress:
　　volumes:
　　　- ./html:/var/www/html

.はdocker-compose.ymlのあるパスを指す。

WindowsのDockerDesktopの場合、
– C:\Users\mail\Desktop\html:/var/www/html
のように指定することもできる。
(~を利用するとWindowsからパスが見えなくなる)

WordPressを実行してみる

Win10でGUIのDockerDesktopを利用。

・docker-compose.yml作成

適当なフォルダを作成し、その中に、
docker-compose.yml
を作成する。
(フォルダ名がContainer/Apps名になる)

version: '3'

services:
   db:
     image: mysql:5.7
     volumes:
       - db_data:/var/lib/mysql
     restart: always
     environment:
       MYSQL_ROOT_PASSWORD: passw0rd
       MYSQL_DATABASE: wp_db
       MYSQL_USER: wp_user
       MYSQL_PASSWORD: 1234

   wordpress:
     depends_on:
       - db
     image: wordpress:latest
     ports:
       - "8000:80"
     restart: always
     environment:
       WORDPRESS_DB_HOST: db:3306
       WORDPRESS_DB_NAME: wp_db
       WORDPRESS_DB_USER: wp_user
       WORDPRESS_DB_PASSWORD: 1234
volumes:
    db_data:

version: '3'

services:

db:

image: mysql:5.7

volumes:

- db_data:/var/lib/mysql

restart: always

environment:

MYSQL_ROOT_PASSWORD: passw0rd

MYSQL_DATABASE: wp_db

MYSQL_USER: wp_user

MYSQL_PASSWORD: 1234

wordpress:

depends_on:

- db

image: wordpress:latest

ports:

- "8000:80"

restart: always

environment:

WORDPRESS_DB_HOST: db:3306

WORDPRESS_DB_NAME: wp_db

WORDPRESS_DB_USER: wp_user

WORDPRESS_DB_PASSWORD: 1234

volumes:

db_data:

・Volumes,Containers/Apps作成

作成したフォルダに移動し、
docker-compose up -d
を実行する。

・docker-compose.ymlを修正した場合

Volumes,Containers/Appsをクリアしてコマンドを再実行する。
(docker-compose.ymlの場所を変えれば別のVolumes,Containers/Appsとして作成される)

・ブラウザのアクセス

http://localhost:8000

・エクスプローラのアクセス
(パス指定のみした場合のボリューム)

\\wsl$\docker-desktop-data\version-pack-data\community\docker\volumes

・シェルのアクセス

docker ps
一覧を確認する。

docker exec -it wordpress1-wordpress-1 /bin/bash
接続する。

exit
終了する。

・未使用ボリューム一括削除

docker volume prune

Mattermostを実行してみる

git config –global core.autocrlf input
WSLで利用する場合、Winでcloneすると改行コードが変換されてしまうため。

確認
git config core.autocrlf

・評価版の場合

docker run –name mattermost-preview -d –publish 8065:8065 mattermost/mattermost-preview

＊＊＊

本番の場合

・クローン

https://github.com/mattermost/mattermost-docker.git

・docker-compse.yamlを編集

args:
– edition=team
のコメントを外す。

・コンテナ作成

docker-compose up -d

Apache/MySQL/PHPを実行してみる

・フォルダ構成

php7.2-apache
└dockerfile
docker-compose.yml

・Dockerfile

FROM php:7.2-apache
RUN docker-php-ext-install pdo_mysql

・コマンド

docker-compose.ymlでビルドされるが、
もし単体でDockerfileをビルドする場合、
docker build . -t php7.2

・docker-compose.yml

version: '3'

services:
  php:
    build: php7.2-apache
    image: php7.2
    volumes:
      - ./html:/var/www/html
    ports:
      - 8000:80
    container_name: lamp-php7.2
  mysql:
    image: mysql:5.7
    volumes:
      - ./mysql:/var/lib/mysql
    environment:
      - MYSQL_ROOT_PASSWORD=abc123
      - MYSQL_DATABASE=test_db
      - MYSQL_USER=test_user
      - MYSQL_PASSWORD=abc123
    container_name: lamp-mysql5.7
    command: mysqld --character-set-server=utf8mb4

version: '3'

services:

php:

build: php7.2-apache

image: php7.2

volumes:

- ./html:/var/www/html

ports:

- 8000:80

container_name: lamp-php7.2

mysql:

image: mysql:5.7

volumes:

- ./mysql:/var/lib/mysql

environment:

- MYSQL_ROOT_PASSWORD=abc123

- MYSQL_DATABASE=test_db

- MYSQL_USER=test_user

- MYSQL_PASSWORD=abc123

container_name: lamp-mysql5.7

command: mysqld --character-set-server=utf8mb4

・コマンド

docker-compose up -d

・イメージの名前を指定する場合

services:
　fuga:
　　build: ここでdockerfileのフォルダ名
　　image: 付けたい名前
(pullはされない)

コマンドで実行

ほぼDockerDesktopで作業しているが一部コマンドでやる場合。

・イメージ取得

プル
docker pull node

一覧
docker images

・コンテナ作成

(docker run [オプション] image [コマンド])
docker run -it –name container -p 81:80 -v C:\Users\mail\Desktop\test:/home node /bin/bash

–rm 利用後コンテナ削除
–name 作成するコンテナに名前をつける
-it 中に入れる
-d バックグラウンドで起動
-p ポートマッピング
-v バインド(ホスト:コンテナ)
ここでのコマンドは/bin/bashとなる。最初に実行するコマンド。

MySQL

・構成

dockerfile
my.cnf

・dockerfile

FROM mysql:8.0
ENV MYSQL_ROOT_PASSWORD passw0rd!
ADD my.cnf /etc/mysql/conf.d/my.cnf

・my.cnf

[mysqld]
character-set-server=utf8

・実行

docker build . -t mysql8
docker run -d –name mysql8 -p 49152:3306 mysql8

SQL Server

・構成

dockerfile

・dockerfile

FROM mcr.microsoft.com/mssql/server:2019-latest
ENV ACCEPT_EULA=Y
ENV SA_PASSWORD=passw0rd!
ENV MSSQL_PID=Express
ENV MSSQL_LCID=1041
ENV MSSQL_COLLATION=Japanese_CI_AS

※これでExpressを利用できる。

・イメージ、コンテナ作成

docker build . -t mssql2019
docker run –name mssql2019 -d -p 49153:1433 mssql2019

・コマンド説明

以下のbuild,runはcmdで実行してもDockerDesktopに反映される。

docker build -t [作成するオリジナルイメージ名]
(カレントディレクトリのdockerfileを利用する)

docker run –name mssql2022 -d -p 49153:1433 [利用するオリジナルイメージ名]
–name 作成するコンテナに名前をつける
-d バックグラウンドで起動
-p ポートマッピング

・接続
サーバー：localhost,49153
ログインID：sa
パスワード：passw0rd!

Media Wiki

･フォルダを作り､
docker-compose.yml
を作る｡

version: "3.8"
services:

# MediaWiki コンテナ
mediawiki:
image: mediawiki:latest
ports:
- 8080:80
volumes:
- C:\Users\USER\Desktop\MediaWiki\www\data:/var/www/data
- C:\Users\USER\Desktop\MediaWiki\LocalSettings.php:/var/www/html/LocalSettings.php

version: "3.8"

services:

# MediaWiki コンテナ

mediawiki:

image: mediawiki:latest

ports:

- 8080:80

volumes:

- C:\Users\USER\Desktop\MediaWiki\www\data:/var/www/data

- C:\Users\USER\Desktop\MediaWiki\LocalSettings.php:/var/www/html/LocalSettings.php

※
/var/www/html
を最初からマウントしていると起動しない

･フォルダで､
docker-compose up -d
を実行｡

･必要なイメージがダウンロードされ､コンテナが起動する｡

･http://localhost:8080
にアクセス

DBはSQLiteを選んであとは､そのまま｡
ウィキ名を付け､管理アカウントを指定する｡
設定が完了すると､
LocalSettings.php
をダウンロードする｡

･コンテナを削除

保存したLocalSettings.phpを移動｡

docker-compose.ymlに以下追加｡

 C:\Users\USER\Desktop\MediaWiki\LocalSettings.php:/var/www/html/LocalSettings.php

1	C:\Users\USER\Desktop\MediaWiki\LocalSettings.php:/var/www/html/LocalSettings.php

･コンテナを再度作成

･フォルダ構成
C:\Users\USER\Desktop\MediaWiki
-www
–data
–html
-docker-compose.yml
-LocalSettings.php

2022-02-03

AutoHotkey Chromeウィンドウサイズ変更

最小/最大は通常サイズへ。通常サイズは最大へ。

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 = 1 OR min_max = -1)
    {
      WinRestore, ahk_id %this_id%
    }
    Else
    {
      WinMaximize, ahk_id %this_id%
    }
  }
}

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 = 1 OR min_max = -1)

{

WinRestore, ahk_id %this_id%

}

Else

{

WinMaximize, ahk_id %this_id%

}

2022-01-272024-04-06

DockerDesktop用Hyper-V の設定

DockerDesktopを実行している環境はHOME

optionalfeatures
を実行すると、下記の通り似た名前がでてくる。

･Hyper-V(Hyper-V プラットフォーム/Hyper-V 管理ツール)
仮想化ツール本体
※Hyper-Vだけ有効化しておけば以下は無効化でもOK｡
※利用する場合､タスクマネージャからCPU>仮想化が有効かどうか確認｡

・仮想マシンプラットフォーム
Hyper-Vのコア部分

・Windowsハイパーバイザープラットフォーム
VirtualBoxなど(Type2)の仮想化ソフトをHyper-V経由で使えるようにする。

・Linux用Windowsサブシステム
WSL

＊＊＊

仮想マシンプラットフォームはHyper-Vとは違いHOMEでも有効になっており、WSLなど他の機能からも利用されている。

・確認方法

bcdedit /enum {current}
を実行し、
hypervisorlaunchtype
を確認し、Autoの場合、仮想マシンプラットフォームが起動している。

・停止
bcdedit /set hypervisorlaunchtype off
・有効
bcdedit /set hypervisorlaunchtype auto

VirtualBoxとの共存させる場合、仮想マシンプラットフォームを停止すると起動できる。

・フォーマット

OVA：オープンフォーマット
VDI：VirtualBox
VHD/VHDX：Microsoft
VMDK：VMware

・VDIからVHDの変換

“C:\Program FIles\oracle\VirtualBox\VBoxManage.exe” clonemedium disk “MSEdge – Win10-disk001.vdi” Win10.vhd -format VHD

2022-01-19

C# Auto Increment 歯抜利用

  for (var r = 0; r < dataGridView1.Rows.Count; r++)
  {
      int currentBranch = 0;
      int.TryParse(dataGridView5.Rows[r].Cells["branch"].Value.ToString(), out currentBranch);
      branchList.Add(currentBranch);
  }

  // 1-100から現在のリストの値を削除して、残った値の最小値
  int min = Enumerable.Range(1, 100).Except(branchList).Min<int>();

for (var r = 0; r < dataGridView1.Rows.Count; r++)

{

int currentBranch = 0;

int.TryParse(dataGridView5.Rows[r].Cells["branch"].Value.ToString(), out currentBranch);

branchList.Add(currentBranch);

}

// 1-100から現在のリストの値を削除して、残った値の最小値

int min = Enumerable.Range(1, 100).Except(branchList).Min<int>();

2021-12-20

AutoHotkey IPアドレスを表示

RunWait, %ComSpec% /c ipconfig | clip

Loop, Parse, clipboard, `n, `r
{
  var := RegExMatch(A_LoopField, "IPv4\D*([.0-9]+)", x)
  if(var > 0)
  {
     MsgBox, IPアドレス：%x1%
  }
}

RunWait, %ComSpec% /c ipconfig | clip

Loop, Parse, clipboard, `n, `r

{

var := RegExMatch(A_LoopField, "IPv4\D*([.0-9]+)", x)

if(var > 0)

{

MsgBox, IPアドレス：%x1%

}