// Filename   : myframe.cpp
// Last Change: 05-Jun-2014.
//
#include "main.h"
#include "db.h"
#include "about.h"
#include "kana.h"
#include "hist.h"
#include "preview.h"
#include "index.h"
#include "hhsdb.h"
#include "cache.h"
#include "param.h"
#include "marksheet.h"
#include "myframe.h"
#include "bprint.h"

#define DEBUG 1

///////////////////////////////////////////////////////////////
// カスタム検索ボックス
MySearchBox::MySearchBox( wxWindow* parent, wxWindowID id, const wxString& value, const wxPoint& pos, const wxSize& size, long style )
    : wxSearchCtrl( parent, id, value, pos, size, style )
{
}
 
MySearchBox::~MySearchBox()
{
}

void MySearchBox::SetMessage( wxString msg )
{
    wxFrame* p = (wxFrame*)FindWindowById( ID_MAIN );
    p->SetStatusText( msg, 0 );
}

// Event Table
BEGIN_EVENT_TABLE( MySearchBox, wxSearchCtrl )
    EVT_CHAR( MySearchBox::OnKey )
END_EVENT_TABLE()

// Event Handlers & Functions
void MySearchBox::OnKey( wxKeyEvent& event )
{
    int kc = event.GetKeyCode();
    wxString s = GetValue();

    if ( kc == 13 ) {
        event.Skip();
        return;
    }

    if (  kc == 45 ) {   // テンキーの '-' キーで１文字削除
        wxString t = GetStringSelection();
        if ( t.IsEmpty() ) {
            long p = GetInsertionPoint();
            if ( p > 0 ) Remove( p - 1, p );
        }
        else {
            Cut();
        }
        return;
    }

    if ( kc == WXK_ESCAPE ) {    // clear by ESC
        this->Clear();
        return;
    }

    // auto-complete
    Cut();
    if ( kc >=48 && kc<=57 ) { // [0-9]
        kc -= 48;
        wxString input = GetValue() + wxString::Format( wxT("%d"), kc );
        if ( input.Len() < 5 ) {
            event.Skip();
            return;
        }
        for ( unsigned int i = 0; i < m_jhhsno.GetCount(); i++ ) {
            if ( m_jhhsno[i].StartsWith( input ) ) {
                ChangeValue( m_jhhsno[i] );
                SetSelection( input.Len(), 10 );

                wxArrayString s = wxSplit( GetHhsInfoByHhsNo( m_jhhsno[i] ), '_', '\\' );
                wxString msg = wxT("もしかして... ") + s[0] + wxT(" ？！");
                SetMessage( msg );
                return;
            }
            SetMessage( wxEmptyString );
        }
        event.Skip();
        return;
    }
    event.Skip();
}

///////////////////////////////////////////////////////////////
// サムネイルパネル
#define THUMB_W 60
#define THUMB_H 75
ThumbnailPanel::ThumbnailPanel( wxWindow* parent, wxWindowID id, const wxPoint& pos, const wxSize& size, long style ) 
    : wxPanel( parent, id, pos, size, style )
{
    m_parent = (MyFrame*)parent;

	wxBoxSizer* bSizer = new wxBoxSizer( wxHORIZONTAL );
	this->SetBackgroundColour( wxColour( 192, 192, 192 ) );

    wxString thumb = wxGetCwd() + wxFILE_SEP_PATH + wxT("image") + wxFILE_SEP_PATH + wxT("thumbnail.png");
    wxBitmap bmp = wxBitmap( thumb, wxBITMAP_TYPE_PNG );
	
	m_bitmap0 = new wxStaticBitmap( this, wxID_ANY, bmp, wxDefaultPosition, wxSize( THUMB_W, THUMB_H ), 0 );
	bSizer->Add( m_bitmap0, 0, wxALL|wxALIGN_CENTER_VERTICAL, 5 );
    m_bitmap0->Connect( wxEVT_LEFT_DCLICK, wxMouseEventHandler( ThumbnailPanel::OnDClick0 ), NULL, this );
	
	m_bitmap1 = new wxStaticBitmap( this, wxID_ANY, bmp, wxDefaultPosition, wxSize( THUMB_W, THUMB_H ), 0 );
	bSizer->Add( m_bitmap1, 0, wxALL|wxALIGN_CENTER_VERTICAL, 5 );
    m_bitmap1->Connect( wxEVT_LEFT_DCLICK, wxMouseEventHandler( ThumbnailPanel::OnDClick1 ), NULL, this );
	
	m_bitmap2 = new wxStaticBitmap( this, wxID_ANY, bmp, wxDefaultPosition, wxSize( THUMB_W, THUMB_H ), 0 );
	bSizer->Add( m_bitmap2, 0, wxALL|wxALIGN_CENTER_VERTICAL, 5 );
    m_bitmap2->Connect( wxEVT_LEFT_DCLICK, wxMouseEventHandler( ThumbnailPanel::OnDClick2 ), NULL, this );
	
	m_bitmap3 = new wxStaticBitmap( this, wxID_ANY, bmp, wxDefaultPosition, wxSize( THUMB_W, THUMB_H ), 0 );
	bSizer->Add( m_bitmap3, 0, wxALL|wxALIGN_CENTER_VERTICAL, 5 );
    m_bitmap3->Connect( wxEVT_LEFT_DCLICK, wxMouseEventHandler( ThumbnailPanel::OnDClick3 ), NULL, this );
	
	m_bitmap4 = new wxStaticBitmap( this, wxID_ANY, bmp, wxDefaultPosition, wxSize( THUMB_W, THUMB_H ), 0 );
	bSizer->Add( m_bitmap4, 0, wxALL|wxALIGN_CENTER_VERTICAL, 5 );
    m_bitmap4->Connect( wxEVT_LEFT_DCLICK, wxMouseEventHandler( ThumbnailPanel::OnDClick4 ), NULL, this );
	
	m_bitmap5 = new wxStaticBitmap( this, wxID_ANY, bmp, wxDefaultPosition, wxSize( THUMB_W, THUMB_H ), 0 );
	bSizer->Add( m_bitmap5, 0, wxALL|wxALIGN_CENTER_VERTICAL, 5 );
    m_bitmap5->Connect( wxEVT_LEFT_DCLICK, wxMouseEventHandler( ThumbnailPanel::OnDClick5 ), NULL, this );
	
	this->SetSizer( bSizer );
	this->Layout();
}

