HaruhiroTakahashi

#pragma once
#include "OCV.h"
#include <random>

using namespace::std;
using namespace::cv;
using cv::UMat;

IAffine::~IAffine()
{

HaruhiroTakahashi

#pragma once
#include "OCV.h"
#include <random>

using namespace::std;
using namespace::cv;
using cv::UMat;

IAffine::~IAffine()
{

HaruhiroTakahashi

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

HaruhiroTakahashi

Option Explicit
Option Base 1  '配列最初の要素番号を１に設定する

'【パス構成要素抽出メソッド】

'「このインスタンスメソッドの使い方」
'宣言方法 → Set hoge = New PathSeparation_Cls
'            huga = hoge.elemPath(フルパス)
'            huga(m, n)→引数m,nの値によってファイル名およびパスの取得ができる。
'

HaruhiroTakahashi

'座標入力セル削除範囲----------------------
Public Const roData As String = "B10:D59"
Public Const tsuData As String = "F10:H59"
'------------------------------------------

'campara格納フォルダ名-----------------------------
Public Const camParaFolder As String = "campara_and_Image"
'--------------------------------------------------

HaruhiroTakahashi

Option Explicit

'※※※超重要※※※
'クラスCoordinateを呼び出した直後、点を反映させたいシートをアクティブにしてあげなければならない。
'他のモジュールまたはプロシージャでシートを選択してた場合、最後に選択されたシートの行列および縮尺を基準として点の位置が決定されてしまう。
'よって、このコードの最初の行で ～.Activate と宣言しなければならない。
'このマクロの場合、クラスDXT内でSheet3.Activateが宣言されているため、初期処理でSheet1.Activateを宣言する必要がある。

Public Sub Set_Coord(Xmm_Sta, Ymm_Sta, Xmm_End, Ymm_End, Zmm_Sta, Zmm_End As Double, _
                     lineFlag, graphicFlag As Boolean, _

HaruhiroTakahashi

import http.server

server_address = ("", 80)
handler_class = http.server.CGIHTTPRequestHandler
server = http.server.HTTPServer(server_address, handler_class)
server.serve_forever()

HaruhiroTakahashi

Attribute VB_Name = "MMCTestSpecificationsModule"


'*************************************************************************************
'
'   画像削除設定 ＝ delpic.setdelshape(①, ②, ③, ④)
'   画像貼付設定 ＝ setpic.setpicture(⑤, ②, ⑥, ④, ⑦, ⑧)
'
'   ①画像削除開始位置（列）【ここだけ文字で指定すること。 例："A"】
'   ②画像貼り付け、削除開始位置（行）

HaruhiroTakahashi

'******************************************************************
'エクセル起動時にメニューシートを開く
'******************************************************************

Private Sub Workbook_Open()
    Worksheets("メニュー").Select
End Sub

HaruhiroTakahashi

/* 【メモ】
・自作の変数は先頭にmy_～を付けて作成。
・変数「x,y」は小さいループ。変数「i,j」は大きいループで使用。



*/