Как устранить "неопознанную" ошибку компиляции Free Pascal на TFileStream?
Я использую Free Pascal 2.6.4 32-bit в Windows 8.1. Я хочу использовать TFileStream для копирования файла.
program copy;
procedure CopyFile (strFilename : string);
var
SourceF, DestF : TFileStream;
begin
end;
begin
writeln('starting ');
end.
Компилятор не распознает TFileStream:
fpc copy_small.pas
Free Pascal Compiler version 2.6.4 [2014/03/06] for i386
Copyright (c) 1993-2014 by Florian Klaempfl and others
Target OS: Win32 for i386
Compiling copy_small.pas
copy_small.pas(5,33) Error: Identifier not found "TFileStream"
copy_small.pas(5,33) Error: Error in type definition
copy_small.pas(12) Fatal: There were 2 errors compiling module, stopping
Fatal: Compilation aborted
Error: C:\FPC\2.6.4\bin\i386-Win32\ppc386.exe returned an error exitcode (normal if you did not specify a source file to be compiled)
В примере кода, который я нашел в Интернете с помощью TFileStream, не было предложения "users". Есть ли что-то, что нужно установить в командной строке или включить в программу, чтобы использовать TFileStream с Free Pascal?
1 ответ
Решение
TFileStream
живет в Classes
блок, поэтому ваш код должен быть
program copy;
// To use any 'non-system' functionality add necessary units here
uses
Classes;
procedure CopyFile (strFilename : string);
var
SourceF, DestF : TFileStream;
begin
end;
begin
writeln('starting ');
end.