71件 3ページ
123

No

タイトル

投稿者名

投稿日

投稿時刻

更新日

更新時刻

メッセージ

メッセージ数

チェック

作業時間
1044 ブランドスーパーコピー代引き後払い専門店 ゲスト 2026/01/20 16:21:00 2026/01/20 16:21:00 BUYNIU株式会社 ( ブランドスーパーコピー通販サイト )
代金引換（代引き）対応
海外ブランドのバッグ、財布、時計、（レプリカ品）の販売
ブランドスーパーコピー代引き後払い専門店！www.buyniu.com/
ロレックス スーパーコピーwww.buyniu.com/brand/rolex/
ブランドスーパーコピーwww.buyniu.com/all-products/
ルイヴィトンwww.buyniu.com/bags/louisvuitton-bags/		 0 ● 0
1043 セリーヌ コピー ゲスト 2025/11/08 11:05:02 2025/11/08 11:05:02 セリーヌ コピー パーカーは、独特なデザインと都会的なセンスで、個性を際立たせるストリートファッションの定番アイテムです。

アルバムのURL：
www.aaakopi.com/brand-90-c0.html セリーヌ コピー
www.aaakopi.com/category-9-b0.html レディースファッション コピー 激安
vogcopyledger.boo-log.com/e601481.html		 0 ー 0
1042 変数エリアへの数字の入力 ゲスト 2025/03/27 18:14:27 2025/03/28 16:48:47 4D　20.6　

変数エリアへの数字の入力方法ですが
1.キーボードで直接入力　可能
2.ボタングリッドを使用して入力　可能
でした

3.「ポップアップ/ドロップダウンリスト」を利用して数値入力を試みましたができません

これはしかたないのでしょうか？

 2 ー 0
773 オブジェクト変数に格納されている数値の取りだしに関して ゲスト 2018/03/28 17:07:26 2023/07/23 17:48:14 4Dv13を使用しています。

10個以上のオブジェクト変数に格納され、表示されている数値をクリック時にそれぞれ取りだし計算に使用したいのですがうまくいきません。

10個以上のオブジェクト変数があるので、一個ずつメソッドを書くのは労力がかかります。
一つのメソッドを作成し、それを共有して計算させたいと考えています。

一個ずつであれば「vDay7」のオブジェクト変数の数値を「vday」に対して以下のように書けばクリック時に数値を代入することが出来ます。

vday:=vDay7

この「vDay@」は10個以上あるので以下のように考えてみました。

C_TEXT($day)

$day:=OBJECT Get name(Object current)//クリックしたオブジェクト名を取得

vday:=$day

「$day」をアラートで見ると「vDay7」か取得できていることが確認できてます。
「vday」に返される結果は「vDay7」となり自分が思ったように動いてくれませんし、「$day」をオブジェクト変数にしたいのですが、それらしきメソッドが見つかりません。

どなたか教えて頂けませんでしょうか？
宜しくお願いします。
 4 ● 0
668 オブジェクトについて ゲスト 2015/09/16 15:21:42 2023/03/20 20:58:43 4Dv11(Windows)を使用しています。
4DでExcelやPDFファイルを保存することは出来ないでしょうか？
イメージ的には、FileMakerのようにオブジェクトデータとして保存したいのですが...
また、FileMakerでは取り込んだオブジェクトは実データファイルには持たず、外部に保存し、あたかもDB内にあるようにすることが出来ます。
このようなことが4Dで出来ませんでしょうか？
v15で可能であれば、バージョンアップも検討しています。
 5 ● 0
1025 メソッド記述のこんなやり方知りませんか？ ゲスト 2023/03/14 09:04:49 2023/03/17 11:48:48 こんにちは、初めて投稿させて頂きます。
4Dの資料はWEB上でもなかなか無いのでこの様なサイトはとてもありがたいです。
よろしくお願い致します。

かなり昔に4Dを齧った事がありまして、あれからずっと触れてなくて
最近、仕事先でちょっとしたデーターベースでの管理が必要になり
「これなら昔やった4Dでやれば効率的な管理表が作れるな！」と思い
昔の古いバージョン（6.8）の4Dを引っ張り出して現在構築中です。