ThumbnailPanel::~ThumbnailPanel()
{
    m_bitmap0->Disconnect( wxEVT_LEFT_DCLICK, wxMouseEventHandler( ThumbnailPanel::OnDClick0 ), NULL, this );
    m_bitmap1->Disconnect( wxEVT_LEFT_DCLICK, wxMouseEventHandler( ThumbnailPanel::OnDClick1 ), NULL, this );
    m_bitmap2->Disconnect( wxEVT_LEFT_DCLICK, wxMouseEventHandler( ThumbnailPanel::OnDClick2 ), NULL, this );
    m_bitmap3->Disconnect( wxEVT_LEFT_DCLICK, wxMouseEventHandler( ThumbnailPanel::OnDClick3 ), NULL, this );
    m_bitmap4->Disconnect( wxEVT_LEFT_DCLICK, wxMouseEventHandler( ThumbnailPanel::OnDClick4 ), NULL, this );
    m_bitmap5->Disconnect( wxEVT_LEFT_DCLICK, wxMouseEventHandler( ThumbnailPanel::OnDClick5 ), NULL, this );
}

// Functions
/* サムネイル表示 */
void ThumbnailPanel::SetCacheImages( wxString dirpath )
{
    wxBitmap bmp;
    wxString thumb = wxGetCwd() + wxFILE_SEP_PATH + wxT("image") + wxFILE_SEP_PATH + wxT("thumbnail.png");

    wxDir dir( dirpath );
    if ( !dir.IsOpened() ) return;

    m_imagefiles.Clear();
    wxDir::GetAllFiles( dirpath, &m_imagefiles, wxT("*.jpg"), wxDIR_FILES );

    m_cachefiles.Clear();
    wxString cachedir = wxT("cache") + dirpath.AfterLast( ':' );
    wxDir cdir( cachedir );
    if ( !cdir.IsOpened() ) {
        bmp.LoadFile( thumb, wxBITMAP_TYPE_PNG );
        m_bitmap0->SetBitmap( bmp );
        m_bitmap1->SetBitmap( bmp );
        m_bitmap2->SetBitmap( bmp );
        m_bitmap3->SetBitmap( bmp );
        m_bitmap4->SetBitmap( bmp );
        m_bitmap5->SetBitmap( bmp );
        return;
    }

    wxDir::GetAllFiles( cachedir, &m_cachefiles, wxT("*.png"), wxDIR_FILES );

    int n = m_cachefiles.GetCount();
    if ( n < 6 ) {
        while ( n < 6 ) {
            m_cachefiles.Add( thumb );
            n++;
        }
    }

    bmp.LoadFile( m_cachefiles[0], wxBITMAP_TYPE_PNG ); m_bitmap0->SetBitmap( bmp );
    bmp.LoadFile( m_cachefiles[1], wxBITMAP_TYPE_PNG ); m_bitmap1->SetBitmap( bmp );
    bmp.LoadFile( m_cachefiles[2], wxBITMAP_TYPE_PNG ); m_bitmap2->SetBitmap( bmp );
    bmp.LoadFile( m_cachefiles[3], wxBITMAP_TYPE_PNG ); m_bitmap3->SetBitmap( bmp );
    bmp.LoadFile( m_cachefiles[4], wxBITMAP_TYPE_PNG ); m_bitmap4->SetBitmap( bmp );
    bmp.LoadFile( m_cachefiles[5], wxBITMAP_TYPE_PNG ); m_bitmap5->SetBitmap( bmp );
}
/* 画像クリックダブルで拡大表示 */
void ThumbnailPanel::OnDClick0( wxMouseEvent& WXUNUSED(event) ) { DoPreview( 0 ); }
void ThumbnailPanel::OnDClick1( wxMouseEvent& WXUNUSED(event) ) { DoPreview( 1 ); }
void ThumbnailPanel::OnDClick2( wxMouseEvent& WXUNUSED(event) ) { DoPreview( 2 ); }
void ThumbnailPanel::OnDClick3( wxMouseEvent& WXUNUSED(event) ) { DoPreview( 3 ); }
void ThumbnailPanel::OnDClick4( wxMouseEvent& WXUNUSED(event) ) { DoPreview( 4 ); }
void ThumbnailPanel::OnDClick5( wxMouseEvent& WXUNUSED(event) ) { DoPreview( 5 ); }
void ThumbnailPanel::DoPreview( int n )
{
    if ( m_imagefiles.GetCount() < n + 1 ) return;

    PreviewDialog* pd = new PreviewDialog( m_parent, wxID_ANY, wxEmptyString, wxDefaultPosition, wxDefaultSize, wxCAPTION|wxFRAME_NO_TASKBAR );
    pd->Show();
    pd->Maximize( true );
    pd->SetFiles( m_imagefiles, m_cachefiles, n );
    pd->SetPreviewImage( n );
}

