[habib2302]

доброе время суток. подскажите пожалуйста код для ansi на проверку на наличие файла перед распаковкой файлов
у меня есть один код, но при компиляции выдает ошибку

Код:

[code]
var found: boolean;

procedure NextButtonClick (CurPageID: integer): boolean;
begin
 if CurPageID=wpSelectDir then
 begin
  if not FileExists(AddBackslash(WizardForm.DirEdit.text) + 'CaptureDotNetRes.dll') then
  begin
    found:=false;
    result:=false;
    MsgBox('Отсутствуют некоторые файлы. Установка будет прервана!', MBinformation, mb_OK)
    WizardForm.Close;
  end
  else
    begin
    found:=true;
    result:=true;
    end;
 end
end;

procedure CancelButtonClick(CurPageID: Integer; var Cancel, Confirm: Boolean);
begin
  if ((CurPageID= wpSelectDir )and (not found)) then
  begin
  cancel:=true;
  confirm:=false;
  end;
end;