Форум программистов
 
Регистрация на форуме тут, о проблемах пишите сюда - alarforum@yandex.ru, проверяйте папку спам! Обязательно пройдите активизацию e-mail, а тут можно восстановить пароль

Купить рекламу на форуме 15-35 тыс рублей в месяц

Вернуться   Форум программистов > IT форум > Помощь студентам
Регистрация

Восстановить пароль
Повторная активизация e-mail

Ответ
 
Опции темы Поиск в этой теме
Старый 02.12.2010, 12:41   #1
Asblue
Пользователь
 
Аватар для Asblue
 
Регистрация: 21.10.2010
Сообщений: 78
Восклицание Сохраниение через SaveDialog

Здравствуйте!
Подскажите пожалуйста, как сохранить текст из Memo1 в формат '.pas' (Delphi, Pascal) автоматически в папку, заданную в коде программы.

Т.е. при нажатии кнопки Button1 не будет открываться окно для того, чтобы мы указали имя файла и выбрали путь его сохранения, а просто
нажали кнопку и всё, а наш файл уже сохранился там, где надо.

Вот мой код, но здесь обычное сохранение:
Код:
procedure TForm1.Button1Click(Sender: TObject);
var f:textfile;
begin
if SaveDialog1.Execute then
Memo1.Lines.SaveToFile(SaveDialog1.FileName+'.pas');
end;
Asblue вне форума Ответить с цитированием
Старый 02.12.2010, 12:44   #2
MaxNik2009
Форумчанин
 
Аватар для MaxNik2009
 
Регистрация: 17.09.2009
Сообщений: 294
По умолчанию

Код:
procedure TForm1.Button1Click(Sender: TObject);
begin
Memo1.Lines.SaveToFile('d:\Main.pas');
end;
принимаю благодарности в письменном виде( весы слева)...
MaxNik2009 вне форума Ответить с цитированием
Ответ
Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
SaveDialog nXs Общие вопросы Delphi 2 30.04.2010 15:28
Сохранение в savedialog Михаил Юрьевич Общие вопросы Delphi 5 23.10.2009 18:01
SaveDialog Valerich Общие вопросы Delphi 4 03.05.2009 16:53
Проблемы с сохранением файла через SaveDialog Волк Общие вопросы Delphi 4 05.02.2009 04:27