///////////////////////////////////////////////////////////////
// メインフレーム
#define WINL_W 480
#define LOGO_W 200
#define LOGO_H  92

// resources
#if !defined(__WXMSW__) && !defined(__WXPM__)
    #include "sample.xpm"
#endif

MyFrame::MyFrame( wxWindow* parent, wxWindowID id, const wxString& title, const wxPoint& pos, const wxSize& size, long style )
    : wxFrame( parent, id, title, pos, size, style )
{
	this->SetSizeHints( wxSize( WINL_W, 500 ), wxDefaultSize );
	//this->SetBackgroundColour( wxSystemSettings::GetColour( wxSYS_COLOUR_ACTIVEBORDER ) );
    this->SetBackgroundColour( wxColour(wxT("WHEAT")) );
	
    // set the frame icon
    SetIcon(wxICON(sample));
	
    // メニューバー Menu
	m_menubar = new wxMenuBar( 0 );
	m_menuFile = new wxMenu();

	wxMenuItem* m_menuItemBPrintMode = new wxMenuItem( m_menuFile, ID_MNBPNT, wxString( wxT("バッチ印刷モード\tF12") ) , wxT("Batch Print Mode"), wxITEM_NORMAL );
	m_menuFile->Append( m_menuItemBPrintMode );

	wxMenuItem* m_menuItemIndex = new wxMenuItem( m_menuFile, ID_MNINDEX, wxString( wxT("インデックス\tF11") ) , wxT("Update index"), wxITEM_NORMAL );
	m_menuFile->Append( m_menuItemIndex );

	wxMenuItem* m_menuItemCache = new wxMenuItem( m_menuFile, ID_MNCACHE, wxString( wxT("キャッシュ\tF9") ) , wxT("Make cache"), wxITEM_NORMAL );
	m_menuFile->Append( m_menuItemCache );

    m_menuFile->AppendSeparator(); // ----

	wxMenuItem* m_menuItemHhsdb = new wxMenuItem( m_menuFile, ID_MNHHSDB, wxString( wxT("被保険者ＤＢ更新(&U)") ) , wxT("Update HHS databases"), wxITEM_NORMAL );
	m_menuFile->Append( m_menuItemHhsdb );

	wxMenuItem* m_menuItemBkup = new wxMenuItem( m_menuFile, ID_MNDBBKUP, wxString( wxT("ＤＢバックアップ(&B)") ) , wxT("Backup databases"), wxITEM_NORMAL );
	m_menuFile->Append( m_menuItemBkup );

    // params
	m_menuParam = new wxMenu();
	wxMenuItem* m_menuItemMask = new wxMenuItem( m_menuParam, ID_MNMASKPARAM, wxString( wxT("マスク(&M)") ) , wxT("Setup mask parameters"), wxITEM_NORMAL );
	m_menuParam->Append( m_menuItemMask );

	wxMenuItem* m_menuItemMark = new wxMenuItem( m_menuParam, ID_MNMARKPARAM, wxString( wxT("マークシート(&S)") ) , wxT("Setup marksheet parameters"), wxITEM_NORMAL );
	m_menuParam->Append( m_menuItemMark );

	m_menuFile->Append( -1, wxT("パラメータ(&P)"), m_menuParam );

    //
	wxMenuItem* m_menuItemAppDir = new wxMenuItem( m_menuFile, ID_MNAPPDIR, wxString( wxT("アプリケーションフォルダを開く(&O)") ) , wxT("Open application directory"), wxITEM_NORMAL );
	m_menuFile->Append( m_menuItemAppDir );
	
    m_menuFile->AppendSeparator(); // ----
	
	wxMenuItem* m_menuItemAbout = new wxMenuItem( m_menuFile, ID_MNABOUT, wxString( wxT("&About...\tF1") ) , wxT("Show about dialog"), wxITEM_NORMAL );
	m_menuFile->Append( m_menuItemAbout );
	
	m_menubar->Append( m_menuFile, wxT("ファイル(&F)") ); 
	
	this->SetMenuBar( m_menubar );
	
    //
	wxBoxSizer* bSizerTop = new wxBoxSizer( wxVERTICAL );
	
	m_panelMain = new wxPanel( this, wxID_ANY, wxDefaultPosition, wxDefaultSize, wxTAB_TRAVERSAL );

	wxBoxSizer* bSizerMain = new wxBoxSizer( wxVERTICAL );
	
    wxString logo = wxGetCwd() + wxFILE_SEP_PATH + wxT("image") + wxFILE_SEP_PATH + wxT("logo.png");
    wxBitmap bmp = wxBitmap( logo, wxBITMAP_TYPE_PNG );
	m_bitmap = new wxStaticBitmap( m_panelMain, wxID_ANY, bmp, wxDefaultPosition, wxSize( LOGO_W, LOGO_H ), 0 );
	bSizerMain->Add( m_bitmap, 0, wxALL, 5 );
	
	m_textCtrlName = new wxTextCtrl( m_panelMain, wxID_ANY, wxEmptyString, wxDefaultPosition, wxSize( 200, -1 ), 0 );
	bSizerMain->Add( m_textCtrlName, 0, wxALL, 5 );
	
	m_textCtrlAddr = new wxTextCtrl( m_panelMain, wxID_ANY, wxEmptyString, wxDefaultPosition, wxSize( 380, -1 ), 0 );
	bSizerMain->Add( m_textCtrlAddr, 0, wxALL, 5 );
	
	m_listCtrl = new wxListCtrl( m_panelMain, ID_LIST, wxDefaultPosition, wxDefaultSize, wxLC_REPORT );
    wxListItem itemCol;
    itemCol.SetText( wxT("通番") );
    m_listCtrl->InsertColumn( 0, itemCol );
    m_listCtrl->SetColumnWidth( 0, 50 );
    itemCol.SetText( wxT("年月日") );
    m_listCtrl->InsertColumn( 1, itemCol );
    m_listCtrl->SetColumnWidth( 1, 80 );
    itemCol.SetText( wxT("場所") );
    m_listCtrl->InsertColumn( 2, itemCol );
    m_listCtrl->SetColumnWidth( 2, 300 );
	bSizerMain->Add( m_listCtrl, 1, wxRIGHT|wxLEFT|wxBOTTOM|wxEXPAND, 5 );

    m_thumbPanel = new ThumbnailPanel( m_panelMain, wxID_ANY, wxDefaultPosition, wxSize( -1, 100 ), wxSUNKEN_BORDER );
	bSizerMain->Add( m_thumbPanel, 0, wxRIGHT|wxLEFT|wxBOTTOM|wxEXPAND, 5 );
	
    //
	wxBoxSizer* bSizerCmd = new wxBoxSizer( wxHORIZONTAL );
	
	m_staticText = new wxStaticText( m_panelMain, wxID_ANY, wxT("コマンド？"), wxDefaultPosition, wxDefaultSize, 0 );
	bSizerCmd->Add( m_staticText, 0, wxALL|wxALIGN_CENTER_VERTICAL, 5 );
	
	m_searchBox = new MySearchBox( m_panelMain, ID_SEARCH, wxEmptyString, wxDefaultPosition, wxDefaultSize, wxTE_PROCESS_ENTER );
    m_searchBox->SetJudgedHhs( GetJudgedHhsNo() );
	#ifndef __WXMAC__
	m_searchBox->ShowSearchButton( true );
	#endif
	m_searchBox->ShowCancelButton( false );
    m_searchBox->SetFocus();
	bSizerCmd->Add( m_searchBox, 1, wxALL|wxEXPAND|wxALIGN_CENTER_VERTICAL, 5 );
	
	m_buttonPaste = new wxButton( m_panelMain, ID_PASTE, wxT("貼付検索"), wxDefaultPosition, wxSize( 65, -1 ), 0 );
	bSizerCmd->Add( m_buttonPaste, 0, wxLEFT|wxALIGN_CENTER_VERTICAL, 10 );
	
	m_buttonKana = new wxButton( m_panelMain, ID_KANA, wxT("カナ検索"), wxDefaultPosition, wxSize( 65, -1 ), 0 );
	bSizerCmd->Add( m_buttonKana, 0, wxLEFT|wxALIGN_CENTER_VERTICAL, 5 );
	
	m_buttonHist = new wxButton( m_panelMain, ID_HIST, wxT("検索履歴"), wxDefaultPosition, wxSize( 65, -1 ), 0 );
	bSizerCmd->Add( m_buttonHist, 0, wxALL, 5 );
	
    //
	bSizerMain->Add( bSizerCmd, 0, wxEXPAND, 5 );
	
	m_panelMain->SetSizer( bSizerMain );
	m_panelMain->Layout();
	bSizerMain->Fit( m_panelMain );
    bSizerTop->Add( m_panelMain, 1, wxEXPAND|wxALL, 5 );

    //
	this->SetSizer( bSizerTop );
	this->Layout();

    // ステータスバー Statusbar
	m_statusBar = new  wxStatusBar( this, wxID_ANY, wxST_SIZEGRIP );
    int widths[] = { 200, -1, 10, 90 };
    m_statusBar->SetFieldsCount( 4, widths );
    this->SetStatusBar( m_statusBar );
    SetStatusText( wxT("被保番を入力してスタート！") );
	
	this->Centre( wxBOTH );
    LoadParam();
}

