--- oup/rewrite/Helper/Helper_LevelDB.pas 2007/01/18 17:15:59 93 +++ oup/rewrite/Helper/LevelDB.pas 2007/02/21 00:29:27 105 @@ -15,11 +15,11 @@ type lbl_estimation: TLabel; procedure btn_abortokClick(Sender: TObject); private - procedure HandleFile(ext: String; fileid: LongWord; dir_dat2db: Boolean); + procedure HandleFile(ext: String; fileid: Integer; dir_dat2db: Boolean); procedure stop_convert; public - procedure CreateDatabase(Source, target: String); - procedure CreateLevel(Source, target: String); + procedure CreateDatabase(Source, Target: String); + procedure CreateLevel(Source, Target: String); end; @@ -30,8 +30,7 @@ implementation {$R *.dfm} -uses ABSMain, ABSDecUtil, Main, Functions, Data, - OniImgClass, DataStructures, OniDataClass; +uses ABSMain, ABSDecUtil, Main, Functions, Data, OniImgClass, DataStructures, ConnectionManager; type THandler = procedure(fileid: LongWord; dir_dat2db: Boolean);