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

Вниз

Фильтр OpenDialog a   Найти похожие ветки 

 
VZup ©   (2004-10-24 21:20) [0]

Не могу разодраться с фильтром (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;


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


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

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


 
GuAV ©   (2004-10-25 00:27) [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";


 
VZup ©   (2004-10-25 08:31) [3]

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



Страницы: 1 вся ветка

Текущий архив: 2004.12.05;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.045 c
1-1100783805
opoloXAI
2004-11-18 16:16
2004.12.05
печать TStrings в TQuickRep.


1-1100784321
Alex1
2004-11-18 16:25
2004.12.05
Контекстное меню


4-1098200620
crio
2004-10-19 19:43
2004.12.05
Работа со сканером


3-1099658985
Mamed
2004-11-05 15:49
2004.12.05
Acces OLE Object and delphi image


1-1100702009
AlexxGold
2004-11-17 17:33
2004.12.05
Перевод ресурсов делфи