|目次|前ページ|次ページ|
───────────────────────────────────
8.メモの追加シーケンス
追加前の仕様は、ビジュアルコントロールモジュールに記載されています。
編集領域番号は、0 <--> 63 と 531,532,533,534 を指定できます。
$と^はキー入力が禁止されています。
※キーボードイベントの仕様を追加する。[2008-3-4]修正
※keycode=0:<RETURN><ESCAPE><END><HELP>
※ :<F1><F2><F3><F4><F5><F6><F7><F8><F9><F10><F11><F12>
※keycode=1:<RETURN><ESCAPE><END><HELP>
※keycode=2:<RETURN><ESCAPE>
※keycode=3:<RETURN>
※keycode=4:なし
※keycode=5:<ESCAPE><HELP>
※ :<F1><F2><F3><F4><F5><F6><F7><F8><F9><F10><F11><F12>
※keycode=6:<ESCAPE><HELP>
※keycode=7:<ESCAPE>
---------------------------------------------------------------------
■<<<メモに表示する文字列をファイルからロードする>>>
---------------------------------------------------------------------
ファイル名はテキストファイル(.TXT)でないとエラーとなります。
[1] シーケンス
cid <== メモのコントロールid番号
edit <-- ファイル名文字列を格納する領域(531,532,533,534)32763文字まで
0<->63 255文字まで
editstr <-- ファイル名
<esc>%11;610;cid;edit;; sp M
【応答メッセージ】がtelnetサーバから送信されて来ます
---------------------------------------------------------------
[2] Cache用共通関数
cid <== メモのコントロールid番号
edit <-- ファイル名文字列を格納する領域(531,532,533,534)32763文字まで
0<->63 255文字まで
editstr <-- ファイル名
D LOADFROMFILE^ZVCMMMO6
【応答メッセージ】
Rhojyo -> メモの行数
Rselno -> ユーザがテキストを変更(0:無 1:変更)
Rselcnt -> メモの文字列の長さ文字数($L)(含む<cr><lf>)
Rerr2 -> 内部エラー(処理の過程や例外発生エラー)
---------------------------------------------------------------------
■<<<メモに表示する文字列をファイルに保存する>>>
---------------------------------------------------------------------
ファイル名はテキストファイル(.TXT)でないとエラーとなります。
[1] シーケンス
cid <== メモのコントロールid番号
edit <-- ファイル名文字列を格納する領域(531,532,533,534)32763文字まで
0<->63 255文字まで
editstr <-- ファイル名
<esc>%11;611;cid;edit;; sp M
【応答メッセージ】がtelnetサーバから送信されて来ます
---------------------------------------------------------------
[2] Cache用共通関数
cid <== メモのコントロールid番号
edit <-- ファイル名文字列を格納する領域(531,532,533,534)32763文字まで
0<->63 255文字まで
editstr <-- ファイル名
D SAVETOFILE^ZVCMMMO6
【応答メッセージ】
Rhojyo -> メモの行数
Rselno -> ユーザがテキストを変更(0:無 1:変更)
Rselcnt -> メモの文字列の長さ文字数($L)(含む<cr><lf>)
Rerr2 -> 内部エラー(処理の過程や例外発生エラー)
---------------------------------------------------------------------
■<<<メモに表示する文字列をストリングリストからロードする>>>
---------------------------------------------------------------------
行数はストリングリストの件数。
[1] シーケンス
cid <== メモのコントロールid番号
srccid <-- ストリングリストのコントロールid番号
appendsw <-- 0:クリアしてから 1:末尾に追加
<esc>%11;621;cid;;;srccid;appendsw;; sp M
【応答メッセージ】がtelnetサーバから送信されて来ます
---------------------------------------------------------------
[2] Cache用共通関数
cid <== メモのコントロールid番号
srccid <-- ストリングリストのコントロールid番号
appendsw <-- 0:クリアしてから 1:末尾に追加
D LOADFROMLIST^ZVCMMMO6
【応答メッセージ】
Rhojyo -> メモの行数
Rselno -> ユーザがテキストを変更(0:無 1:変更)
Rselcnt -> メモの文字列の長さ文字数($L)(含む<cr><lf>)
Rerr2 -> 内部エラー(処理の過程や例外発生エラー)
---------------------------------------------------------------------
■<<<メモに表示する文字列をストリングリストに保存する>>>
---------------------------------------------------------------------
[1] シーケンス
cid <== メモのコントロールid番号
dstcid <-- ストリングリストのコントロールid番号
<esc>%11;622;cid;;;dstcid sp M
【応答メッセージ】がtelnetサーバから送信されて来ます
---------------------------------------------------------------
[2] Cache用共通関数
cid <== メモのコントロールid番号
dstcid <-- ストリングリストのコントロールid番号
D SAVETOLIST^ZVCMMMO6
【応答メッセージ】
Rhojyo -> メモの行数
Rselno -> ユーザがテキストを変更(0:無 1:変更)
Rselcnt -> メモの文字列の長さ文字数($L)(含む<cr><lf>)
Rerr2 -> 内部エラー(処理の過程や例外発生エラー)
---------------------------------------------------------------------
■<<<メモに表示する文字列をストリームからロードする>>>
---------------------------------------------------------------------
[1] シーケンス
cid <== メモのコントロールid番号
srccid <-- ストリームのコントロールid番号
offset <-- ソースストリームの読み書きを行う位置指定
0: ストリームの読み書きを行うオフセット値を0に
設定してから行います(先頭から)
1: ソースストリームの現在オフセット値
<esc>%11;670;cid;;;srccid;offset;; sp M
【応答メッセージ】がtelnetサーバから送信されて来ます
---------------------------------------------------------------
[2] Cache用共通関数
cid <== メモのコントロールid番号
srccid <-- ストリームのコントロールid番号
offset <-- ソースストリームの読み書きを行う位置指定
0: ストリームの読み書きを行うオフセット値を0に
設定してから行います(先頭から)
1: ソースストリームの現在オフセット値
D LOADFROMSTREAM^ZVCMMMO6
【応答メッセージ】
Rhojyo -> メモの行数
Rselno -> ユーザがテキストを変更(0:無 1:変更)
Rselcnt -> メモの文字列の長さ文字数($L)(含む<cr><lf>)
Rerr2 -> 内部エラー(処理の過程や例外発生エラー)
---------------------------------------------------------------------
■<<<メモに表示する文字列をストリームに保存する>>>
---------------------------------------------------------------------
[1] シーケンス
cid <== メモのコントロールid番号
dstcid <-- ストリームのコントロールid番号
offset <-- 保存先ストリームの読み書きを行う位置指定
0: 保存先ストリームの読み書きを行うオフセット値を0に
設定してから行います(先頭に保存)
1: 保存先ストリームの現在オフセット値
<esc>%11;671;cid;;;dstcid;offset;; sp M
【応答メッセージ】がtelnetサーバから送信されて来ます
---------------------------------------------------------------
[2] Cache用共通関数
cid <== メモのコントロールid番号
dstcid <-- ストリームのコントロールid番号
offset <-- 保存先ストリームの読み書きを行う位置指定
0: 保存先ストリームの読み書きを行うオフセット値を0に
設定してから行います(先頭に保存)
1: 保存先ストリームの現在オフセット値
D SAVETOSTREAM^ZVCMMMO6
【応答メッセージ】
Rhojyo -> メモの行数
Rselno -> ユーザがテキストを変更(0:無 1:変更)
Rselcnt -> メモの文字列の長さ文字数($L)(含む<cr><lf>)
Rerr2 -> 内部エラー(処理の過程や例外発生エラー)
---------------------------------------------------------------------
■<<<メモに表示する文字列を別のストリングリストから設定する>>>
---------------------------------------------------------------------
[1] シーケンス
cid <== メモのコントロールid番号
srccid <-- ストリングリストのコントロールid番号
<esc>%11;673;cid;;;srccid sp M
【応答メッセージ】がtelnetサーバから送信されて来ます
---------------------------------------------------------------
[2] Cache用共通関数
cid <== メモのコントロールid番号
srccid <-- ストリングリストのコントロールid番号
D ASSIGN6^ZVCMMMO6
【応答メッセージ】
Rhojyo -> メモの行数
Rselno -> ユーザがテキストを変更(0:無 1:変更)
Rselcnt -> メモの文字列の長さ文字数($L)(含む<cr><lf>)
Rerr2 -> 内部エラー(処理の過程や例外発生エラー)
───────────────────────────────────
---------------------------------------------------------------------
■<<<文字列リストの行数を取得 >>>
---------------------------------------------------------------------
[1] シーケンス
cid <== メモのコントロールid番号
<esc>%11;701;cid;;; sp M
【応答メッセージ】がtelnetサーバから送信されて来ます
---------------------------------------------------------------
[2] Cache用共通関数
cid <== メモのコントロールid番号
D COUNT^ZVCMMMO6
【応答メッセージ】
Rhojyo -> メモの行数
Rselno -> ユーザがテキストを変更(0:無 1:変更)
Rselcnt -> メモの文字列の長さ文字数($L)(含む<cr><lf>)
Roption -> x方向文字位置;y方向文字位置;選択開始文字位置;選択長さ;テキスト長さ
[1]x方向文字位置 -> 現在カーソル位置の桁方向の文字数位置($L)
[2]y方向文字位置 -> 現在カーソル位置の行方向の位置
[3]選択開始文字位置 -> 現在カーソル位置の全テキスト<CR><LF>結合した時の
先頭からの文字数位置
[4]選択長さ -> 選択されている文字列の文字数($L)
[5]テキスト長さ -> メモ全体<CR><LF>結合した時の文字数($L)
※イベントで返される情報のバイト位置でなく文字数位置に変更されました
Rmain -> 行数
---------------------------------------------------------------------
■<<<<CR><LF>区切りで全ての文字列を結合し取得する >>>
---------------------------------------------------------------------
[1] シーケンス
cid <== メモのコントロールid番号
rect <-- 531,532,533,534 を指定
<esc>%11;702;cid;;rect;;; sp M
【応答メッセージ】がtelnetサーバから送信されて来ます
rectの領域 --> <CR><LF>区切りで結合した文字列
---------------------------------------------------------------
[2] Cache用共通関数
cid <== メモのコントロールid番号
rect <-- 531,532,533,534 を指定
D CRLFTEXT^ZVCMMMO6
【応答メッセージ】
Rhojyo -> メモの行数
Rselno -> ユーザがテキストを変更(0:無 1:変更)
Rselcnt -> メモの文字列の長さ文字数($L)(含む<cr><lf>)
<CR><LF>区切りで全て結合したときの文字数($L)
Roption -> x方向文字位置;y方向文字位置;選択開始文字位置;選択長さ;テキスト長さ
rectの領域 -> <CR><LF>区切りで結合した文字列
rectstr -> <CR><LF>区切りで結合した文字列
[*]rect文字列を取得するにはコントロールA等の終端文字を指定します
Rerr2 -> 内部エラー(処理の過程やAPIの戻り値エラー)
---------------------------------------------------------------------
■<<<<CR><LF>で文字列リストの一部分を結合し取得する >>>
---------------------------------------------------------------------
[1] シーケンス
cid <== メモのコントロールid番号
edit <-- (531,532,533,534)32763文字まで
0<->63 255文字まで
editstr <--取得開始位置インデックス(0,1,2,...)
rect <-- 531,532,533,534 を指定
count --> 取得希望件数
0:以降全件を取得
取得開始位置インデックス=0にすると先頭から全件
<esc>%11;703;cid;edit;rect;count;; sp M
【応答メッセージ】がtelnetサーバから送信されて来ます
rectの領域 --> 文字列リストの一部分を<CR><LF>で結合した取得文字列
[*]文字列が引用符で囲まれることはありません!
---------------------------------------------------------------
[2] Cache用共通関数
cid <== メモのコントロールid番号
edit <-- (531,532,533,534)32763文字まで
0<->63 255文字まで
editstr <--取得開始位置インデックス(0,1,2,...)
rect <-- 531,532,533,534 を指定
count --> 取得希望件数
0:全件を取得
取得開始位置インデックス=0にすると先頭から全件
D CRLFPORTION^ZVCMMMO6
【応答メッセージ】
Rhojyo -> 最後に取り出しされた位置インデックス(行位置)
取得された件数がゼロ件の場合は 0 となる
Rselno -> ユーザがテキストを変更(0:無 1:変更)
Rselcnt -> メモの文字列の長さ文字数($L)(含む<cr><lf>)
rectstrの(<CR><LF>区切りで全て結合したとき)文字数($L)
Rmain -> 実際に取得された件数(最大インデックスを越えた場合countと異なる)
Roption -> x方向文字位置;y方向文字位置;選択開始文字位置;選択長さ;テキスト長さ
rectの領域 -> 文字列リストの一部分を<CR><LF>で結合した取得文字列
[*]文字列が引用符で囲まれることはありません!
rectstr ->文字列リストの一部分を<CR><LF>で結合した取得文字列
Rerr2 -> 内部エラー(処理の過程やAPIの戻り値エラー)
---------------------------------------------------------------------
■<<<<CR><LF>区切りで全ての文字列を設定する >>>
---------------------------------------------------------------------
[1] シーケンス
cid <== コントロールid番号
edit <-- 531,532,533,534 を指定
<esc>%11;718;cid;edit;;;; sp M
【応答メッセージ】がtelnetサーバから送信されて来ます
---------------------------------------------------------------
[2] Cache用共通関数
cid <== コントロールid番号
edit <-- 531,532,533,534 を指定
[*]<CR>または<LF>で区切ったテキストを指定します
D SETTEXT6^ZVCMMMO6
【応答メッセージ】
Rhojyo -> メモの行数
Rselno -> ユーザがテキストを変更(0:無 1:変更)
Rselcnt -> メモの文字列の長さ文字数($L)(含む<cr><lf>)
<CR><LF>区切りで全て結合したときの文字数($L)
Roption -> x方向文字位置;y方向文字位置;選択開始文字位置;選択長さ;テキスト長さ
Rerr2 -> 内部エラー(処理の過程やAPIの戻り値エラー)
---------------------------------------------------------------------
■<<<$と^はキー入力が禁止許可を設定 >>>
---------------------------------------------------------------------
[1] シーケンス
cid <== メモのコントロールid番号
sw <-- 0:$と^はキー入力が禁止(デフォルト値) 1:許可 を指定
<esc>%11;791;cid;;;sw;;; sp M
【応答メッセージ無】
---------------------------------------------------------------
[2] Cache用共通関数
cid <== メモのコントロールid番号
sw <-- 0:$と^はキー入力が禁止(デフォルト値) 1:許可 を指定
D DOLINPUT^ZVCMMMO6
【応答メッセージ無】
---------------------------------------------------------------------
■<<<メモ応答文字列の有無を設定 >>>
---------------------------------------------------------------------
[1] シーケンス
cid <== メモのコントロールid番号
sw <-- 0:全文字列応答 1:NULL 2:NULL
<esc>%11;792;cid;;;sw;;; sp M
【応答メッセージ無】
---------------------------------------------------------------
[2] Cache用共通関数
cid <== メモのコントロールid番号
sw <-- 0:応答に含めない 1:応答に含める を指定
D RESPONSETEXT^ZVCMMMO6
【応答メッセージ無】
───────────────────────────────────
8
|目次|前ページ|次ページ|