запись в файл

[Prisian]

Помогите пожалуйста решить проблему: программа должна записывать в фалй определенную информацию, но при попытке записи она ругаэтся.
вот кусок кода:
uses: FileCtrl;
var
f:textfile;
s:string;
begin
if checklistbox1.checked=true then
BEGIN
s:='0';
assignfile(f,'Myfile.txt');
rewrite(f);
write(f,s);
closefile(f);
end;

компилятор не ругается при компилировании, но когда запущена программа, выдает ошибку I/O error 32, и выделяется строка rewrite(f). Пробывал также Reset и Append при созданом файле.
Иногда компилятор все-таки ругался: unit "FileCtrl" is specific to a platform.
Но есть одно но, чуть выше в программе, на реакцию нажатия кнопки тоже написал запись в файл(сосвем другой), но там работает.
Пожалуйста помогите решить проблему. Заранее благодарен.

[Net]

У меня без ошибок.

Вставьте куда-то код

showmessage(SysErrorMessage(32)); // или другой номер ошибки

и выполните. Хорошая штука при отладке.

Так что файл либо открыт где-то, либо используется какой то копией программы.

[bill]

1. Дам совет: при написании write(f, ит.д. ) до этого всегда используйте функ-ю append(f). Лично у меня иногда бывают ошибки если я ее не пишу.
2.

Сообщение от Prisian

if checklistbox1.checked=true then

У меня возникла ошибка здесь. Все таки надо указывать строку какую хотите вы спросить на вопрос -выбрана она или нет(checked).

[UnD)eaD)Snake]

Я ваще делал подругому:

memo1.lines.loadfromfile('C:\myfile .txt');

изменияем:

memo1.lines[0]:= '0';

сохраняем:

memo1.lines.savetofile('C:\myfile.t xt');

[4te]

есть оч удобная вещь - TStringList...
с её помощью можно легко сохранять\загружать текстовые файлы...

var s:TStringList;

begin
 s:=TStringList.Create();
 s.Add('test');
 s.SaveToFile(edit1.Text);
 s.Free;
end;

[SERG1980]

Согласен с 4tr удобная штука Stringlist сам им всегда пользуюсь

[JTG]

32 это вроде когда файл залочен. Может ещё где-то открывался в программе без closefile?