HAMLOG プログラム開発室

苦戦中．．．．

> まだ修正ウインドウの [ Save ] が押せないです。

データ入力ウインドウの [ Save ] を押すは
[ 18 = 入力ウインドウの [ Save ] ボタンをクリックしたのと同じ] があるので直ぐにできました。

是非、[ 修正ウインドウの [ Save ] ボタンをクリックしたのと同じ] ．．．を追加して頂けないでしょうか？

https://list.ly/i8sxipx332
https://app.lookbook.nu/user/11260256-Nickie
https://stackoverflow.com/users/21496127/f4gbcfs604?tab=profile
https://www.instructables.com/member/z0ogmrv725/
https://www.ultimate-guitar.com/u/k7lqvcz981
https://www.cheaperseeker.com/u/h7yrujx003
https://500px.com/p/c1zirfy619
https://devpost.com/i3krvod397
https://www.mapleprimes.com/users/w6dkadz544
https://www.blogtalkradio.com/r6ffzzp533
https://musescore.com/user/62953678
https://dribbble.com/o1hopcz271

下記にて修正ウインドウは閉じる事が出来ました。

Dim title_str As String = "データの表示＆修正"
Hwnd_syuusei = FindWindow(vbNullString, title_str)
retValue = SendMessage_B(Hwnd_syuusei, WM_CLOSE, 0&, 0&)

まだ修正ウインドウの [ Save ] が押せないです。

ありがとうございます。　　試してみます。

https://peatix.com/user/16584829/view
https://www.bitsdujour.com/profiles/ACAaIm
https://www.anobii.com/en/01c0cb9bfd4f206fe1/profile/activity
https://artmight.com/user/profile/1057166
https://www.indiegogo.com/individuals/33122957
https://creator.wonderhowto.com/r5ajcfh152/
https://www.divephotoguide.com/user/k4qfpex868/
https://www.ted.com/profiles/42510538
https://www.mixcloud.com/p1sokpa853/
https://www.metal-archives.com/users/q7ceelm859
https://www.blurb.com/user/vknqzty286
https://www.empowher.com/user/4098027

> 何時もお世話になります。　ありがとうございます。
>
> VB2019使用です。
>
> 　20 = 指定したレコード番号の修正ウインドウを表示させます。
> 　21 = 修正ウインドウにデータを送ります。15番と同じ。
>
> 上記 cmmd で修正ウインドウのＱＳＬ欄に希望の文字列は書き込みできました。
> この後の
> 修正ウインドウの { Save } ボタンを押す。
> 修正ウインドウ表示を閉じる．．．．．処理はどうしたら？？
>
> cmmd 該当する命令は無い様なのですが。

Public Const THW_ENTER = &H10000

私のサンプルプログラムでは[Save]ボタンを押した状態にはできました。
閉じる　は無さそうです。
ウインドウハンドルを取得して閉じさせるでしょうか。
https://www.instapaper.com/read/1591408773
https://www.metal-archives.com/users/g8fpkhw700
https://list.ly/r5xocvb021
https://artmight.com/user/profile/1056278
https://www.divephotoguide.com/user/q3lwpxc063/
https://www.cheaperseeker.com/u/b2opqmt899
https://www.longisland.com/profile/a6izfmf300/
https://www.anobii.com/en/011984ac4d7bcec4ff/profile/activity
https://artmight.com/user/profile/1056722
https://cs.astronomy.com/members/y0ttytk961/default.aspx
https://www.instapaper.com/read/1591568297
https://www.empowher.com/user/4097277
https://list.ly/c1vaqfy023
https://www.myvidster.com/profile/z8quxka694
https://app.lookbook.nu/user/11258108-Bryant
https://www.cheaperseeker.com/u/a6cwigm231
https://devpost.com/a2hhvjj829
https://www.giantbomb.com/profile/p2qtkgy438/

何時もお世話になります。　ありがとうございます。

VB2019使用です。

　20 = 指定したレコード番号の修正ウインドウを表示させます。
　21 = 修正ウインドウにデータを送ります。15番と同じ。

上記 cmmd で修正ウインドウのＱＳＬ欄に希望の文字列は書き込みできました。
この後の
修正ウインドウの { Save } ボタンを押す。
修正ウインドウ表示を閉じる．．．．．処理はどうしたら？？