そこで（しょーもない）質問なのですが、

メソッドエディターで、ルーチンリストからコマンドを選んで入力する際に
アルファベット順に並んでるコマンドを順に辿っていくやり方しかなかったでしたっけ？

私の記憶では確か、、、例えば　INPUT FORM　を探したいときは
頭文字の　I　と何かキーボードのキーを操作すれば　I　から始まるコマンドの先頭に
辿り着ける、やり方があったような気がします。

今はこのやり方を忘れてしまい、コマンドを選択するのにその都度長々と
下向きの矢印を押して欲しいコマンドが出てくるのを待ってる状態で
とても効率が悪いです。

そのやり方をご存じでしたら、教えてください。
もし、昔の記憶で私の勘違いでしたら、
「そんな方法聞いたことないよ！」と言ってください。

どうぞ、よろしくお願い致します。
 3 ー 0
1004 USE CHARACTER SETの代わり ゲスト 2022/07/07 10:52:30 2022/07/07 10:52:30 いつも参考にさせて貰ってます。ありがとうございます。

今でも4D_2003ベースのアプリを使っているお客さんがいます。
「.tsv」形式でcreate documentしようとしているのですが、
お客さんからshift-JISで書出すのではなく、
utf-8で出力して欲しいと言われているのですが、
character set()コマンドで可能でしょうか？
また、どのように指定すれば出力できますでしょうか。
あと、セットしたCharacterの初期化もどのように出来ますでしょうか？

v16だと、

USE CHARACTER SET("Shift-JIS";1)
～
USE CHARACTER SET(*;1)
のように出力前・出力後に指定出来るのですが、、

4D2003のマニュアルを探しても見つけられず、困っております。

よろしくお願いします。		 0 ー 0
746 エクセルのファイルをロードする ゲスト 2017/02/02 16:34:18 2022/05/06 10:25:05 以前のゲストさん（「オブジェクトについて」）の内容が非常に興味深く、以下のように自分でも試してみたのですが、ブラウザが立ち上がるだけで、うまくいきません。どなたか、アドバイスを頂けないでしょうか？

出力モードで各行に閲覧というボタンを配置して、やってみました。

C_TEXT($url)
If (Form event=On Clicked )
　CONFIRM("選択された文書を表示しますか？")
　　If (OK=1)
　　　$RecNum:=Selected record number([File_Manage])
　　　GOTO SELECTED RECORD([File_Manage];$RecNum)
　　　$url:=[File_Manage]url
　　　ALERT($url) 　　　　
　　　OPEN WEB URL($url)
　End if
　Else
　　CANCEL
　　ALERT("キャンセルしました。")
　 End if

パス名は"A：￥---\----\test.xls"というふうに表示されます。

よろしくお願いします。
 5 ー 0
983 インタープリタモードへの切り替え ゲスト 2022/02/04 11:05:52 2022/02/05 09:47:36 コンパイルモードで再起動を試してから
インタープリタモードへ戻れなくなりました。
alt+コントロール+i を押しても何もおきません。
インタープリタモードへ戻るにはどうすればいいのでしょうか？

v19です。		 2 ー 0
982 4DのWEBサーバーで ゲスト 2022/01/20 11:56:40 2022/02/04 23:36:04 ４Dのweb機能について、質問です。
例えば、ユーザの名前を”ラブ”で始まるものを検索したいとき、かなり昔のの４Dでは、shift-jisコードのURLエンコードで
ttp://アドレス/search_user?name=%83%89%83u%25
のように４Dへリクエストして、On Web Connection で$1のアドレスを解析し、検索結果を返すということをやっていたました。
同じ事を４DのV12で実行したところ、URLエンコード部が、"???u%"のようになり、上手くいきません。
utf-8でURLエンコードして検索すれば、問題ないのですが、多くのアプリを修正したり、いろいろと都合があり、この仕組みを変更したくありません。
webの機能で、従来のようにshift-jisエンコードを受け取ってくれる設定などはないでしょうか？また、何か対処方法がありましたら教えて下さい。

 1 ー 0
