Вниз
Скачать: CL | DM;

OpenDialog - кто сталкивался???   Найти похожие ветки 

← →
VZup ©   (2004-10-27 15:30) [0]

Описываю так:

ofn.lStructSize:=76;
ofn.hwndOwner:=MainWnd;
ofn.lpstrFile:=FileName;
ofn.lpstrFilter:="txt-files (*.txt)"+ #0+"*.txt"+#0#0;
ofn.nFilterIndex:=1;
ofn.nMaxFile:=SizeOf(FileName);
ofn.Flags:=OFN_PATHMUSTEXIST or OFN_FILEMUSTEXIST;

Но привыборе файла и нажатии на ОК, диалог закрывается lpstrFile (он же FileName) остается пустым. В чем причина, подскажите.


← →
clickmaker ©   (2004-10-27 15:32) [1]

как объявлена FileName?
и почему ofn.lStructSize:=76;
а не ofn.lStructSize:=SizeOf(ofn); ?


← →
VZup ©   (2004-10-27 15:42) [2]

FileName: PChar;

А по поводу ofn.lStructSize:=76 - кто-то подсказал (здесь на форуме), а так и так, все равно lpstrFile пустой.


← →
GuAV ©   (2004-10-27 16:15) [3]

VZup ©   (27.10.04 15:42) [2]
FileName: PChar;


VZup ©   (27.10.04 15:30)
ofn.nMaxFile:=SizeOf(FileName);


В четыре байта имя файла не поместится. И наверное ещё память не выделяешь.

Надо или FileName: array[0..MAX_PATH] of Char;
или
Выделять память для PChar (или SetLength для строки) и тогда в ofn.nMaxFile:= писать длину.


← →
VZup ©   (2004-10-27 16:35) [4]


> GuAV ©

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


← →
VZup ©   (2004-10-27 16:45) [5]

Можно еще вопросик: когда OpenDialog вылазит, на панели задач появляется его кнопка, можно ли как-то ее убрать (спрятать)?


← →
DVM ©   (2004-10-27 19:45) [6]


> clickmaker ©   (27.10.04 15:32) [1]
> как объявлена FileName?
> и почему ofn.lStructSize:=76;
> а не ofn.lStructSize:=SizeOf(ofn); ?

Попробуйте скомпилировать программу под XP, а потом запустить под 98. Не заработает. Это я ему подсказал.


← →
марсианин ©   (2004-10-27 22:02) [7]


> когда OpenDialog вылазит, на панели задач появляется его
> кнопка, можно ли как-то ее убрать (спрятать)?


> ofn.hwndOwner:=MainWnd;


ты уверен, что MainWnd<>0?



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

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.02 c
1-1101658158
dimson301
2004-11-28 19:09
2004.12.12
Error creating form в Design Time


10-1057851689
sam08
2003-07-10 19:41
2004.12.12
не получается элементарная клиент-серв. с &#xA0;использ. CORBA


3-1100301804
Dik
2004-11-13 02:23
2004.12.12
Отмена сообщения об ошибке


14-1100783094
Digitman
2004-11-18 16:04
2004.12.12
Не едут лыжи к вечеру .. не вижу очевидного .. ткните носом ?


9-1091858675
dimodim
2004-08-07 10:04
2004.12.12
About анимация 3д моделей




   Наверх