MyFrame::~MyFrame()
{
}

// Event Table
BEGIN_EVENT_TABLE( MyFrame, wxFrame )
    EVT_MENU( ID_MNABOUT,     MyFrame::OnAbout )
    EVT_MENU( wxID_EXIT,      MyFrame::OnQuit )
    EVT_MENU( ID_MNBPNT,      MyFrame::OnBPrintMode )
    EVT_MENU( ID_MNINDEX,     MyFrame::OnIndex )
    EVT_MENU( ID_MNHHSDB,     MyFrame::OnUpdateHhs )
    EVT_MENU( ID_MNCACHE,     MyFrame::OnCache )
    EVT_MENU( ID_MNDBBKUP,    MyFrame::OnDBBackup )
    EVT_MENU( ID_MNMASKPARAM, MyFrame::OnMaskParam )
    EVT_MENU( ID_MNMARKPARAM, MyFrame::OnMarkParam )
    EVT_MENU( ID_MNAPPDIR,    MyFrame::OnOpenAppDir )
    EVT_LIST_ITEM_SELECTED(  ID_LIST, MyFrame::OnSelectItem )
    EVT_LIST_ITEM_ACTIVATED( ID_LIST, MyFrame::OnDClickItem )
    EVT_BUTTON( ID_PASTE, MyFrame::OnPaste )
    EVT_BUTTON( ID_KANA,  MyFrame::OnKana )
    EVT_BUTTON( ID_HIST,  MyFrame::OnHistory )
    EVT_TEXT_ENTER( ID_SEARCH, MyFrame::OnCommand )
    EVT_SIZE( MyFrame::OnWinSize )
    EVT_MOVE( MyFrame::OnWinMove )
    EVT_CLOSE( MyFrame::SaveConfig )
