Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.02.13;
Скачать: CL | DM;

Вниз

Подключить базу, которая на другом компьютере   Найти похожие ветки 

 
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;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.028 c
1-38930
Pahan_
2004-02-02 22:31
2004.02.13
Как преобразовать строку в Unicode, а так же из Unicode?


1-38818
AGN
2004-01-22 17:55
2004.02.13
URL


14-39021
Knight
2004-01-24 18:23
2004.02.13
Пока ставится Win98...


1-38902
electric
2004-02-04 15:15
2004.02.13
Получение тело письма и прикреплённых файлов с помощью TIdPOP3


14-39066
Rauf
2004-01-24 17:17
2004.02.13
Проверяет ли Outlook Express или Microsoft Outlook на вирусы???