Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Базы";
Текущий архив: 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.46 MB
Время: 0.012 c
1-38957
Прямой
2004-02-03 19:50
2004.02.13
Добавить из TreeView в другой TreeView


7-39108
Cosinus
2003-11-26 18:42
2004.02.13
Защита от монитора портов


1-38778
MadGhost
2004-02-04 21:58
2004.02.13
можно ли создать свой курсор мыши, и включить его в приложение?


14-39081
Кен
2004-01-24 04:08
2004.02.13
Реклама под видом новостей


14-39017
Ig
2004-01-26 00:03
2004.02.13
Перехват сообщения Windows





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский