MotoIroMozi カラーとフォントとフォントリストの選択コントロール   AC2020VB5ヘルプ目次
カラーとフォントとフォントリストの選択をするコントロールです。
Mozimoto / Iroiro / Mozimozi の3コントロールを一つにしたものです。
プロパティ/メソッド/イベントは、それぞれのコントロールと共通で、
Moto / Iro / Mozi の接頭語を付加して、このコントロールで使用しています。
Com の接頭語を持つプロパティ/イベントは、このコントロール用に特別に設定したものです。


MotoIroMozi プロパティ
ComBackStyle ComBorderColor ComBorderType ComBorderWidth
ComCaptions ComChgBtnUse ComColorInpModeBackColorEnabled ComColorInpModeForeColor
ComCurrentFont ComDlgShowEnabled ComEnabled ComEnableds
ComFont ComForeColor ComIniDataUse ComModeIroiro
ComOLEDropEnabled ComPartsCaption ComPartsEnabled ComPartsSizeData
ComPartsVisible ComPopMenuUse ComSampleBackColor ComSampleForeColor
ComSampleLetter ComSampleLetterChkData ComSizeAutoZoom ComSizeDatas
ComSizeZoomType ComTipHelpUse ComVisibles
Iroiro のプロパティ  ( Iro の接頭語が付加されています )
IroBaseCurColor IroBorderByFocus IroBorderWidth IroColorDigit
IroCurrentColor IroCurSysColorStr IroDataFontSize IroFineCurColor
IroFocus IroFrameWidth IroGradationMode IroGradValue
IroPanelBackColor IroPanelMode IroPartCurColor IroPopMenuSetDlgUse
IroPopMenuVisible IroPopMenuVisibleAll IroPropertysDataStr IroSampleDataShow
IroSamplePost IroSampleShow IroSampleSize IroSizeMode
IroSpuitBtnColor IroSpuitBtnEnabled IroSpuitMagnification IroUserColorPallet
IroUserCurSelIndex IroWebCurColor
Mozimoto のプロパティ  ( Moto の接頭語が付加されています )
MotoComboxBackColor MotoComboxForeColor MotoCurFontBold MotoCurFontItalic
MotoCurFontName MotoCurFontSize MotoCurFontStrikethrough MotoCurFontUnderline
MotoFontMakeSizeMax MotoFontSizeMax MotoFontSizeMinDEF MotoPropertysDataStr
Mozimozi のプロパティ  ( Mozi の接頭語が付加されています )
MoziBackColor MoziColumnWidth MoziColumnWidthDEFMax MoziColumnWidthDEFMin
MoziCurListIndex MoziCurrentListFont MoziFontDataLetter MoziFontDataStrsAll
MoziFontDataTipUse MoziFontSizeMaxDEF MoziFontSizeMinDEF MoziListCount
MoziListCountIsFull MoziListCountMaxDEF MoziOLEDragEnabled MoziPropertysDataStr
VBの標準プロパティ
Container DragIcon DragMode Height HelpContextID Index Left Name Object Parent TabIndex TabStop Tag ToolTipText Top Visible WhatsThisHelpID Width

MotoIroMozi メソッド
Iroiro のメソッド  ( Iro の接頭語が付加されています )
IroColorDataSYSTEM IroColorStrCPP IroColorStrExtra IroColorStrHEX
IroColorStrHTML IroColorStrLONG IroColorStrRGB IroColorValueLONG
IroColorValueRGB IroDlgShowHelp IroDlgShowMenuVisibleSet IroDlgShowUserPalletEdit
IroFormControlReSizeSet IroHalfColorByEnabled IroPanelSizeByPixel IroPopMenuShow
IroSetCurrentColor IroUserColorPalletAddItems IroUserColorPalletDelDoubleItems IroUserColorPalletDelItem
IroUserColorPalletDelSpace IroUserColorPalletFindColor IroUserColorPalletGetColor IroUserColorPalletReset
IroUserColorPalletSetColor
Mozimoto のメソッド  ( Moto の接頭語が付加されています )
MotoFontFontEqual
Mozimozi のメソッド  ( Mozi の接頭語が付加されています )
MoziAddItemByFontObj MoziAddItemByFontProperty MoziCurListFontData MoziDblClickEventDo
MoziDlgOptionShow MoziFontFontEqual MoziFontListUpDown MoziFontRandomMake
MoziHitListIndex MoziPopMenuShow MoziReMoveItem
VBの標準メソッド
Drag Move SetFocus ShowWhatsThis

