OpenDialog - БД в Delphi

Cabyrc · 04.04.2009, 07:19

Всем доброго дня! Можно ли каким-то образом из OpenDialog.FileName вытащить разрешение файла, я пытался OpenDialog.FileName = '*.mdb', но это не проходит

vovk · 04.04.2009, 08:34

Может вы имели в виду чтото вроде этого? если нет то не понял вопроса

Код:

OpenDialog1.Filter:='Access|*.mdb';

честно говоря словосочетание "разрешение файла" немного в ступор вводит

Cabyrc · 05.04.2009, 06:18

vovk Нет, то что вы написали это фильтр. Мне же надо создать условие выбора по расширению файла, например *.mdb или *.dbc. Эти файлы открываются в приложении при помощи OpenDialog и я хочу из свойства OpenDialog.FileName вытащить это разрешение файла

Serge_Bliznykov · 05.04.2009, 07:51

в Sysutils есть функция

Код:

function ExtractFileExt(const FileName: string): string;

для Вашего случая:

Код:

if UpperCase(ExtractFileExt(OpenDialog.FileName )) = '.MDB' then ...

Cabyrc · 05.04.2009, 11:56

Ok, спасибо

04.04.2009, 07:19	#1
Cabyrc Пользователь Регистрация: 17.03.2009 Сообщений: 17	OpenDialog Всем доброго дня! Можно ли каким-то образом из OpenDialog.FileName вытащить разрешение файла, я пытался OpenDialog.FileName = '*.mdb', но это не проходит

04.04.2009, 08:34	#2
vovk != Участник клуба Регистрация: 08.09.2008 Сообщений: 1,751	Может вы имели в виду чтото вроде этого? если нет то не понял вопроса Код: `OpenDialog1.Filter:='Access\|.mdb';` честно говоря словосочетание "разрешение файла" немного в ступор вводит Последний раз редактировалось vovk; 04.04.2009 в 14:09.*

05.04.2009, 07:51	#4
Serge_Bliznykov Старожил Регистрация: 09.01.2008 Сообщений: 26,229	в Sysutils есть функция Код: `function ExtractFileExt(const FileName: string): string;` для Вашего случая: Код: `if UpperCase(ExtractFileExt(OpenDialog.FileName )) = '.MDB' then ...`

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
opendialog	blackstersl	Общие вопросы Delphi	4	18.09.2008 15:21
opendialog	blackstersl	Общие вопросы Delphi	1	11.09.2008 18:23
OpenDialog	Андрей=	Компоненты Delphi	6	03.05.2008 15:06
OpenDialog	Rahim1993	Общие вопросы Delphi	20	21.01.2008 08:26
OpenDialog.Options:=OpenDialog.Options+[ofAllowMultiSelect];	necky	Компоненты Delphi	2	11.08.2007 12:53

05.04.2009, 06:18	#3
Cabyrc Пользователь Регистрация: 17.03.2009 Сообщений: 17	vovk Нет, то что вы написали это фильтр. Мне же надо создать условие выбора по расширению файла, например .mdb или .dbc. Эти файлы открываются в приложении при помощи OpenDialog и я хочу из свойства OpenDialog.FileName вытащить это разрешение файла

05.04.2009, 11:56	#5
Cabyrc Пользователь Регистрация: 17.03.2009 Сообщений: 17	Ok, спасибо