Приступил не так давно к изучению freepascal по этому вопросы у меня достаточно глупые.
1. В среде Lazarus создаю консольное приложение, ввожу следующий код:
Код: Выделить всё
program project1;
{$mode objfpc}{$H+}
uses
Classes, SysUtils, CustApp;
var
fname: textfile;
data: string;
begin
assign(fname,'f.txt');
while not eof(fname) do
begin
readln(fname, data);
write(data);
end;
close(fname);
end.
Создаю в каталоге с исполняющим файлом текстовый файл "f.txt" который содержит в себе числа от 1 до 10 в строчку.
При запуске исполняемого файла проекта выдает следующую ошибку:
Код: Выделить всё
An unhandled exception occurred at $00000000004015CE :
EInOutError : File not open
$00000000004015CE main, line 18 of project1.lpr
Пробовал запустить программу и в Windows и в Linux, ошибка аналогичная.
2. Можно ли проект с формой созданный в Delphi как то подгрузить в Lazarus?