MotoIroMozi イベント
ComColorInPutModeChange ComCurFontChange ComFirstShow ComModeChange
ComQueryIniFileName ComResize ComSampleColorChange
Iroiro のイベント  ( Iro の接頭語が付加されています )
IroColorCellDblClick IroCurrentColorChange IroMenuPopBeforeAfter IroOleEventDragDrop
IroOleEventDragOver IroPanelModeChange IroUserColorPalletChange IroUserCurSelIndexChange
Mozimoto のイベント  ( Moto の接頭語が付加されています )
MotoCurFontNameChange MotoCurFontSizeChange MotoOleEventDragDrop MotoOleEventDragOver
Mozimozi のイベント  ( Mozi の接頭語が付加されています )
MoziAnyPropertyChanged MoziCurListFontChange MoziCurListFontDblClick MoziFontListChange
MoziMenuPopBeforeAfter MoziOleEventDragDrop MoziOleEventDragOver
VBの標準イベント
DragDrop DragOver GotFocus LostFocus

このコントロール専用の定数 デザイン設定プロパティページ
色の設定プロパティページ
Moto CurrentFont プロパティページ Motoポップアップメニュー
MotoOLEDragDrop 関連メソッドの使用方法
Iro コントロールのキー操作 Iro カラーパネルの5モードのイメージ
Iro ポップアップメニュー Iro ポップアップメニュー項目の表示/非表示を設定
Iro ユーザーカラーパレットの編集 Iro カラーパネル使用方法のヘルプ
Iro OLEDragDrop 関連メソッドの使用方法
Mozi コントロールのキー操作 Mozi ポップアップメニュー
Mozi フォントリストのオプション設定 Mozi OLEDragDrop 関連メソッドの使用方法
AC2020VB5PublicFunc.html



MotoIroMozi プロパティ



MotoIroMozi
Property Get / Let ComBackStyle As EnumMozimotoBackStyle  [規定値] Mozimoto_Backsolid (不透明)
コントロールの背景が透明/不透明。
'BackStyle 定数
Public Enum EnumMozimotoBackStyle
    Mozimoto_BackTransparent = 0 '透明
    Mozimoto_BackSolid = 1 '塗りつぶし
End Enum
ComBorderType  ComBorderWidth  ComBorderColor


MotoIroMozi
Property Get / Let ComBorderColor As OLE_COLOR  [規定値] vbButtonShadow (灰色)
コントロールのフラットな外枠の色。
ComBorderType  ComBorderWidth  ComBackStyle


MotoIroMozi
Property Get / Let ComBorderType As EnumMozimotoBorder  [規定値] MozimotoBorder3DLine (3D外枠)
コントロール全体の外枠の状態、3D外枠、フラットな枠、枠なし、を設定。
Public Enum EnumMozimotoBorder
    MozimotoBorderNone = 0    境界線も境界線関連の要素も表示されません。
    MozimotoBorderSingle = 1   コントロールの周囲にはフラットな境界線が表示されます。
    MozimotoBorder3DLine = 2   コントロールの周囲には3Dの境界線が表示されます。
End Enum

ComBorderColor  ComBorderWidth  ComBackStyle


