Сохранение

← →
Triny (2003-12-02 13:13) [0]

Ужо 3 часа маюсь с дельфи... надо для своехо блокнотика написать погу обычного сохранения...чтоб он не запрашивал куда сохранять.. а сохранял например в Мои документы... а он спрашивает....пожалуста помогите...
А ещё, как написать автосохранение например через каждые 5 минут...?
Зараниее пасибо...

← →
Тимохов (2003-12-02 13:16) [1]

А что такое "необычное" сохранение?
(Не издеваюсь, просто вопрос уточняю, что Вам уже известно и на что отвечать уже не надо).

← →
Ru © (2003-12-02 13:22) [2]

>Triny (02.12.03 13:13)

если пользуешь TMemo то так:
Memo1.Lines.SaveToFile("C:\Мои документы\biliberda.txt");

← →
Triny (2003-12-02 13:31) [3]

ну необычное, это - сохранить как...

← →
Тимохов (2003-12-02 13:33) [4]

aaa...
Все-таки не совсем, наверное, корректный вопрос:
1. Не сказано чем Вы пользуетесь для написани блокнотика
2. Без ответа на п.1. не очень понятно, что значит "чтобы оне не запрашивал куда сохранять"

Проясните ситуацию...

← →
Triny (2003-12-02 13:36) [5]

Не сказано чем Вы пользуетесь для написани блокнотика - а вот эту фразу я тоже не очень поняла

← →
Тимохов (2003-12-02 13:40) [6]

Тогда спрошу: что такое "свой блокнотик"?
Как это понимать?

> Triny (02.12.03 13:36) [5]

Имеется в виду наверное, TMemo, TRichEdit или может вообще используется API.

Если он запрашивает, куда сохранять, значит у него есть TOpenDialog, я правильно понял? Что стоит, его отключить тогда?

>Triny (02.12.03 13:36) [5]

компонент для отображения текста (Memo, RichEdit)
для открытия файла: TOpenDialog
для сохранения TSaveDialog
переменную для имени файла
переменную для того, чтобы помнить файл уже сохранён или как

В меню создать пункты:
- Сохранить
- Сохранить как ...

var
FileSaved:boolean;
EditFileName:string;

для сохранить обработчик:
if FileSaved then Memo.SaveToFile(EditFileName) else begin
if SaveDialog.Execute do begin
EditFileName:=SaveDialog.FileName; //запомним для последующего использования
Memo.SaveToFile(EditFileName);
FileSaved:=true;
end;//if SaveDialog.Execute do begin
end;//if FileSaved then Memo.SaveToFile(EditFileName) else begin

для сохранить как:
if SaveDialog.Execute do begin
EditFileName:=SaveDialog.FileName; //новое имя
Memo.SaveToFile(EditFileName);
FileSaved:=true;
end;//if SaveDialog.Execute do begin

> А ещё, как написать автосохранение например через каждые
> 5 минут...?

Таймер поставь

Сохранение Найти похожие ветки