Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате
Форум программистов > Delphi: Общие вопросы > Путь сохранения файла


Автор: fiestaboom 14.1.2009, 14:16
Здравствуйте, подскажите. Как сделать в программе путь сохранения файла указанный пользователем. Проект закачка файлов, тоесть пользователь указывает путь для складирования файлов и указывает путь в виндовс(например  D:\Downloads) и говорит ОК. Все файлы должны сохраняться каждый раз при новом запуске именно туда. Я в Делфи не сильно, если есть разжёванный пример, буду очень признателен. Спасибо.

Автор: Frees 14.1.2009, 14:22
Цитата(fiestaboom @  14.1.2009,  16:16 Найти цитируемый пост)
Проект закачка файлов, тоесть пользователь указывает путь для складирования файлов и указывает путь в виндовс(например  D:\Downloads) и говорит ОК

путь для складирования и путь в видоус, зачем два пути?

Цитата(fiestaboom @  14.1.2009,  16:16 Найти цитируемый пост)
Все файлы должны сохраняться каждый раз при новом запуске именно туда

ты имееш в виду что бы востанавливался последний выбор пользователя после перезапуска проги?
то вот
Код

uses INIFile
...

procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction);
var
IniFile:TIniFile;
begin
IniFile := TIniFile.Create(ExtractFileDir(Application.ExeName)+'\options.ini');
IniFile.WriteString('Options' , 'dir', Edit1.text);
IniFile.Free;
end;

procedure TForm1.FormCreate(Sender: TObject);
var
IniFile:TIniFile;
begin
IniFile := TIniFile.Create(ExtractFileDir(Application.ExeName)+'\options.ini');
Edit1.text := IniFile.ReadString('Options' , 'dir', '');
IniFile.Free;
end;

Автор: THandle 14.1.2009, 14:28
fiestaboom, либо http://forum.vingrad.ru/articles/topic-200341.html, либо http://forum.vingrad.ru/articles/topic-197956.html думаю подойдут.


Frees, где try..finally? Зачем тут переменная?
ИМХО, лучше with TIniFile.Create do....

Автор: Frees 14.1.2009, 15:03
Цитата(THandle @  14.1.2009,  16:28 Найти цитируемый пост)
with TIniFile.Create do....

безспорно

Цитата(THandle @  14.1.2009,  16:28 Найти цитируемый пост)
где try..finally?

тоже верно

THandle, яж просто идею показал

Автор: fiestaboom 14.1.2009, 16:05
Цитата(Frees @ 14.1.2009,  14:22)
Цитата(fiestaboom @  14.1.2009,  16:16 Найти цитируемый пост)
Проект закачка файлов, тоесть пользователь указывает путь для складирования файлов и указывает путь в виндовс(например  D:\Downloads) и говорит ОК

путь для складирования и путь в видоус, зачем два пути?

путь один, наверно я неправильно выразился)) 
Да ты правильно понял. (по поводу кода который привел)
Вопрос по коду:
INIFile и IniFile это разные вещи???

Автор: Frees 15.1.2009, 07:09
Цитата(fiestaboom @  14.1.2009,  18:05 Найти цитируемый пост)
INIFile и IniFile это разные вещи???

delphi регистро независима

Автор: fiestaboom 15.1.2009, 09:49
Цитата(Frees @ 15.1.2009,  07:09)
Цитата(fiestaboom @  14.1.2009,  18:05 Найти цитируемый пост)
INIFile и IniFile это разные вещи???

delphi регистро независима

Почему указал в юзах INIFile заругалась на not found INIFile.dcu, указал второй вариант все путем собралось....)))

Автор: vladimir74 15.1.2009, 10:37
Цитата(fiestaboom @  15.1.2009,  07:49 Найти цитируемый пост)
Почему указал в юзах INIFile заругалась на not found INIFile.dcu, указал второй вариант все путем собралось....))) 

потому что модуль называется IniFiles а не INIFile   smile (дело не в регистре а в одной буковке) 

Автор: fiestaboom 15.1.2009, 16:10
Цитата(vladimir74 @ 15.1.2009,  10:37)
Цитата(fiestaboom @  15.1.2009,  07:49 Найти цитируемый пост)
Почему указал в юзах INIFile заругалась на not found INIFile.dcu, указал второй вариант все путем собралось....))) 

потому что модуль называется IniFiles а не INIFile   smile (дело не в регистре а в одной буковке)

))да невнимательность грешное дело...вобщем Спасибо парни всем кто помогал..разобрался все сделал.Еще раз сенкью. smile 

Powered by Invision Power Board (http://www.invisionboard.com)
© Invision Power Services (http://www.invisionpower.com)