MotoIroMozi
Property Get / Let ComBorderWidth As EnumMozimotoBorderWidth  [規定値] MozimotoBorderWidth_2_pixel
コントロールのフラットな外枠境界線の太さをピクセル単位で取得/設定。
BorderWidth 定数
Public Enum EnumMozimotoBorderWidth
  MozimotoBorderWidth_1_pixel = 1
  MozimotoBorderWidth_2_pixel = 2
  MozimotoBorderWidth_3_pixel = 3
  MozimotoBorderWidth_4_pixel = 4
  MozimotoBorderWidth_5_pixel = 5
  MozimotoBorderWidth_6_pixel = 6
  MozimotoBorderWidth_7_pixel = 7
  MozimotoBorderWidth_8_pixel = 8
  MozimotoBorderWidth_9_pixel = 9
  MozimotoBorderWidth_10_pixel = 10
End Enum
ComBorderType  ComBorderColor  ComBackStyle


MotoIroMozi
Property Get / Let ComCaptions As String  [規定値] "フォント名|*|サイズ|*|太字|斜体|下線|取消線|文字色|背景色|lblTmp||*|"
コントロール内の部品のそれぞれのキャプションの配列を文字列にしたもの。
Caption のないコントロールの位置の文字列は " * "。
ComPartsCaption  ComEnableds  ComSizeDatas  ComVisibles


MotoIroMozi
Property Get / Let ComChgBtnUse As Boolean  [規定値] True
カラーモード/フォントモードの切り替えボタンを使用する/しない。
ComModeIroiro


MotoIroMozi
Property Get / Let ComColorInpModeBackColorEnabled As Boolean  [規定値] True
カラーパレットの選択色で、フォントのサンプルの背景色を、True = 設定できる/False = できない。
ComModeIroiro  ComColorInpModeForeColor


MotoIroMozi
Property Get / Let ComColorInpModeForeColor As Boolean  [規定値] True
カラーパレットの選択色を設定する対象を指定。
True = フォントのサンプル文字の色を設定。
False = フォントのサンプルの背景色を設定。
ComModeIroiro  ComColorInpModeBackColorEnabled  ComColorInPutModeChange


MotoIroMozi
Property Get / Set ComCurrentFont(Optional FontColor As Long) As Font  [規定値] なし
このコントロールで選択されているフォントの Font オブジェクト。
( MotoCurFont... プロパティ群のすべての値で設定される )
MotoCurFontName  MotoCurFontSize   MotoCurFontBold  MotoCurFontItalic   MotoCurFontUnderline  MotoCurFontStrikethrough   ComCurFontChange


MotoIroMozi
Property Get / Let ComDlgShowEnabled As Boolean  [規定値] True
カラーモード/フォントモードの、それぞれのメニューからの、ダイアログ表示を許可/禁止。
Iroiro.DlgShowEnabled  Mozimozi.DlgShowEnabled


MotoIroMozi
Property Get / Let ComEnabled As Boolean  [規定値] True
このコントロールの使用を許可/禁止。
Mozimoto.Enabled  Iroiro.Enabled  Mozimozi.Enabled


MotoIroMozi
Property Get / Let ComEnableds As String  [規定値] "1111111111111"
コントロール内の部品のそれぞれの Enabled を文字列にしたもの。
各コントロールの配列上の位置の文字が
"1" であれば、Enabled = True になり、
"0" であれば Enabled = False になります。
ComPartsEnabled  ComEnabled


MotoIroMozi
Property Get / Set ComFont As Font  [規定値] 親フォーム/親コントロールのフォント
コントロール全体の表示用フォントを取得/設定。


MotoIroMozi
Property Get / Let ComForeColor As OLE_COLOR  [規定値] vbButtonText
コントロール全体の文字の色。


MotoIroMozi
Property Get / Let ComIniDataUse As Boolean  [規定値] True
Ini ファイルのデーターを使用する/しない。
ComQueryIniFileName に応答して、Ini ファイルを使用するように基本設定をしていても、
特別な状況で、一時的に Ini ファイルのデーターを使用しない場合は、このプロパティを False に設定します。
ComQueryIniFileName  Mozimoto.IniDataUse  Iroiro.IniDataUse  Mozimozi.IniDataUse


