I Defined Variables Like below in a Function
var
MyFile: File;
DestinationFile: File;
StreamInTest: InStream;
OutStreamTest: OutStream;
Buffer: Text[250];
SkipLF: Boolean;
PackingCenterL: Record 14027060;
And Write Code Like below.
begin
NewFilePath := INSSTR(FilePathP,'_',STRLEN(FilePathP)-3);
MyFile.OPEN(FilePathP);
MyFile.CREATEINSTREAM(StreamInTest);
IF EXISTS(NewFilePath) THEN
ERASE(NewFilePath);
DestinationFile.CREATE(NewFilePath);
DestinationFile.CREATEOUTSTREAM(OutStreamTest);
Even though I am Getting same error.
Error : The type or method 'Open' cannot be used for 'Extension' development