(* Version.pas (c) JR Stockton www.merlyn.demon.co.uk >= 2002-09-29 *) { Should allow for known versions of TP, BP, TPW, BPW, Delphi, TMT May allow for FPC, which I do not have But only safe with my own programs Not needed for those using only Delphi 6 and up } {$IFNDEF __TMT__}{$UNDEF DELPHI}{$UNDEF PASCAL}{$UNDEF BORPAS}{$ENDIF} { No conditionals before TP4 } {$IFDEF VER10 }{$DEFINE PASCAL} TPW 1.0/1.5 - Not Tested by JRS {$ENDIF} {$IFDEF VER40 }{$DEFINE PASCAL} Not Tested by JRS {$ENDIF} {$IFDEF VER50 }{$DEFINE PASCAL} {$DEFINE VERGE50} {$ENDIF} {$IFDEF VER55 }{$DEFINE PASCAL} {$DEFINE VERGE55} {$ENDIF} {$IFDEF VER60 }{$DEFINE PASCAL} {$DEFINE VERGE60} {$ENDIF} {$IFDEF VER70 }{$DEFINE PASCAL} {$DEFINE VERGE70} {$ENDIF} {$IFDEF VER80 }{$DEFINE DELPHI}{$ENDIF D1 } {$IFDEF VER90 }{$DEFINE DELPHI}{$ENDIF D2 } {$IFDEF VER93 }{$DEFINE DELPHI}{$ENDIF BCB++1} {$IFDEF VER100}{$DEFINE DELPHI}{$ENDIF D3 } {$IFDEF VER110}{$DEFINE DELPHI}{$ENDIF BCB++3} {$IFDEF VER120}{$DEFINE DELPHI}{$ENDIF D4 } {$IFDEF VER125}{$DEFINE DELPHI}{$ENDIF BCB++4} {$IFDEF VER130}{$DEFINE DELPHI}{$ENDIF D5 } {$IFDEF VER140}{$DEFINE DELPHI}{$ENDIF D6 } {$IFDEF VER150}{$DEFINE DELPHI}{$ENDIF D7 } {$IFDEF VERGE150} {DEFINE VERGE140} {$ENDIF} {$IFDEF VERGE140} {DEFINE VERGE130} {$ENDIF} {$IFDEF VERGE130} {DEFINE VERGE125} {$ENDIF} {$IFDEF VERGE125} {DEFINE VERGE120} {$ENDIF} {$IFDEF VERGE120} {DEFINE VERGE110} {$ENDIF} {$IFDEF VERGE110} {DEFINE VERGE100} {$ENDIF} {$IFDEF VERGE100} {DEFINE VERGE93 } {$ENDIF} {$IFDEF VERGE93 } {DEFINE VERGE90 } {$ENDIF} {$IFDEF VERGE90 } {DEFINE VERGE80 } {$ENDIF} {$IFDEF VERGE80 } {DEFINE VERGE70 } {$ENDIF} {$IFDEF VERGE70 } {DEFINE VERGE60 } {$ENDIF} {$IFDEF VERGE60 } {DEFINE VERGE55 } {$ENDIF} {$IFDEF VERGE55 } {DEFINE VERGE50 } {$ENDIF} {$IFDEF VERGE50 } {DEFINE VERGE40 } {$ENDIF} {$IFDEF VERGE40 } {DEFINE VERGE30 } {$ENDIF} {$IFDEF VERGE30 } {DEFINE VERGE20 } {$ENDIF} {$IFDEF VERGE20 } {DEFINE VERGE10 } {$ENDIF} {$IFDEF PASCAL}{$DEFINE BORPAS}{$ENDIF} {$IFDEF __TMT__}{$DEFINE PASCAL}{$ENDIF} {$IFDEF FPC }{$DEFINE PASCAL}{$ENDIF} {$IFNDEF PASCAL} {$IFNDEF DELPHI} Not Tested by JRS {$ENDIF} {$ENDIF} {* Version.pas *}