jvSetFieldText(テキストフィールドデータ設定)

キストフィールド、セレクトボタンフィールドに描画データを設定します。
 
[構文]
 
Function jvSetFieldText(ByVal jid As Long, ByVal fieldName As String, ByVal text As String) As Long
 
C言語
int jvSetFieldText(int jid, char *fieldName, char *text);
 
JAVA
int jvSetFieldText(int jid, String fieldName, String text);
 
Delphi
Function jvSetFieldText(jid: Longint; fieldName, text: PAnsiChar): Longint;
 

設定項目

内容

jid

jvCreateで取得したジョブID

fieldName

フィールド名称

text

描画するデータ

 
リターンコード
 

定数

内容

 

0

正常終了

JV_ERR_JOBID

-3

ジョブIDエラー

JV_ERR_PARAMETER

-2

パラメータエラー

JV_ERR_MEMORY

-4

メモリ関連エラー

JV_ERR_FIELD_OVERFLOW

-72

フィールドオーバーフロー

JV_ERR_FIELD_FORMAT

-71

編集子が不正

JV_ERR_FIELD_NAME

-70

指定されたフィールドが存在しない

 
[解説]
 
jvSetFieldTextはjvStartDocからjvEndDocまでの間でコールします。
UNICODEの文字列を描画する場合は、jvSetFieldTextWを使います。
描画文字列には、外字を使用することができます。
 
text の値が編集子の桁数を超えた場合はオーバーフローとなります。オーバーフロー時の処理は、編集子が文字型のフィールドではjvSetLong、編集子が数値型のフィールドではjvSetStringで設定することができます。
セレクトボタンフィールドの場合は、text に 1 または 0 を設定します。1は選択、0は選択解除です。
 
外字の描画    
フィールド編集子   
 
[コーディング例]
 
Dim jid&, ret&
jid = jvCreate(JV_PRINTER, form1.hWnd, Printer.hDC, 0, 0, 0, "")
ret = jvSetForm(jid, "c:\JiveReport\見積書.jfm", 1, "", 100, 0, 0)
ret = jvStartDoc(jid, "見積書", "")
ret = jvSetFieldText(jid, "担当者名", "山田太郎")
ret = jvSetFieldText(jid, "チェック", "1")
|
ret = jvDrawForm(jid, JV_FORM_FIELD)
ret = jvEndPage(jid)
ret = jvEndDoc(jid)
ret = jvClose(jid)