DELPHI 5でコンパイルできたソースがDELPHI 6でコンパイルできない
DELPHI 5(英語版)でコンパイルできたソースが、DELPHI 6(personal、無償版、日本語版)でコンパイルをしようとするとエラーが出てコンパイルできません。一般的に、5から6へ移行する際に注意することがありますでしょうか?あるいは、英語版と日本語版で異なるという可能性はありますでしょうか?
ソースの一部は以下の通りです。
**********
IMPLEMENTATION
USES Windows, Messages, Dialogs, FileCtrl;
CONST BUFLEN = 10240;
FindSortMax = 1024;
SHIFT_RECHTS = 1; (* Flags f・ Sondertasten *)
SHIFT_LINKS = 2; (* Flags f・ Sondertasten *)
CTRL = 4; (* Flags f・ Sondertasten *)
ALT = 8; (* Flags f・ Sondertasten *)
SCROLL = 16; (* Flags f・ Sondertasten *)
NUM_LOCK = 32; (* Flags f・ Sondertasten *)
CAPS_LOCK = 64; (* Flags f・ Sondertasten *)
TYPE BufAr = ARRAY [1..BUFLEN] OF BYTE;
TextFiles = RECORD
open : BOOLEAN;
Name : STRING[255];
buffer : ^BufAr;
END;
Zeichen = RECORD C : CHAR; A : BYTE; END;
Screen = ARRAY [1..25] OF ARRAY [1..80] OF Zeichen;
(* Entspricht der EGA/VGA Bildschirmstruktur *)
VAR TF : ARRAY[1..MAXFILES] OF TextFiles;
i : INTEGER;
VGA : Screen ABSOLUTE $0B800; (* VGA-Screen-Adresse *)
sommerzeit : BOOLEAN;
stmp : STRING;
FindSortNr : INTEGER;
FindSortP : INTEGER;
FindSortRecs: ARRAY[1..FindSortMax] OF ^TSearchRec;
ActTextForeGround, ActTextBackGround : BYTE;
**********
エラーは、「VGA : Screen ABSOLUTE $0B800; (* VGA-Screen-Adresse *)」の行にて、
[エラー] Alib.pas(605): 変数名が必要です
と言うエラーが出ます。
他人からもらったソースの為、問題を簡略化して示すことができないのですが、もし上記の情報だけで何かしら問題点があるようでしたらお教えいただければ幸いです。
お礼
処理的に想定される部分には、StrToIntDefを使用していますが、それ以外はStrToIntです。 意味のある値をinit型に変換しているので全てを代替えはできません。 (本来数値が入っているはずが、何らかの原因によって空白になっているようです。この原因箇所の特定が目的なんです。) ありがとうございました。 また何か良い案がありましたら宜しくお願い致します。