この発言は
#00665　佐藤　充男　　　さんのPascalコンパイラバージョン判断
に対するコメントです

この発言に対し以下のコメントが寄せられています

#00844　瑠瓏            さん　RE^2:Pascalコンパイラバージョン判断




こんにちは、佐藤　充男です。



☆説明
　C++Builder 4のPascalコンパイラバージョンチェックです。
　コンポーネント作成時に複数のバージョンをサポートする場合に使用して
　ください。

☆補足
　C++Builder 4Pro 版でテストしました。サンプルソースのUnit2.pas を
　プロジェクトに追加して確認しています。


[サンプルソース]
----------------------------------------------------------------------
unit Unit2;

interface

uses
  Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs;

  procedure ButtonClick;

implementation

procedure ButtonClick;
begin
  ShowMessage('Pascal Version Check!');

{$IFDEF VER120}  // Delphi4
  ShowMessage('Pascal Ver12.0 = Delphi4');
{$ENDIF}

{$IFDEF VER125}  // C++Builder4
  ShowMessage('Pascal Ver12.5 = C++Builder4');
{$ENDIF}
end;

end.
----------------------------------------------------------------------

VER130だと思ってたのですが…、なんか統一性がありませんね(^^;

                              99/3/27(土) 06:11pm  LDM03756 佐藤　充男

Original document by 佐藤　充男　　　氏 ID:(LDM03756)

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