Большой Воронежский Форум
» Программирование>помогите подправить процедуру в Delphi7!!!! Помогите доделать GUI-приложение!!
student1234 14:18 23.03.2008
// сохрание основного текстового файла
procedure TFrmText.FSaveClick(Sender: TObject);
begin

try
GlMemo.Lines.SaveToFile(FName)
except
FSaveAsClick(sender,FName,GlMemo);
end;
end;

вот процедура сохранения текстового файла. Программа работает, в принципе, но в одном случае вылетает, а именно, когда запускаю программу, ничего не ввожу и нажимаю "сохранить". Не подскажите что нужно сделать, чтобы процедура корректно осуществляла работу?
joff 14:43 23.03.2008
FName определи хотя-бы. Здесь этого не видно. Может где-нибудь в глобальных описаниях?
starkien 21:01 23.03.2008
Попробуй проверять перед сохранением на пустоту строки или на null/nil.
DeniSS1 16:09 24.03.2008
...и делать строку не пустой, а с пробелом.
student1234 21:22 25.03.2008
Спасибо. Разобрался с этим.(!)
Вверх