END_EVENT_TABLE()

// Event Handlers & Functions
/* エンターキーフック */
void MyFrame::OnCommand( wxCommandEvent& event )
{
    wxString s = m_searchBox->GetLineText(0);

    if ( s.IsSameAs( wxT(".") ) ) {
        OpenAppDir();
        return;
    }

    if ( s.IsSameAs( wxT("99") ) ) {
        Close();
        return;
    }

    if ( s.IsSameAs( wxT("+") ) ) {
        PrintImages( m_hhsno );
        return;
    }

    wxRegEx reHhs( wxT("^0[1238][0-9]{8}$") );
    if ( reHhs.Matches( s ) ) {
        m_hhsno = s;
        UpdateList( m_hhsno );
        UpdateThumbmail( 0 );
        return;
    }

    wxRegEx reNo( wxT("^[0-9]{1,2}$") );
    if ( reNo.Matches( s ) ) {
        long n;
        s.ToLong( &n, 10 );
        n--;
        OpenHhsDir( (int)n );
        return;
    }

    SetStatusMessage( wxT("不適切な入力です．"), 0 );
    return;

    event.Skip();
}
/* パラメータを設定ファイルから読み込む */
void MyFrame::LoadParam( void )
{
    conf_file = wxGetCwd() + wxFILE_SEP_PATH + wxT("app.conf");
    config = new wxFileConfig( wxT("MyApp"), wxT("T.Mutoh"), conf_file, wxEmptyString, wxCONFIG_USE_LOCAL_FILE );

    int x, y, w, h;

    config->SetPath( wxT("/Mask") );

    config->Read( wxT("x1"), &x );
    config->Read( wxT("y1"), &y );
    config->Read( wxT("w1"), &w );
    config->Read( wxT("h1"), &h );
    m_mask1.SetPosition( wxPoint( x, y ) );
    m_mask1.SetSize( wxSize( w, h ) );

    config->Read( wxT("x2"), &x );
    config->Read( wxT("y2"), &y );
    config->Read( wxT("w2"), &w );
    config->Read( wxT("h2"), &h );
    m_mask2.SetPosition( wxPoint( x, y ) );
    m_mask2.SetSize( wxSize( w, h ) );

    config->Read( wxT("x3"), &x );
    config->Read( wxT("y3"), &y );
    config->Read( wxT("w3"), &w );
    config->Read( wxT("h3"), &h );
    m_mask3.SetPosition( wxPoint( x, y ) );
    m_mask3.SetSize( wxSize( w, h ) );

    config->Read( wxT("x1o"), &x );
    config->Read( wxT("y1o"), &y );
    config->Read( wxT("w1o"), &w );
    config->Read( wxT("h1o"), &h );
    m_mask1old.SetPosition( wxPoint( x, y ) );
    m_mask1old.SetSize( wxSize( w, h ) );

    config->Read( wxT("x2o"), &x );
    config->Read( wxT("y2o"), &y );
    config->Read( wxT("w2o"), &w );
    config->Read( wxT("h2o"), &h );
    m_mask2old.SetPosition( wxPoint( x, y ) );
    m_mask2old.SetSize( wxSize( w, h ) );

    config->Read( wxT("x3o"), &x );
    config->Read( wxT("y3o"), &y );
    config->Read( wxT("w3o"), &w );
    config->Read( wxT("h3o"), &h );
    m_mask3old.SetPosition( wxPoint( x, y ) );
    m_mask3old.SetSize( wxSize( w, h ) );

    //
    config->SetPath( wxT("/Marksheet") );

    config->Read( wxT("lmin"), &lmin );
    config->Read( wxT("lmax"), &lmax );
    config->Read( wxT("zmin"), &zmin );
    config->Read( wxT("zmax"), &zmax );

}
/* 印刷 */
void MyFrame::PrintImages( wxString hhsno )
{
    bool mask_flag = false;
    wxMessageDialog md( this, wxT("マスクしますか？"), wxT("印刷オプション"), wxYES_NO, wxDefaultPosition );
    if ( md.ShowModal() == wxID_YES ) {
        mask_flag = true;
    }

    // 印刷用の html を作成
    wxArrayString path = GetPathByHhsNo( hhsno );
    if ( path.IsEmpty() ) return;

    wxDir dir( path[0] );
    if ( !dir.IsOpened() ) return;

    wxString html;
    html = html + wxT("<html><body>\n");

    wxString file;
    bool cout = dir.GetFirst( &file, wxT("*.jpg"), wxDIR_FILES );
    bool notyet_mask = true;
    int n = 0;
    wxString tmpdir = wxGetCwd() + wxFILE_SEP_PATH + wxT("tmp") + wxFILE_SEP_PATH;
    while ( cout ) {
        file = path[0] + wxFILE_SEP_PATH + file;
        file.Replace( wxFILE_SEP_PATH, wxT("/") );
        wxString tmpjpg = wxString::Format( wxT("%stmp%d.jpg"), tmpdir, n );

        if ( notyet_mask && IsMarksheet( file, zmin, zmax, lmin, lmax ) ) {  // マークシート表面をマスクする
            wxImage img_org( file, wxBITMAP_TYPE_JPEG );
            if ( mask_flag ) {
                int ver = GetMarksheetVersion( file );
                if ( ver == 2 ) {
                    img_org.SetRGB( m_mask1, 255, 255, 255 );   // cm name
                    img_org.SetRGB( m_mask2, 255, 255, 255 );   // cm no.
                    img_org.SetRGB( m_mask3, 255, 255, 255 );   // barcode
                }
                else {  // 古いマークシート ver == 1
                    img_org.SetRGB( m_mask1old, 255, 255, 255 );   // cm name
                    img_org.SetRGB( m_mask2old, 255, 255, 255 );   // cm no.
                    img_org.SetRGB( m_mask3old, 255, 255, 255 );   // barcode
                }
            }
            img_org.SaveFile( tmpjpg );
            notyet_mask = false;
        }
        else {
            wxCopyFile( file, tmpjpg, true );
        }
        html = html + wxT("<img src=\"") + tmpjpg + wxT("\" width=\"750\" height=\"1060\"/>");
        cout = dir.GetNext( &file );
        n++;
    }
    html = html + wxT("</body></html>");

    // start printing
    wxHtmlPrintout hpout( wxT("Searcher03") );
    hpout.SetMargins( 0, 0, 0, 0, 0 );
    wxPrintDialogData pd;
    wxPrinter p( &pd );

    hpout.SetHtmlText( html, wxEmptyString, false );
    p.Print( NULL, &hpout, true );

    // end
    SetStatusMessage( wxT("被保番かフォルダ番号を．"), 0 );
}
/* 一括印刷モード */
void MyFrame::OnBPrintMode( wxCommandEvent& WXUNUSED(event) )
{
    FrameBatchPrint* bp = new FrameBatchPrint( this, wxID_ANY, wxT("一括印刷"), wxDefaultPosition, wxSize( 700, 600 ), wxCAPTION|wxFRAME_NO_TASKBAR );
    bp->SetMask1( m_mask1 );
    bp->SetMask2( m_mask2 );
    bp->SetMask3( m_mask3 );
    bp->SetMask1Old( m_mask1old );
    bp->SetMask2Old( m_mask2old );
    bp->SetMask3Old( m_mask3old );
    bp->SetMark( lmin, lmax, zmin, zmax );
    bp->Show( true );
}
/* インデックス作成ダイアログ */
void MyFrame::OnIndex( wxCommandEvent& WXUNUSED(event) )
{
    wxString rootdir;
    config->SetPath( wxT("/Index") );
    config->Read( wxT("rootdir"), &rootdir );

    IndexDialog* index = new IndexDialog( this, wxID_ANY, wxT("インデックス作成"), wxDefaultPosition, wxSize( 700, 600 ), wxDEFAULT_DIALOG_STYLE|wxSTAY_ON_TOP );
    index->SetRootdir( rootdir );
    index->ShowModal();
}
/* キャッシュ作成ダイアログ */
void MyFrame::OnCache( wxCommandEvent& WXUNUSED(event) )
{
    wxString rootdir;
    config->SetPath( wxT("/Index") );
    config->Read( wxT("rootdir"), &rootdir );

    CacheDialog* cache = new CacheDialog( this, wxID_ANY, wxT("キャッシュ作成"), wxDefaultPosition, wxDefaultSize, wxCAPTION|wxSTAY_ON_TOP );
    cache->Setting( rootdir, THUMB_W, THUMB_H );
    cache->ShowModal();
}
/* 被保険者ＤＢ更新 */
void MyFrame::OnUpdateHhs( wxCommandEvent& WXUNUSED(event) )
{
    HhsDialog* hd = new HhsDialog( this, wxID_ANY, wxT("被保険者ＤＢ更新"), wxDefaultPosition, wxSize( 500, 100 ), wxCAPTION|wxFRAME_NO_TASKBAR );
    hd->Show();
}
/* マークシートパラメータ設定ダイアログ */
void MyFrame::OnMarkParam( wxCommandEvent& WXUNUSED(event) )
{
    SetParams( 2 );
}
/* マスクパラメータ設定ダイアログ */
void MyFrame::OnMaskParam( wxCommandEvent& WXUNUSED(event) )
{
    SetParams( 0 );
}
/* 設定を保存 */
void MyFrame::SetParams( int tab ) 
{
    ParamDialog* param = new ParamDialog( this, wxID_ANY, wxT("各種パラメータの指定"), wxDefaultPosition, wxSize( 350, 250 ), wxCAPTION|wxFRAME_NO_TASKBAR|wxSTAY_ON_TOP|wxTAB_TRAVERSAL );
    param->SetMask1( m_mask1 );
    param->SetMask2( m_mask2 );
    param->SetMask3( m_mask3 );
    param->SetMask1Old( m_mask1old );
    param->SetMask2Old( m_mask2old );
    param->SetMask3Old( m_mask3old );
    param->SetMark( lmin, lmax, zmin, zmax );
    param->LoadParams();
    param->ShowWithEffect( wxSHOW_EFFECT_SLIDE_TO_BOTTOM );
    param->SelectTAb( tab );

    if ( param->ShowModal() == wxID_OK ) {
        m_mask1    = param->GetMask1();
        m_mask2    = param->GetMask2();
        m_mask3    = param->GetMask3();
        m_mask1old = param->GetMask1Old();
        m_mask2old = param->GetMask2Old();
        m_mask3old = param->GetMask3Old();
        lmin       = param->GetLmin();
        lmax       = param->GetLmax();
        zmin       = param->GetZmin();
        zmax       = param->GetZmax();

        config->SetPath( wxT("/Mask") );

        config->Write( wxT("x1"), m_mask1.GetX() );
        config->Write( wxT("y1"), m_mask1.GetY() );
        config->Write( wxT("w1"), m_mask1.GetWidth() );
        config->Write( wxT("h1"), m_mask1.GetHeight() );

        config->Write( wxT("x2"), m_mask2.GetX() );
        config->Write( wxT("y2"), m_mask2.GetY() );
        config->Write( wxT("w2"), m_mask2.GetWidth() );
        config->Write( wxT("h2"), m_mask2.GetHeight() );

        config->Write( wxT("x3"), m_mask3.GetX() );
        config->Write( wxT("y3"), m_mask3.GetY() );
        config->Write( wxT("w3"), m_mask3.GetWidth() );
        config->Write( wxT("h3"), m_mask3.GetHeight() );

        config->Write( wxT("x1o"), m_mask1old.GetX() );
        config->Write( wxT("y1o"), m_mask1old.GetY() );
        config->Write( wxT("w1o"), m_mask1old.GetWidth() );
        config->Write( wxT("h1o"), m_mask1old.GetHeight() );

        config->Write( wxT("x2o"), m_mask2old.GetX() );
        config->Write( wxT("y2o"), m_mask2old.GetY() );
        config->Write( wxT("w2o"), m_mask2old.GetWidth() );
        config->Write( wxT("h2o"), m_mask2old.GetHeight() );

        config->Write( wxT("x3o"), m_mask3old.GetX() );
        config->Write( wxT("y3o"), m_mask3old.GetY() );
        config->Write( wxT("w3o"), m_mask3old.GetWidth() );
        config->Write( wxT("h3o"), m_mask3old.GetHeight() );

        config->SetPath( wxT("/Marksheet") );

        config->Write( wxT("lmin"), lmin );
        config->Write( wxT("lmax"), lmax );
        config->Write( wxT("zmin"), zmin );
        config->Write( wxT("zmax"), zmax );

        config->Flush( false );
    }
}
/* データベースファイルのバックアップ */
void MyFrame::OnDBBackup( wxCommandEvent& WXUNUSED(event) )
{
    wxDateTime now = wxDateTime::Now();
    wxString str = now.Format( wxT("%Y%m%d%H%M%S") );

    wxString org, bk;
    wxString dbdir = wxGetCwd() + wxFILE_SEP_PATH + wxT("db");

    org = dbdir + wxFILE_SEP_PATH + wxT("hhs.db");
    bk  = dbdir + wxFILE_SEP_PATH + str + wxT("_hhs.db");
    wxCopyFile( org, bk, false );

    org = dbdir + wxFILE_SEP_PATH + wxT("ccn.db");
    bk  = dbdir + wxFILE_SEP_PATH + str + wxT("_ccn.db");
    wxCopyFile( org, bk, false );
    
    wxMessageBox( wxT("バックアップ終了．") );
    return;
}
/* アプリフォルダを開く */
void MyFrame::OnOpenAppDir( wxCommandEvent& WXUNUSED(event) )
{
    OpenAppDir();
}
void MyFrame::OpenAppDir( ) 
{
    wxString appdir = wxGetCwd();
    wxString execmd = wxT("explorer ") + appdir;
    wxExecute( execmd );
}
/* 被保険者フォルダを開く */
void MyFrame::OnDClickItem( wxListEvent& event )
{
    int i = event.GetIndex();
    OpenHhsDir( i );
    UpdateThumbmail( i );
}
/* 番号で指定したフォルダを開く */
void MyFrame::OpenHhsDir( int n )
{
    wxListItem item;
    item.SetId( n );
    item.SetColumn( 2 );
    item.SetMask( wxLIST_MASK_TEXT );
    m_listCtrl->GetItem( item );
    wxString dir = item.GetText();
    wxString execmd = wxT("explorer ") + dir;
    wxExecute( execmd );
}

/* 貼付検索 */
void MyFrame::OnPaste( wxCommandEvent& WXUNUSED(event) )
{
    wxString s;
    if ( wxTheClipboard->Open() ) {
        if ( wxTheClipboard->IsSupported( wxDF_TEXT ) ) {
            wxTextDataObject data;
            wxTheClipboard->GetData( data );
            s = data.GetText();
        }
        wxTheClipboard->Close();
    }

    wxRegEx reHhs( wxT("^0[1238][0-9]{8}$") );
    if ( reHhs.Matches( s ) ) {
        m_hhsno = s;
        UpdateList( m_hhsno );
        UpdateThumbmail( 0 );
        return;
    }
    else {
        wxMessageBox( wxT("被保険者番号ではありません．") );
    }
}

/* カナ検索ダイアログ */
void MyFrame::OnKana( wxCommandEvent& WXUNUSED(event) )
{
    KanaDialog* kana = new KanaDialog( this, wxID_ANY, wxT("カナ氏名で被保番を検索"), wxDefaultPosition, wxSize( 640, 600 ), wxCAPTION|wxFRAME_NO_TASKBAR|wxRESIZE_BORDER|wxSTAY_ON_TOP|wxTAB_TRAVERSAL );
    kana->ShowWithEffect( wxSHOW_EFFECT_SLIDE_TO_BOTTOM );

    if ( kana->ShowModal() == wxID_OK ) {
        m_hhsno = kana->GetHhsNo();
        UpdateList( m_hhsno );
        UpdateThumbmail( 0 );
    }
}
/* 検索履歴検索ダイアログ */
void MyFrame::OnHistory( wxCommandEvent& WXUNUSED(event) )
{
	HistDialog* hist = new HistDialog( this, wxID_ANY, wxT("検索履歴"), wxDefaultPosition, wxSize( 600, 500 ), wxCAPTION|wxFRAME_NO_TASKBAR|wxSTAY_ON_TOP|wxTAB_TRAVERSAL );
    hist->ShowWithEffect( wxSHOW_EFFECT_SLIDE_TO_BOTTOM );

    if ( hist->ShowModal() == wxID_OK ) {
        m_hhsno = hist->GetHhsNo();
        UpdateList( m_hhsno );
        UpdateThumbmail( 0 );
    }
}