981 最大レコード数 ゲスト 2022/01/18 10:35:39 2022/02/04 23:39:33 昔の４Dを使用しています。
ver6.0、ver6.5、ver2003、v12
の最大レコード数等、上限が知りたいのですが、
資料が見つかりませんでした。よろしくお願いします。		 1 ー 0
977 エラー:-10509について ゲスト 2021/10/30 11:07:45 2021/11/22 18:18:51 4Dクライアントで普段利用しているファイルを開こうとした時に
-10509　データベース"XXXXX.4DB"を開くことができません。
というメッセージが出た場合にどういった原因が考えられるでしょうか？

ttps://kb.4d-japan.com/Tips/2204/
こちらのサイトによると「コンポーネントの欠落による」とあるのですが
前日までは動いていて突然エラーが出るようになりました。		 1 ー 0
958 4d6.8(windows)を最新の4dに変換したい ゲスト 2021/03/24 11:40:00 2021/03/25 11:29:41 お世話になります。

4Ｄ6.8(windows)を最新の4dに変換したいのですが、
versionが古すぎて、対応できないのです。

どのようにしたらよいでしょうか？
 1 ● 0
211 電話番号検索 animal 2012/04/29 21:26:36 2020/12/31 19:33:50 こんにちは　一般末端ユーザーで、自作の顧客管理ソフトを使用中です。
ハードウェア；4Dサーバー6.8（マックOS10.4 ）、4Dクライアント6.8（WinXP）×2、4Dクライアント6.8（マックOS10.4）×1。
上記のWinXP機1台と、TA（AlexonTD580）をRS232Cで接続。TAのユーティリティソフトを起動すると「COM3」と表示されています。
電話がかかってきたら、その番号を顧客管理ソフトに取り込み、顧客データを検索させたいのですが?

顧客電話番号検索用変数記入欄を設置してあるフォームに、以下のフォームメソッドを記述してみました。

SET CHANNEL(101;ATEG11=0G55=0)
RECEIVE BUFFER(顧客電話番号検索用変数)

結果、何のアクションも起こりません。素人には敷居の高い部分だとは思っていますが（汗）。
C言語もまったく理解していないで、4Dのマニュアルくらいしか読んだことのない、素人で、大変気が引けますが(^_^;)、何かアドバイスいただけたら幸いです。


なおTAのマニュアルには以下の記載があります。
●ＴＡのＣＴＩ仕様
・設定
G55レジスタの設定による
0:アナログ情報表示機能1
1:アナログ情報表示機能2
2:無効（初期値)
3:アナログ情報表示機能3
4:アナログ情報表示機能4

・設定方法
アプリケーション側で、通信ポートを開いた後に初期化コマンドとして送る。
初期化コマンドの例：ATEG11=0G55=3

・動作
TELポート着信受付時に1回だけリザルトコードをDATAもしくはUSBから出力する。
詳細は、各情報表示機能を参照。

・リザルトコード
フォーマットは、ロングリザルト(単語)形式のみで、ショートリザルト
(数字)形式は対応しない。
ショートリザルトの設定(ATV0)であってもロングリザルト形式で出力する。

ＴＥＬポートからの着信時(TELポートが応答する前)時に１回だけデータポート
(DATAorUSB)から端末に送出する。

表示形式： ARING△Pn［△Dn］［*ES］△［IN］［*IS］［△/C］［△/B］改行
△は、スペース(0x20)の文字である。
'［'や'］'はオプションを示すためで出力されない。
改行は、CR/LFの２バイト。
オプションは、本装置の設定やISDN網からの情報なしにより出力されないことがある。
/Cと/Bは、同時に出力されない。

