Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Фильтр OpenDialog'a [D5, WinXP]


VZup ©   (2004-10-24 21:20:00) 

Не могу разодраться с фильтром (lpstrFilter) OpenDialog'a, по совету inic'a фильтр делаю так:
ofn.lpstrFilter:='"Text files",#0,"*.TXT",#0,"Any Files",#0,"*.*",#0#0';

Все остальное делаю так:
ZeroMemory(@Ofn, SizeOf(OPENFILENAME));
 ofn.lStructSize:=76;
 ofn.hwndOwner:=MainWnd;
 ofn.lpstrFile:=FileName;
 ofn.nMaxFile:=SizeOf(FileName);
 ofn.lpstrFilter:='"Text files",#0,"*.TXT",#0,"Any Files",#0,"*.*",#0#0';
 ofn.nFilterIndex:=1;
 ofn.Flags:=OFN_PATHMUSTEXIST or OFN_FILEMUSTEXIST or OFN_HIDEREADONLY;


Но ничего не получается


VZup   (2004-10-25 08:31:00) [1]

Спасибо, получилось!


GuAV   (2004-10-25 00:27:00) [2]

VZup ©   (24.10.04 21:20)
'"Text files",#0,"*.TXT",#0,"Any Files",#0,"*.*",#0#0';


Сшный синтаксис неправильно перевёл ? :-)

ofn.lpstrFilter:=
 'Text files' + #0 +  '*.TXT' + #0 +
 'Any Files'  + #0 +   '*.*'  + #0#0';


Маг Похмеляйнен   (2004-10-24 23:25:00) [3]

Если не получается, есть компонент TOpenDialog.
Зачем выбирать более сложный путь?


Наверх

Титульная страница Поиск, карта сайта Написать письмо