/* 検索結果をリストアップ */
void MyFrame::UpdateList( wxString hhsno )
{
    m_listCtrl->DeleteAllItems();
    for ( int i = 0; i < m_statusBar->GetFieldsCount(); i++ ) {
        SetStatusMessage( wxEmptyString, i );
    }

    //
    wxArrayString s = wxSplit( GetHhsInfoByHhsNo( hhsno ), '_', '\\' );
    wxString history;
    if ( s.IsEmpty() ) {
        SetStatusMessage( wxT("データベースに存在しない被保険者です．"), 0 );
        history = hhsno + wxT("###");
    }
    else {
        m_textCtrlName->SetValue( s[0] );
        m_textCtrlAddr->SetValue( s[1] );
        history = hhsno + wxT("#") + s[0] + wxT("#") + s[1] + wxT("#");
    }
    m_searchBox->SetValue( hhsno );
    m_searchBox->SelectAll();
    m_searchBox->SetFocus();

    wxArrayString path = GetPathByHhsNo( hhsno );
    if ( path.IsEmpty() ) {
        SetStatusMessage( wxT("審査会履歴がありません．"), 1 );
        return;
    }

    wxRegEx reDate(wxT("(^.*20[0-9]{2}.)(20[0-9]{2})([0-2][0-9])([0-9]{2})(.*$)"));
    for ( int i = 0; i < path.GetCount(); i++ ) {
        wxString date = path[i];
        reDate.ReplaceAll( &date, wxT("\\2-\\3-\\4") );

        m_listCtrl->InsertItem( i, -1 );
        m_listCtrl->SetItem( i, 0,wxString::Format( wxT("%d"), i + 1 ) , -1 ); // No
        m_listCtrl->SetItem( i, 1, date, -1 );
        m_listCtrl->SetItem( i, 2, path[i], -1 );

        if ( i % 2 ) m_listCtrl->SetItemBackgroundColour( i, wxColour( wxT("WHEAT") ) );
    }

    SetStatusMessage( wxT("「＋」キーで通番１を印刷．"), 0 );

    //
    wxString filename = wxGetCwd() + wxFILE_SEP_PATH + wxT("tmp") + wxFILE_SEP_PATH + wxT("history");
    wxDateTime now = wxDateTime::Now();
    history = history + now.Format( wxT("%Y-%m-%d %H:%M:%S") );

    wxTextFile hist( filename );
    hist.Open();
    hist.RemoveLine( 20 );
    hist.InsertLine( history, 0 );
    hist.Write();
    hist.Close();
}
/* フォルダを選択したとき */
void MyFrame::OnSelectItem( wxListEvent& event )
{
    UpdateThumbmail( event.GetIndex() );
}
/* サムネイルを更新 */
void MyFrame::UpdateThumbmail( int n ) 
{
    wxListItem item;
    item.SetId( n );

    item.SetColumn( 2 );
    item.SetMask( wxLIST_MASK_TEXT );
    m_listCtrl->GetItem( item );

    m_thumbPanel->SetCacheImages( item.GetText() );
}
/* ステータスバーにメッセージを出力 */
void MyFrame::SetStatusMessage( wxString msg, long n )
{
    if ( GetStatusBar() ) 
        SetStatusText( msg, n );
}