cmmd 該当する命令は無い様なのですが。
http://oujirou.com/cgi-bin/diarypro/diary.cgi
http://okazunomise.com/cgi/diarypro/diary.cgi
http://kinsei-doumai.com/images/blog/diary.cgi
http://joehigashi.com/wp-includes/pomo/blog/diary.cgi
https://happa-chef.com/img/blog/diary.cgi
http://gokujo-kakuni.com/blog/diary.cgi
http://fujiedafc.com/wp-includes/pomo/diary.cgi
http://softnext.web5.jp/diary.cgi
http://hughesremodeling.com/css/clinic/diary.cgi
http://localpotions.com/img/car/diary.cgi
http://satellite.stepserver.jp/diary.cgi
http://corgi.asobon.net/basis/feature/diary.cgi
https://www.asobon.net/img/ba/index.cgi
https://www.shoone.net/img/ba/diary.cgi
http://shoone.web5.jp/diary.cgi

済みません、私のテスト、確認ミスだったようです。

SendMessage()で27や28を送らなくても
THW_update() で処理して直ぐにメインウインドウのＱＳＬ欄が該当文字列に変わりました。

ありがとうございます。
後ほどテストさせて頂きます。

> SendMessage()で27を送ってQSOデータをCloseさせ、28を送ってOpenさせ
> れば再描画すると思います。

> お世話になります。ありがとうございます。
> メインウインドウに対してＱＳＬ欄に update 命令を送った時に
> J* と見えているのを E* とかに見える様に変わる．．．です。
> Hamlog.hdb 自体は書き換わっているようですが
> update の結果が直ぐに目視で確認出来ればと思いました。

SendMessage()で27を送ってQSOデータをCloseさせ、28を送ってOpenさせ
れば再描画すると思います。

> QSL_Rcv(), QSL_Send() は３文字目と２文字目ですよね？
> １文字目 発行先　（ J: JARL 経由、 M: マネージャー経由とか）　　　　
> 環境設定の「設定１」の「ＱＳＬ欄の初期値とする」に対する命令は無いようですが。
> cmmd = 10 で書き換えは出来ますが。

SendMessage()によるQSOデータを書き換える命令はありません。たぶん。
https://musescore.com/user/61967632
https://devpost.com/o7hivpf216
https://www.hometalk.com/member/79272109/johnette1822682
https://peatix.com/user/16357010/view
https://app.lookbook.nu/user/11235006-Norsworthy
https://orcid.org/0009-0008-2279-4936
https://list.ly/s5hskwv840
https://thegadgetflow.com/user/t1rvjaj989/
https://www.longisland.com/profile/a1gffki546/
https://www.myvidster.com/profile/p1acfqj850
https://www.bitsdujour.com/profiles/Yt3SyJ
https://www.divephotoguide.com/user/h0kjtzo215/
https://artmight.com/user/profile/1027031
https://www.mapleprimes.com/users/l0bwxof661
https://www.cheaperseeker.com/u/v8jrwew693
https://independent.academia.edu/EncisoTressa27
https://independent.academia.edu/NitzStar40
https://independent.academia.edu/JolliffAzar17
https://independent.academia.edu/GenovevaJohnette20
https://independent.academia.edu/RulandLarsen23

お世話になります。ありがとうございます。
メインウインドウに対してＱＳＬ欄に update 命令を送った時に
J* と見えているのを E* とかに見える様に変わる．．．です。
Hamlog.hdb 自体は書き換わっているようですが
update の結果が直ぐに目視で確認出来ればと思いました。

QSL_Rcv(), QSL_Send()　こちらは未経験なので試してみます。

QSL_Rcv(), QSL_Send() は３文字目と２文字目ですよね？
１文字目 発行先　（ J: JARL 経由、 M: マネージャー経由とか）　　　　
環境設定の「設定１」の「ＱＳＬ欄の初期値とする」に対する命令は無いようですが。
cmmd = 10 で書き換えは出来ますが。

> 更新したデータの修正ウインドウを出すか再起動すれば更新したＱＳＬ欄が表示されますが更新命令を直ぐに反映させるには何か方法がありますか？

「更新命令を直ぐに反映させる」とは具体的にどういうことでしょう？
QSOデータのQSL欄に書き込むのは、QSL_Rcv(), QSL_Send() が簡単かと思います。

https://giphy.com/channel/n3jhjqz008
https://www.indiegogo.com/individuals/32942874
https://www.boredpanda.com/author/m9vmfle509/
https://hub.docker.com/r/m4nxyep534/website
https://www.instapaper.com/read/1587250286
https://creator.wonderhowto.com/y2tcfqs608/
https://www.blogtalkradio.com/r6utjwv778
https://coub.com/c5qdmix570
https://www.viki.com/users/m6ynszd486_434/about
https://www.blurb.com/user/fgisyrz522
https://www.demilked.com/author/q6cehra837/
https://www.giantbomb.com/profile/e1aloec271/
https://www.empowher.com/user/4071866
https://cs.astronomy.com/members/w7nuyzd394/default.aspx
https://www.magcloud.com/user/g4kvieb216
https://www.metal-archives.com/users/v8ruzaw183