喫茶XRAYトップページ

[スレッド全体
]

[5055] 私には理解できましぇん返信 削除
2011/7/29 (金) 17:51:43 Syake
こんにちは
暑い日が続きますね。
どうぞご自愛くださいませ。

さて、本題。
Formを一つ(Form1)。
plPrevFormを継承して一つ(plPrevForm2)。
plPrevForm2はTplPrevを一つ追加、それと自動生成から外して
OnCloseでAction := caFree。

Unit1(Form1)
procedure TForm1.Button1Click(Sender: TObject);
begin
  plPrevForm2 := TplPrevForm2.Create(Self);
  with plPrevForm2 do
  begin
    plPrev1.plSetPrinter.PrinterNumber := DMPAPER_A4;
    plPrev1.plSetPrinter.Orientation := poLandscape;
    with plPrev1 do
    begin
      BeginDoc;
      with Canvas do
      begin
        FontSize(72);
        TextRectCC(100,2100,500,1400,'マスターは神様!!');
      end;
      EndDoc;
    end;
    Show;
  end;
end;

Buttom1クリック!
当然のこと、プレビューが表示されます。

次に、Form1のFormStyleをfsMDIFormに、plPrevForm2のFormStyle
をfsMDIChildにします。
Buttom1クリック!
今度はプレビューは表示されません。

次に、Form1とplPrevForm2のFormStyleをfsNomalに戻します。
Buttom1クリック!
あれ、今度もプレビューは表示されません。
何をやって(プロジェクトの再起動など)も永遠に表示されません。

な〜ぜじゃ???
一体この間にDelphiは何をやってるのでしょうか?

あれ、本題がずれとる。
継承フォームをMDIChildでプレビューできませんか?


[5067] Re:私には理解できましぇん返信 削除
2011/8/2 (火) 19:39:25 Mr.XRAY
▼ Syakeさん

> 次に、Form1のFormStyleをfsMDIFormに、plPrevForm2のFormStyle
> をfsMDIChildにします。
> Buttom1クリック!
> 今度はプレビューは表示されません。


調査結果です.
このバグは根が深いです.
少しばかり時間が必要です.
ということで,いつもの通りですが,時間をください.

それにしても,皆さん,よくもまあ,こうもバグを見つけるものです.
感心してしまいます.
出来ればバグが発生しない方法で使用して頂きたいものです(笑)

あっ,いいことを思いつきました.
MDIでの使用は禁止にすればいいんだ.つまり「仕様」ですね.


[5086] Re2:私には理解できましぇん返信 削除
2011/8/4 (木) 07:53:47 Syake
▼ Mr.XRAYさん

通常はやんないんですが、ちょっとMDI風にしたいアプリがあったもので

> ということで,いつもの通りですが,時間をください.
大丈夫です。

> あっ,いいことを思いつきました.
> MDIでの使用は禁止にすればいいんだ.つまり「仕様」ですね.

使わせてもらいます(否、使ってます) (^_^;)

[5088] 印刷プレビューコンポをMDIアプリで使用返信 削除
2011/8/4 (木) 21:31:42 Mr.XRAY
▼ Syakeさん,

原因が分かりましたので,テスト的にソースを修正した結果です.
サボっていないという証拠に掲載しておきます.
もちろん,この図は合成ではありません.
これから,本格的にやります.

動作確認用のEXE
http://mrxray.on.coocan.jp/Delphi/zipothers/plPrev_MDIChild.zip


[5090] Re:印刷プレビューコンポをMDIアプリで使用返信 削除
2011/8/5 (金) 08:14:25 Syake
▼ Mr.XRAYさん
 
> 原因が分かりましたので,テスト的にソースを修正した結果です.
> サボっていないという証拠に掲載しておきます.


貫壁です。m(_ _)m
ご苦労様です,楽しみに待っております。


[5095] 修正版UPしました返信 削除
2011/8/6 (土) 14:20:32 Mr.XRAY
▼ Syakeさん

> ご苦労様です,楽しみに待っております。

一応バージョンアップしました.
この修正で,新たな問題が発生するかも知れませんが,その時はその時
ということで.(^^;

http://mrxray.on.coocan.jp/Delphi/plPrev/B_MDIApplication.htm


[5096] Re:修正版UPしました返信 削除
2011/8/6 (土) 20:39:31 Mr.XRAY
> http://mrxray.on.coocan.jp/Delphi/plPrev/B_MDIApplication.htm

この記事に興味のある方,あるいは,
特に興味があるわけではないが,どんな動作をするのか見てみたい,
という方のために,この記事作成に使用したサンプルのプロジェクトです.
EXEも付いています.

http://mrxray.on.coocan.jp/Delphi/zipothers/plPrev_MDIChild_02.zip



[5109] Re2:修正版UPしました返信 削除
2011/8/10 (水) 07:36:26 Syake
▼ Mr.XRAYさん
ご苦労様でございます。
早速の修正なのにすいません。
(バタバタやってますm(_ _)m)
 
> http://mrxray.on.coocan.jp/Delphi/zipothers/plPrev_MDIChild_02.zip

それでは、この前の続きの作業にはいります。
何かありましたら、ご報告いたします。

[5110] Re3:修正版UPしました返信 削除
2011/8/10 (水) 08:51:39 Mr.XRAY
▼ Syakeさん

> それでは、この前の続きの作業にはいります。

がんばってくださいませ.
それにしても,ここのところ毎日暑い!!


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