Сохранить как?

[InseR]

Как будет выглядеть функиця
"Сохранить как"?

[oleg kutkov]

Такой функции нет, в делфи есть компонет на закладке диалогов,
назвается savedialog.
Его можно вызвать, как savedialog.execute; и твой код, что и откуда
либо
with savedialog do begin
execute;
твой код;
end;

[InseR]

Ну вот у меня просто save выглядет вот так:
if savedialog1.execute then Memo1.lines.savetofile(savedialog1. filename);
А как сделать с помощью диалога save-сохранить как?

[oleg kutkov]

если тебе нужно, что бы в заголовке окна указывалось сохранить как...
то впиши такой код
savedialog1.captition:='сохранить как...';

если я правильно тебя понял

[InseR]

нет,мне надо чтобы были две функции,как в MS блокноте
Сохранить и Сохранить как,тоесть совершенно разные функции

[oleg kutkov]

вообще если у тебя "новый"(пустой) файл, то диалоги "сохранить" и "сохранить как" ничем не отличаются, когда же нужно сохранить изменения в существующем файле, никаких диалогов не вызывается, просто сразу
Memo1.lines.savetofile(имя твоего файла);
диалог сохранения вызывается только в случае "сохранить как", когда требуется пересохранить существующий файл под другим именем.

[InseR]

А как сделать,чтобы автоматически файл сохранялся в формате .txt?А то неудобно постоянно прописывать Имяфайлa.txt

[AHTOXA]

ну можно так:
SaveDialog1.FileName := SaveDialog1.FileName+'.txt';

[Speeker]

Можно при первом сохранении создать переменную котораюбудет запоминать имя файла и путь к нему и если выбрано команду "сохранить" то выполнять просто командой примерно
memo1.strings.savetofile(a:string); {Где а - переменная типа стринг в которой храниться путь к файлу}, а если выбрана команда сохранить как или переменная а пуста (а=’’) тогда уже
if savedialog1.execute then
memo1.strings.savetofile(іимя файла);

А для задание расширения тхт там в свойстве savedialog есть свойство, которое позволяет задавать маску файла, к сожаленю Делфи под руками нет, имя свойства не помню

[InseR]

Как сделать так,чтобы скролбар двигался вниз,если текст не вмешяется в поле?
Почему когда я выбираю из свойства Filter необходимые форматы для сохранения,они не действуют?
Напишите плиз полный код "Сохранить как".