/* サイズ変更 */
void MyFrame::OnWinSize( wxSizeEvent& event )
{
    this->Refresh( true, NULL );
    TellLocation();
    event.Skip();
}
/* ウィンドウ移動 */
void MyFrame::OnWinMove( wxMoveEvent& WXUNUSED(event) )
{
    TellLocation();
    return;
}
/* ウィンドウ位置とサイズを表示 */
void MyFrame::TellLocation( void ) 
{
    wxRect r = this->GetRect();
    int x = r.GetX();
    int y = r.GetY();
    int w = r.GetWidth();
    int h = r.GetHeight();

    if ( GetStatusBar() ) 
        SetStatusText( wxString::Format(wxT( "(%d,%d) %dx%d"),x,y,w,h ), 3 );
}
/* 終了 */
void MyFrame::OnQuit( wxCommandEvent& WXUNUSED(event) )
{
    Close( true );
}
/* 設定を保存 */
void MyFrame::SaveConfig( wxCloseEvent& WXUNUSED(event) )
{
    if ( !IsIconized() && !IsMaximized() ) {
        wxGetApp().rect = this->GetRect();
    }
    delete config;
    Destroy();
}
/* アバウトダイアログ */
void MyFrame::OnAbout( wxCommandEvent& WXUNUSED(event) )
{
    AboutDialog* aboutDlg = new AboutDialog( this, wxID_ANY, wxT("About this Software"), wxDefaultPosition, wxSize(320,280), wxDEFAULT_DIALOG_STYLE|wxSTAY_ON_TOP ); 
    aboutDlg->ShowModal();
}