MotoIroMozi
Property Get / Let ComModeIroiro As Boolean  [規定値] True
カラーモード/フォントモードの表示選択。
True = カラーモードを表示 / False = フォントモードを表示
ComModeChange


MotoIroMozi
Property Get / Let ComOLEDropEnabled As Boolean  [規定値] True
カラーモード/フォントモードの、それぞれのモードでの、ドラッグドロップを許可/禁止。
Mozimoto.OLEDropEnabled  Iroiro.OLEDropEnabled  Mozimozi.OLEDropEnabled  Mozimozi.MoziOLEDragEnabled


MotoIroMozi
Property Get / Let ComPartsCaption(ByVal rPartsID As EnumMozimotoPartsID) As String
コントロール内の部品のそれぞれの Caption を個別に設定/取得します。
EnumMozimotoPartsID の定数を使用して、各コントロールを識別します。
Property PartsXXXX()メソッドに使用する定数 EnumMozimotoPartsID
Public Enum EnumMozimotoPartsID
  MozimotoPartsフォント名 = 1
  MozimotoPartsフォントコンボ = 2
  MozimotoPartsサイズ = 3
  MozimotoPartsフォントサイズ = 4
  MozimotoParts太字 = 5
  MozimotoParts斜体 = 6
  MozimotoParts下線 = 7
  MozimotoParts取消線 = 8
  MozimotoParts作成or文字 = 9
  MozimotoParts読込or背景 = 10
  MozimotoPartsサンプル = 11
  MozimotoPartsChangeBtn = 12
  MozimotoPartsFontColorBox = 13
End Enum
ComCaptions


MotoIroMozi
Property Get / Let ComPartsEnabled(ByVal rPartsID As EnumMozimotoPartsID) As Boolean
コントロール内の部品のそれぞれの Enabled を個別に設定/取得します。
EnumMozimotoPartsID の定数を使用して、各コントロールを識別します。
ComEnableds  ComEnabled


MotoIroMozi
Property Get / Let ComPartsSizeData(ByVal rPartsID As EnumMozimotoPartsID, Optional LeftTwips As Single = 0, Optional TopTwips As Single = 0, Optional WidthTwips As Single = 0, Optional HeightTwips As Single = 0) As Boolean
コントロール内の部品のそれぞれの SizeData を個別に設定/取得します。
EnumMozimotoPartsID の定数を使用して、各コントロールを識別します。
'例 TmpBoolean = MotoIroMozi1.PartsSizeData(rPartsID, wX, wY, wWD, wHT) 'サイズデーターを取得。
'例 MotoIroMozi1.PartsSizeData(rPartsID, rx, rY, rWD, rHT) = True 'サイズデーターを設定。

ComSizeDatas  ComSizeAutoZoom  ComSizeZoomType  ComResize


MotoIroMozi
Property Get / Let ComPartsVisible(ByVal rPartsID As EnumMozimotoPartsID) As Boolean
コントロール内の部品のそれぞれの Visible を個別に設定/取得します。
EnumMozimotoPartsID の定数を使用して、各コントロールを識別します。
ComVisibles


MotoIroMozi
Property Get / Let ComPopMenuUse As Boolean  [規定値] True
ポップアップメニューの使用を許可/禁止。
Mozimoto.PopMenuUse  Iroiro.PopMenuUse  Mozimozi.PopMenuUse


MotoIroMozi
Property Get / Let ComSampleBackColor As OLE_COLOR  [規定値] vbWhite
フォントのサンプルの背景色。
ComSampleForeColor  ComSampleLetter


MotoIroMozi
Property Get / Let ComSampleForeColor As OLE_COLOR  [規定値] vbBlack
フォントのサンプル文字の色。
ComSampleBackColor  ComSampleLetter