Ｐｎ TELポート番号（0：該当するTELなし、1：TEL1、2：TEL2、4：TEL3）
着信時に複数のTELポートを呼び出した場合は、上記値を加算(OR)する。
着信しなければ「０」、３ポート全てを呼び出せば「７」となる。
Ｄｎ 自局アドレス（電話番号） １～３２桁
ＥＳ 自局サブアドレス（副番号）１～１９桁
ＩＮ 相手アドレス（電話番号） １～３２桁
ＩＳ 相手サブアドレス（副番号）１～１９桁
／Ｃ 通話中着信（キャッチホン）時に出力
／Ｂ 複数のTELポートで、通常着信と通話中着信（キャッチホン）が同時に発生したときに出力


● アナログ情報表示機能1
着信TELポートと発信者の情報を出力する一番ベーシックなモード。

設定 ：Ｇ５５レジスタを０に設定
通知情報：着信TELポート，相手電話番号，相手サブアドレス
相手電話番号と相手サブアドレスは、ISDN網より
通知されなければ出力しない。
着信拒否：着信拒否の場合は、通知しない。

● アナログ情報表示機能2
アナログ情報表示機能に着信側の番号情報を付加したモード。

設定 ：Ｇ５５レジスタを１に設定
通知情報：着信TELポート，着信電話番号，着信サブアドレス，相手電話番号，相手サブアドレス
着信電話番号は、グローバル着信(番号通知なし)時、"---"の３文字を代理で出力する。
着信サブアドレスと相手電話番号と相手サブアドレスは、通知されなければ出力しない。
着信拒否：着信拒否の場合は、通知しない。

● アナログ情報表示機能3
アナログ情報表示機能２に発信者番号の非通知理由を付加したモード。

設定 ：Ｇ５５レジスタを３に設定
通知情報：着信TELポート，着信電話番号，着信サブアドレス，相手電話番号，相手サブアドレス
着信電話番号は、グローバル着信(番号通知なし)時、"---"の３文字を代理で出力する。
相手電話番号が通知されない場合は、非通知理由（P、S、O、C）を出力する。
着信サブアドレスと相手サブアドレスは、通知されなければ出力しない。
着信拒否：着信拒否の場合は、通知しない。

● アナログ情報表示機能4
着信拒否に対応したモード（TELポート番号が、０となる。）

設定 ：Ｇ５５レジスタを４に設定
通知情報：着信TELポート，着信電話番号，着信サブアドレス，相手電話番号，相手サブアドレス
着信電話番号は、グローバル着信(番号通知なし)時、"---"の３文字を代理で出力する。
相手電話番号が通知されない場合は、非通知理由（P、S、O、C）を出力する。
着信サブアドレスと相手サブアドレスは、通知されなければ出力しない。
着信拒否：着信拒否の場合は、TELポート番号が、０で通知する。

● 適応機種
現行機種：TDC200,T480/TD480,TD580,TD680,TD780
終了機種：TD101,TD121,TD401,TD451,TD601,TD603
T301/TD301,TD501,TD503α,TD505は、途中のバージョンから対応。		 3 ● 0
943 4Dからのメール送信に関して ゲスト 2020/10/23 23:00:29 2020/11/17 21:29:05 ４D v17.1のサーバーとクライアントを使用しています。

タイトルにもあるように4Dからメールを送ろうと、マニュアルを参照して以下のプログラムを作成しました

メソッド１：SMTP_ERRCHECK
//以下はSMTP_ERRCHECKメソッドのコードです。
//このメソッドは二つの引数をとります。
//第一引数はコマンド名($Command)で、第二引数は引数に渡されたSMTPコマンドが返すエラー値
//このメソッドからはエラー値が0の場合にFalseが、それ以外
//すなわちSMTPコマンドの実行に成功すれば、エラー値が0なの
//SMTPコマンドの実行に失敗すると返り値がTrueとなるため、その時点でCaseのテストが終了します。

C_TEXT(vErrorMsg)

$Command:=$1
$Error:=$2
$Result:=True

