この発言は
#00401　ありい          さんのRE:印刷用紙名の取得（簡易版）
に対するコメントです



ありい さん、こんにちは。一品斎です。(NIFTY:FDELPHI/MES/16/401)

実は、Delphi1.0の仕様のままでＵＰしてしまいました。

>＞  dmPaper_Letter      :sps:='ﾚﾀｰ';
>
>　が定義されているので、ケース文中２度目（値が同じ）って事で弾かれてい
>るのではないでしょうか。

その通りでした。Delphi3.1では、その行にエラー発生です。ご指摘ありがと
うございます。m(_._)m

皆樣へ：ソースの下の部分をコメントにして、あとは、コメントからはずして
ご利用ください。

　// dmPaper_First    :sps:='Letter 8 1/2 x 11 in';

----------------------------------------------------------------------
1998.02.21(土)                                        一品斎  CXD02261
======================================================================

Original document by 一品斎          氏 ID:(CXD02261)

ここにあるドキュメントは NIFTY SERVEの Delphi Users' Forum の16番会議室「玉石混淆みんなで作るSample蔵」に投稿されたサンプルです。これらのサンプルはボーランド株式会社がサポートする公式のものではありません。また、必ずしも動作が検証されているものではありません。これらのサンプルを使用したことに起因するいかなる損害も投稿者、およびフォーラムスタッフはその責めを負いません。使用者のリスクの範疇でご使用下さい。