MotoIroMozi
Property Get / Let ComSampleLetter As String  [規定値] "123ABCあいう文字"
フォントリストのサンプル書体が表示する文字列。
ComSampleLetterChkData  ComSampleBackColor   ComSampleForeColor


MotoIroMozi
Property Get ComSampleLetterChkData(ByVal v As String) As String
新しく設定するサンプル書体の文字列 v の正当性を調べて、エラーがあればそれを取り除いて返します。
ComSampleLetter


MotoIroMozi
Property Get / Let ComSizeAutoZoom As Boolean  [規定値] True
コントロール全体のサイズが変更される場合に、それぞれの部品も同じ比率で、移動/拡大/縮小するようにします。
ComSizeZoomType  ComSizeDatas   ComPartsSizeData  ComResize


MotoIroMozi
Property Get / Let ComSizeDatas As String  [規定値] ( 専用プロパティページで設定します )
コントロール内の全ての部品の、それぞれの位置とサイズを文字列にして連結したもの。
ComPartsSizeData  ComSizeAutoZoom   ComSizeZoomType  ComResize


MotoIroMozi
Property Get / Let ComSizeZoomType As EnumMozimotoSizeZoomType  [規定値] MozimotoSizeZoomXXYY (縦横両方にズームする)
コントロール内の部品が、ズーム (移動/拡大/縮小) する場合に、縦横両方/横方向だけ/縦方向だけ、のズームを選択指定。
SizeZoomType 定数
Public Enum EnumMozimotoSizeZoomType
  MozimotoSizeZoomXXYY = 0 '縦横両方にズームする
  MozimotoSizeZoomXX = 1  '横方向にのみズームする
  MozimotoSizeZoomYY = 2  '縦方向にのみズームする
End Enum
ComSizeAutoZoom  ComSizeDatas  ComResize


MotoIroMozi
Property Get / Let ComTipHelpUse As Boolean  [規定値] True (チップヘルプを表示)
コントロール内の各部品のチップヘルプを表示/非表示。
Mozimoto.TipHelpUse


MotoIroMozi
Property Get / Let ComVisibles As String  [規定値] "1111111111111"
コントロール内の部品のそれぞれの Visible を文字列にしたもの。
各コントロールの配列上の位置の文字が
"1" であれば、Visible = True になり、
"0" であれば Visible = False になります。
ComPartsVisible



MotoIroMozi メソッド


このコントロール独自のメソッドはありません。
Mozimoto / Iroiro / Mozimozi のヘルプファイルを参照。






MotoIroMozi イベント



MotoIroMozi
Event ComColorInPutModeChange(ByVal rForeColorInPutMode As Boolean)
カラーの設定モードが変更されました。
ComColorInpModeForeColor   ComColorInpModeBackColorEnabled   ComModeIroiro


MotoIroMozi
Event ComCurFontChange(ByVal rCurFont As StdFont, ByVal rChgProperty As String, ByVal rFontColor As Long)
このコントロールのフォントが変更されたときに発生します。
ByVal rCurFont As StdFont = 新しいフォントオブジェクト
ByVal rChgProperty As String = 変更されたプロパティの名前の文字列
ByVal rFontColor As Long = 新しいフォントの色
CurFontNameChange / CurFontSizeChange イベントとダブって発生する場合もあります。
ComCurrentFont   MotoCurFontNameChange   MotoCurFontSizeChange


MotoIroMozi
Event ComFirstShow()
このコントロールが最初に表示される直前に ComQueryIniFileName イベントの後に呼び出されます。
INI ファイルのデーターでプロパティが再設定されため、コントロールや親フォームの状態変更が必要になる場合に使用します。
ComQueryIniFileName  Mozimoto.FirstShow  Iroiro.FirstShow  Mozimozi.FirstShow


