Форум: "Базы";
Текущий архив: 2004.02.13;
Скачать: [xml.tar.bz2];
ВнизПодключить базу, которая на другом компьютере Найти похожие ветки
← →
Set (2004-01-23 16:37) [0]Вопрос вот в чём.
Ехе - одна версия на обоих компах. На одном из них база.
Так вот, я хочу сделать так, чтобы пользователь после запуска программы указывал ей путь к базе. Мне нужно, чтобы пользователь выбирал папку, а OpenDialog позволяет указать лишь конкетный файл. А нужно, чтобы он выбрал только папку.
← →
Sandman25 (2004-01-23 16:37) [1]SelectDirectory + F1
← →
Set (2004-01-23 16:42) [2]Вот с F1 проблемма - справки нет(такой достал Delphi) :(
← →
Sandman25 (2004-01-23 16:44) [3]procedure TfrPath.Button2Click(Sender: TObject);
var
Dir: string;
begin
Dir := edPath.Text;
SelectDirectory("Путь к БД", "", Dir);
edPath.Text := Dir;
end;
← →
Sandman25 (2004-01-23 16:45) [4]function SelectDirectory(const Caption: string; const Root: WideString; out Directory: string): Boolean; overload;
Warning: You can’t use the same variable for the Root parameter and the Directory parameter.
← →
Set (2004-01-23 16:47) [5]А что такое edPath?
Edit, в который вбивается путь?
← →
Sandman25 (2004-01-23 16:54) [6]Да.
В [4] параметры описаны.
← →
Set (2004-01-23 16:59) [7]А можно ли оойтись без Edit.
Ну как в OpenDialog - открылся диалог и прям в нём выбрать папку.
← →
Sandman25 (2004-01-23 17:07) [8][7] Set (23.01.04 16:59)
Конечно, можно.
SelectDirectory("Путь к БД", "", Dir);
Database.Params.Values["PATH"] := Dir;
← →
Set (2004-01-23 17:11) [9]Во, то что нужно.:)
Спасибо.
← →
Sandman25 (2004-01-23 17:13) [10]Только лучше проверить.
if SelectDirectory(...) then
Database....
Страницы: 1 вся ветка
Форум: "Базы";
Текущий архив: 2004.02.13;
Скачать: [xml.tar.bz2];
Память: 0.45 MB
Время: 0.012 c