If ($Error#0)
$Result:=False
If (<>SHOWERRORS) //エラーメッセージを表示するかしないか
vErrorMsg:=IT_ErrorText ($Error)
ALERT("ERROR --"+Char(13)+"Command:"+string($Command)+Char(13)+"ErrorCode"+String($Error)+Char(13)+"Description"+string(vErrorMsg))
End if
End if

$0:=$Result


メソッド２：SMTP_MailSend


C_LONGINT($SMTP_ID)
C_BOOLEAN($SentOK;$OK)
$SentOK:=False //すべてのコマンドが実行されたかを検証するフラグ

//メッセージ転送を担当するSMTP
vHost:="smtp.mail.xxx.co.jp"
//送信者のアドレス
vFrom:="xxxx@yahoo.co.jp"
//受信者のアドレス
vTo:="yyyy@gmail.com"
//メール件名
vSubject:="送信テスト成功！"
//メール本文
vMessage:="このメールが受信できれば、SMTPサーバの設定は成功です。"

vAuthUserName:="aaaaa"
vAuthPassword:="bbbb"

Case of
//メモリ上に新しいメッセージのためのスペースを確保し、続くコマンドで使用するための参照を返します。
: (Not(SMTP_ERRCHECK ("SMTP_New";SMTP_New ($SMTP_ID))))

//メッセージ転送を担当するSMTPを指定します。
: (Not(SMTP_ERRCHECK ("SMTP_Host";SMTP_Host ($SMTP_ID;vHost))))

//送信者のアドレス。最低一つのアドレスが必要です。
: (Not(SMTP_ERRCHECK ("SMTP_From";SMTP_From ($SMTP_ID;vFrom))))

//メール件名
: (Not(SMTP_ERRCHECK ("SMTP_Subject";SMTP_Subject ($SMTP_ID;vSubject))))

: (Not(SMTP_ERRCHECK ("SMTP_Auth";SMTP_Auth ($SMTP_ID;vAuthUserName;vAuthPassword;0))))

//受信者のアドレス。最低一つのアドレスが必要です。
: (Not(SMTP_ERRCHECK ("SMTP_To";SMTP_To ($SMTP_ID;vTo))))

//メール本文
: (Not(SMTP_ERRCHECK ("SMTP_Body";SMTP_Body ($SMTP_ID;vMessage))))

//メッセージを送信します。
: (Not(SMTP_ERRCHECK ("SMTP_Send";SMTP_Send ($SMTP_ID))))

Else

$SentOK:=True //メッセージが構築され、メールが送信された

End case

If ($SMTP_ID#0) //メッセージが作成されていたら、削除しなければなりません
//メッセージ作成時に使用したメモリをクリアします。
$OK:=SMTP_ERRCHECK ("SMTP_Clear";SMTP_Clear ($SMTP_ID))
End if

SMTPサーバーはYahooを使用するように設定しています。

上記プログラムを実行するとメールの送受信は問題なく行えるのですが、件名は入っているのですが本文が送られてきません（空白のまま）。
この原因を皆さんにご教示いただきたいです。
よろしくお願いします。		 1 ● 0
937 リストボックスの背景色 池田隼人 2020/09/01 14:43:23 2020/11/17 21:54:12 いつもお世話になっております。
リストボックスの特定のセルに色を付けたいと思いチャレンジしていたのですが、解決出来ず質問させて下さい。

値がマイナスだったら背景を赤にしたいと思っています。
セレクション型のリストボックスを使用しています。
リストボックスで列を選択した時のプロパティリスト「背景色の式」の部分で条件による色分けが出来そうとは思ったのですが、「式」にはIFなどの制御文は使えないようで「マイナスだったら」をどう判定させたら良いかわからずにおります。

恐れ入りますが、ご教示頂けたら助かります。

2020-09-02 追記
値を判定し、マイナスだった場合に色コードをフィールドに格納。そのフィールドをプロパティリスト「背景色の式」にセットする事で実現出来ました。
ただ、その為にフィールドを作成するのも現実的ではないので、色コードを返すメソッドを作成し実験してみようと思います。		 1 ー 0
872 4D2004のWindows10上での動作について ゲスト 2019/04/17 13:43:09 2020/10/28 16:26:46 4Dのとても古いバージョンで、推奨されている動作環境ではないことを承知の上で、ご相談させていただきます。

4D2004で開発、エンジン付きで生成されたアプリケーションなのですが、Windows10のバージョン1809で動作させると、下記のようなエラー（一部加工しています）が発生してアプリケーションが起動してくれません。
厳密にはWindows1809でも動作するのですが、それまでは普通に使えていたのに、ある日突然起動しなくなる…という状況です。OSの更新を疑って色々調べているのですが、未だ原因を特定することができていません。
可能な場合は「復元ポイントに戻す」や「回復メニューからバージョン1803へ戻す」といった対応で解決出来るのですが、それができないことも多く困っております。

4Dの最新バージョンに移行するよう試験的に作業をしているのですが、使用しているプラグインや外部連携との関係で移行の目処が立っておらず、何とか現状のまま対処方法が分かれば…と思い、ご相談させていただきました。
どうぞよろしくお願い致します。
----------
ログの名前: Application
ソース: Application Error
日付: 2019/03/11 9:23:18
イベント ID: 1000
タスクのカテゴリ: (100)
レベル: エラー
キーワード: クラシック
ユーザー: N/A
コンピューター: SIZ-VST07
説明:
障害が発生しているアプリケーション名: アプリケーション.exe、バージョン: 2.0.0.4、タイム スタンプ: 0x461c8cbf
障害が発生しているモジュール名: ASINTPPC.dll、バージョン: 2.0.0.4、タイム スタンプ: 0x461c8aaf
例外コード: 0xc0000005
障害オフセット: 0x0003acd3
障害が発生しているプロセス ID: 0x195c
障害が発生しているアプリケーションの開始時刻: 0x01d4d7a08ca82201
障害が発生しているアプリケーション パス: C:\アプリケーション\アプリケーション.exe
障害が発生しているモジュール パス: C:\アプリケーション\ASINTPPC.dll
レポート ID: ddcd2e5f-4393-11e9-b58f-c81f662e8609
イベント XML:



1000
2
100
0x80000000000000

174470
Application
SIZ-VST07



アプリケーション.exe
2.0.0.4
461c8cbf
ASINTPPC.dll
2.0.0.4
461c8aaf
c0000005
0003acd3
195c
01d4d7a08ca82201
C:\アプリケーション\アプリケーション.exe
C:\アプリケーション\アプリケーション\ASINTPPC.dll
ddcd2e5f-4393-11e9-b58f-c81f662e8609


-------------------		 4 ー 0
929 4Dv6.5の資料の件 ひろ坊 2020/05/27 10:47:37 2020/05/27 10:47:37 私はプロの4Dユーザーではないのですが、4D First時代から自分の仕事用の簡単なデータベースを作って使って来ました。
英語が苦手でネットに上がっている英文マニュアルを読むのが大変だったので、かなり前に4Dv6.5の資料を入手しました（以下のDropboxに写真があります。*をhに変えてください）。
*ttps://www.dropbox.com/s/7enyij5q1c3fdja/4Dv6.5%E8%B3%87%E6%96%99.JPG?dl=0
さすがに自分はもう使わないですし、手元に置いておいても死蔵状態なので、そろそろ処分しようと思いました。
ただ、出回っている部数が少ない資料だと思うので、必要とされる方がいらっしゃるならばお譲りしたいと思います。
2020年9月末日までにアドレス：nec2@mac.comまでにご連絡をいただけるとありがたいです。
本件については、4D-JUGにも同じ内容で出させていただこうと思います。		 0 ー 0
916 新規レコードをリストに追加をメソッドで事項したい ゲスト 2020/01/29 10:43:08 2020/04/18 16:48:10 お世話になります。
デザインモードのレコードメニューから使用できる「新規レコードをリストに追加」ですが、メソッドから実行するコマンドは御座いますでしょうか？
出力フォームでデータ入力を行って行きたいのですがADD RECORDの場合、入力フォームに画面が切り替わってしまいます。
何か手段がありましたらご教示いただけますと幸いです。		 16 ー 0
897 和暦表示について ゲスト 2019/08/22 21:58:47 2019/08/24 07:03:48 お世話になります。
4D現在試用版にて勉強中なのですが、初歩的な事につまずき質問させて頂きたいと思います。
あるフィールドを「日付」に設定した場合なのですが、それを和暦に変換し表示する機能（メソッド？）、また、その逆に和暦で入力した日付を西暦に変換するようなメソッドは存在しますでしょうか？
4D開発者の方に対してお恥ずかしい質問をしているのかも知れませんが、ご教示頂けたら幸いです。		 2 ● 0
895 4D Developer Standard から 4D Developer Professionalへのアップグレード ゲスト 2019/08/12 23:30:58 2019/08/20 22:44:37 4D Developer Standard から 4D Developer Professionalへのアップグレードのようなプランは存在するのでしょうか？
当方、現在試用版にて勉強中なのですが、試用期間では学習時間としては不足で、且つ最終的にはProfessionalでコンパイルしたアプリを社内配布出来ればと考えております。
 4 ● 0
876 ４D2004から最新バージョンへ ゲスト 2019/05/08 11:38:04 2019/05/18 06:31:16 現在、４Dバージョン2004から最新版へバージョンアップしたいと
考えています。
クライアントは、１０ライセンスありますが
どれくらいの費用がかかるでしょうか？		 2 ● 0
869 ドロップダウンリスト内のデータの受け渡しに関して ゲスト 2019/04/03 22:37:11 2019/04/08 07:53:19 ドロップダウンリスト内のデータの受け渡しが上手くいかず困っており、皆様のアドバイスを頂きたく投稿しました。

フォーム内に該当データを一覧表示するリストボックスとその隣にリストボックス内のデータをクリックすると編集できる変数オブジェクトが配置されており、データの新規追加および編集、データの削除が行えるようになっています。
ドロップダウンリスト内のデータは、別テーブル内のフィールドの値を配置して選択出来るようになっています。

ドロップダウンリストが配置されているフォームメソッド​

Case of
: (Form event=On Load)

//ドロップダウンリスト作成　変数はv職種
ALL RECORDS([スタッフ職種])
ORDER BY([スタッフ職種]ソートNO;>)
$count:=Records in selection([スタッフ職種])

ARRAY TEXT(v職種;$count)

For ($i;1;$count)
v職種{$i}:=[スタッフ職種]職種名
NEXT RECORD([スタッフ職種])
End for

: (Form event=On Click)

v職種:=v職種{v職種}//ドロップダウンリストのデータをv職種に代入

End case ​

このプログラムにより、フォーム上のドロップダウンリスト内にデータが上手く取り込まれています。

リストボックス内のデータを選択したときにフォーム上のドロップダウンリストへのデータの受け渡しは以下のメソッドにて、動作することを確認できています。

QUERY([スタッフリスト];[スタッフリスト]管理番号=v管理NO)
v職種:=Find in array(v職種;[スタッフリスト]スタッフの職種)

問題は、新規登録または編集でドロップダウンリスト内のデータを選択したときに「文字列」または「テキスト」にて表示されているデータをそのまま受け渡してくれれば良いのですが、アラートを使ってデータを確認すると受け渡しのデータは「数値」で帰ってきます。

フォームプログラム上での以下の部分が問題であるのは分かったのですが、どうすれば思った通りのデータを返すことが出来るのかで悩んでおります。
: (Form event=On Click)
v職種:=v職種{v職種}//ドロップダウンリストのデータをv職種に代入
End case ​

皆様のアドバイスを頂けませんでしょうか？
よろしくお願いします。		 2 ● 0
866 リストボックス上でのボタン表示 ゲスト 2019/03/27 16:48:15 2019/03/31 19:37:30 v17のサーバーおよびクライアントを使用して運用しています。

データが入力されている行の該当列にボタンを配置し、そのボタンをクリックしたら指定のプログラムを動作させるということを考えています。

私の探し方が足りないのか、このような記述を見つけることができず、皆様に教えていただきたく投稿しました。

宜しくお願い致します。
 2 ● 0
★「新規タイトル」をクリックして新しいメッセージを投稿してください。
★「タイトル名」をクリックして既存のメッセージを開いてください。
※「掲示板登録」すると新着メッセージをメールで受け取れます。