MotoIroMozi
Event ComModeChange(ByVal rComModeIroiro As Boolean)
カラーモード/フォントモードが切り替えられたときに発生します。
ComChgBtnUse  ComModeIroiro


MotoIroMozi
Event ComQueryIniFileName(wAppPath As String, wAppEXEName As String, wOwnerFormName As String)
このイベントは、コントロールの状態を、次回の起動時に復元させるために使用します。
コントロールが最初に表示される直前に INI ファイル のフォルダ名とファイル名を要求します。
ファイル名を指定した場合、そのファイル名の INI ファイル が、アプリケーションに唯一つだけ作成されます。
複数コントロールを使用する場合は、INI ファイル内に各エントリー wOwnerFormName + ThisControl.Name が作成されます。
INI ファイル に有効なプロパティデーターがあれば、そのデーターでプロパティを再設定します。
また、次回にプロパティの変更内容を再使用できるように、コントロールを破棄する時に INI ファイル を自動保存します。
INI ファイルの規定の拡張子は iniACTX で変更できません。
wAppPath には保存するフォルダのフルパス名を指定します。
wAppEXEName にはファイル名を指定します。
wOwnerFormName には、コントロールが存在するフォームの .Name を指定します。もしあれば .Index も文字列にして連結して指定します。
これらの文字列の設定をしない場合には、INI ファイルは作成されず、コントロールの状態は保存されずにすべて消失します。
ただし、ユーザー自身がデーターを保存する場合には、MotoPropertysDataStr / IroPropertysDataStr / MoziPropertysDataStr の文字列を使用して、コントロールの状態を保存できます。
Private Sub MotoIroMozi1_ComQueryIniFileName(wAppPath As String, wAppEXEName As String, wOwnerFormName As String)
    'INI ファイルを使用して、コントロールの状態を保存/再現する場合は、通常以下のコーディングを使用します。
    wAppPath = App.path: wAppEXEName = App.EXEName: wOwnerFormName = Me.Name
End Sub
ComIniDataUse  ComFirstShow   Mozimoto.QueryIniFileName  Iroiro.QueryIniFileName   Mozimozi.QueryIniFileName


MotoIroMozi
Event ComResize()
コントロールのサイズが変更されたときに発生します。


MotoIroMozi
Event ComSampleColorChange(ByVal rOpCodeBack0Fore1 As Long, ByVal rColor As Long)
フォントサンプルの背景色、あるいは文字色が、変更された直後に発生します。
ByVal rOpCodeBack0Fore1 As Long 0 = 背景色が変更 / 1 = 文字色が変更
ByVal rColor As Long       新しい背景色 / 文字色
ComSampleBackColor  ComSampleForeColor







MotoIroMozi
このコントロール専用の定数
このコントロール専用の定数はありません
Mozimoto / Iroiro のヘルプファイルを参照。




MotoIroMozi
デザイン設定プロパティページ
このコントロールの部品の位置とサイズ、文字列、Enabled、Visible、等を設定します。
赤い枠線をドラッグして、位置とサイズを変更できます。
黄色いチップをドラッグしてコントロール全体のサイズを変更できます。
[] ボタンをクリックすれば、非表示になっているコントロールを、再表示できます。
フォーム左上隅の黄色いラベル  をクリックして、チップヘルプを表示できます。

ComSizeDatas  ComCaptions   ComVisibles  ComEnableds  ComSampleLetter


MotoIroMozi
色の設定プロパティページ
このコントロールの色をまとめて設定します。
フォーム左上隅の黄色いラベル をクリックして、チップヘルプを表示できます。

ComBorderColor  ComForeColor   ComSampleBackColor  ComSampleForeColor   IroBaseCurColor  IroCurrentColor   IroFineCurColor  IroPanelBackColor   IroPartCurColor  IroSpuitBtnColor   IroWebCurColor  MotoComboxBackColor   MotoComboxForeColor  MoziBackColor