![]() |
|
#1
|
||||
|
||||
![]() Как при использовании TOpenDialog можно получить только путь к файлу, а не имя самого файла?
Мне нужно в DatabaseName загнать расположение базы, а с именем этой же базы он выкидает ошибку! Поживу - увижу, Доживу - узнаю, Выживу - учту. ![]() [P.S.]->Выражая благодарность за помощь - Вы получаете шанс на помощь в следующий раз
|
#2
|
|||
|
|||
![]() Extractfilepath(o.filename);
|
#3
|
||||
|
||||
![]() Этим ты получаешь путь к ЕХЕ файлу, а не к самой базе!
Поживу - увижу, Доживу - узнаю, Выживу - учту. ![]() [P.S.]->Выражая благодарность за помощь - Вы получаете шанс на помощь в следующий раз
|
#4
|
||||
|
||||
![]() Цитата:
Код:
ExtractFileName(o.FileName); --------------------------------------------- Программирование - не профессия, а стиль жизни |
#5
|
||||
|
||||
![]() Ребята, я же просил для TOpenDialog, а это для обычного файла!
Поживу - увижу, Доживу - узнаю, Выживу - учту. ![]() [P.S.]->Выражая благодарность за помощь - Вы получаете шанс на помощь в следующий раз
|
#6
|
||||
|
||||
![]() Мне кажется, что тебе TOpenDialog не подходит вообще, создай свою форму, а на нее поставь компонент TShellTreeView.
Что делать, когда сломался комп: 1. Если вы юзер - делать ноги. 2. Если ремонтник - делать деньги. 3. Если вы программист - делать вид, что так было задумано. |
#7
|
||||
|
||||
![]() ![]() ОГРОМНЕЙШОЕ СПАСИБО ![]() Поживу - увижу, Доживу - узнаю, Выживу - учту. ![]() [P.S.]->Выражая благодарность за помощь - Вы получаете шанс на помощь в следующий раз
|
#8
|
||||
|
||||
![]() Всегда пожалуйста!
Что делать, когда сломался комп: 1. Если вы юзер - делать ноги. 2. Если ремонтник - делать деньги. 3. Если вы программист - делать вид, что так было задумано. |
#9
|
||||
|
||||
![]() Можно ли в MessageDlg установить вывод кнопок не на английском а на русском языке? И как это сделать?
![]() ![]() ![]() Поживу - увижу, Доживу - узнаю, Выживу - учту. ![]() [P.S.]->Выражая благодарность за помощь - Вы получаете шанс на помощь в следующий раз
|
#10
|
|||
|
|||
![]() Вот один из способов. У меня русифицированная Windows. И если вызвать функцию MessageBox, то названия будут по-русски.
Код:
procedure TForm1.Button1Click(Sender: TObject); begin Application.MessageBox('Text', 'Caption', MB_YESNOCANCEL); end; Последний раз редактировалось AlexSku, 16.11.2007 в 17:05. |