Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2003.12.12;
Скачать: [xml.tar.bz2];

Вниз

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

 
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]

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


 
Леприкон   (2003-12-02 13:45) [7]


> Triny (02.12.03 13:36) [5]


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

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


 
Ru   (2003-12-02 13:45) [8]

>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


 
k-man   (2003-12-02 13:53) [9]


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

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



Страницы: 1 вся ветка

Форум: "Основная";
Текущий архив: 2003.12.12;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.46 MB
Время: 0.006 c
14-36827
IgAn
2003-11-19 06:53
2003.12.12
Почему то не работает


3-36550
rosl
2003-11-13 08:27
2003.12.12
запрос sql


1-36757
bug008
2003-11-30 21:52
2003.12.12
StayOnTop


1-36613
BaDeVlad
2003-12-01 14:05
2003.12.12
Можно ли задать размер файла на диске ничего не записывая?


1-36754
qwertyu
2003-12-03 09:34
2003.12.12
Свойства





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский