喫茶XRAYトップページ

[スレッド全体]
[12570] Re:PlPrev9.05のコンパイルエラー返信　削除
2019/1/25 (金) 15:25:31 Mr.XRAY
▼ Noelさん，こんにちは．

> 環境：Delphi 6 update pack 2
> エラー箇所：PlPrev.pas v9.05 (258行および261行)

あらっ〜 !!
Delphi 6 には MainFormHandle がないんですね．大変失礼しました．
情報ありがとうございます．後で修正しておきます．

[12571] Re2:PlPrev9.05のコンパイルエラー返信　削除
2019/1/25 (金) 15:40:03 Noel
▼ Mr.XRAYさん
> ▼ Noelさん，こんにちは．
>
> > 環境：Delphi 6 update pack 2
> > エラー箇所：PlPrev.pas v9.05 (258行および261行)
>
> あらっ〜 !!
> Delphi 6 には MainFormHandle がないんですね．大変失礼しました．
> 情報ありがとうございます．後で修正しておきます．

素早い反応ありがとうございます！
MainFormHandleも、ActiveFormHandleもありません。
まぁ、今どきDelphi6を使っている方が問題かもしれませんが・・・。

Delphi 10.3は購入してあるんですが、コンパイルを含むすべての動作が遅くて・・・。
先にOSを64bitにしなきゃと思ってます（泣。


[12573] 修正版UPしました返信　削除
2019/1/25 (金) 16:35:11 Mr.XRAY
修正版を UP しました．バージョンを 9.06 としました．

> まぁ、今どきDelphi6を使っている方が問題かもしれませんが・・・。

んだ !!
つい先日も Delphi 6 を使用した記事を書きましたが．
なにしろメインの PC には Ansi 版の Delphi が入っていないので．苦労します．
Delphi 6 / 7 がらみの質問等はまだありそうですね．
さすがに「管理者権限」はなくなったようですが (笑)

アクセス解析のキーワードを見ると
Delhhi 6, Delphi 7 というのがなかなかなくらないですね．ホントに

[12574] Re:修正版UPしました返信　削除
2019/1/25 (金) 16:43:49 Mr.XRAY
> 修正版を UP しました．バージョンを 9.06 としました．

修正に使用している関数が MSDN の記事で

Windows previous versions documentation
https://docs.microsoft.com/en-us/previous-versions/windows/

に移動してしまっているので，
もしかしたら Windows 10 でエラーになるかも知れません．
その時はまた対処方法を考えます．

[12575] Re2:修正版UPしました返信　削除
2019/1/25 (金) 18:29:35 Noel
▼ Mr.XRAYさま
> > 修正版を UP しました．バージョンを 9.06 としました．
>
> 修正に使用している関数が MSDN の記事で
>
> Windows previous versions documentation
> https://docs.microsoft.com/en-us/previous-versions/windows/
>
> に移動してしまっているので，
> もしかしたら Windows 10 でエラーになるかも知れません．
> その時はまた対処方法を考えます．

早速の対応、ありがとうございます！
plPrev9.06で、Delphi6にてコンパイルが通りました。

対処頂いたコードを見てみましたが、私にはさっぱりです。
ただ、やはり、Screen.ActiveForm.Handleではダメだったんだということが確認できました。
9.05で使われていたのがApplicationクラスのActiveFormHandleだったので、
Screenのは名前が近いけど違うのかなと思ってました。
あやうく、間違った対処をするところでした・・・（汗。
聞いてみてよかったです。ありがとうございます。

これからもご活躍を期待しております！
[12576] Re3:修正版UPしました返信　削除
2019/1/25 (金) 18:52:35 Mr.XRAY
> 9.05で使われていたのがApplicationクラスのActiveFormHandleだったので、

自分のアプリで複数のフォームを使用する場合は GetActiveWindow だけでもいいのですが，
印刷プレビューのフォームは汎用的なのでオーバーラップなフォームとしても動作する
ようにしておくことになります．
ActiveFormHandle は オーバーラップなウィンドウも検出してくれます．
[12572] Re2:PlPrev9.05のコンパイルエラー返信　削除
2019/1/25 (金) 15:47:24 Noel
▼ Mr.XRAYさん、こんにちは。
> ▼ Noelさん，こんにちは．
>
> > 環境：Delphi 6 update pack 2
> > エラー箇所：PlPrev.pas v9.05 (258行および261行)
>
> あらっ〜 !!
> Delphi 6 には MainFormHandle がないんですね．大変失礼しました．
> 情報ありがとうございます．後で修正しておきます．

あ、plPrev.pasではなく、plPrevfrm.pasでした・・（汗。

よろしくお願いいたします<(_ _)>。

[▼次のスレッド]
INCM/CMT
Cyclamen v3.82