![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
не сохраняются расширения [D5, XP]
snowkam © (2009-10-23 09:05:00)Вот такой пример
saveDialog.Filter := 'Text file|*.txt|Word file|*.doc';
saveDialog.DefaultExt := 'txt';
saveDialog.FilterIndex := 1;
SaveDialog1.FileName:= 'DATE_STATE';
if SaveDialog1.Execute then
memo1.Lines.SaveToFile(SaveDialog1.FileName);
Выполняется сохранение файла только без расширение!!!
Как сделать чтобы сохранялось и с расширением??
Tinky (2009-10-23 10:09:00) [1]if SaveDialog1.Execute then memo1.Lines.SaveToFile(ChangeFileExt(SaveDialog1.FileName, '.txt'));
Tinky (2009-10-23 10:08:00) [2]saveDialog.DefaultExt := '.txt'
sniknik (2009-10-23 09:35:00) [3]SaveDialog1.FileName:= 'DATE_STATE.txt';
macrodenms (2009-10-23 09:16:00) [4]Дописать вручную.