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

Диалоги через API   Найти похожие ветки 

← →
Gefest ©   (2003-04-12 08:58) [0]

Можно ли вызвать стандартный диалог Windows открыть-сохранить через API? И если можно, то как?

---

← →
Morfein ©   (2003-04-12 15:13) [1]

GetOpenFileName/GetSaveFileName соответсвенно...

---

← →
Gefest ©   (2003-04-13 20:05) [2]

А по-подробнее нельзя?

---

← →
Gefest ©   (2003-04-13 21:25) [3]

Народ!
Пожалуйста помогите примером. Пробовал по-всякому вызов не происходит!!??!??
ПЛиЗЗЗЗЗЗЗЗЗ.

---

← →
[lamer]Barmaglot ©   (2003-04-14 10:14) [4]


Uses CommDlg;

procedure TForm1.Button1Click(Sender: TObject);
const
Filter: Array[0..255] of Char="text file"+#0+"*.txt"+#0+#0;
var
OFN: TagOFN;
Buffer: Array[0..255] of Char;
begin
OFN.lStructSize:=Sizeof(OFN);
OFN.hWndOwner:=0;
OFN.hInstance:=0;
OFN.lpstrFilter:=Filter;
OFN.lpstrCustomFilter:=0;
OFN.lpstrFile:=buffer;
OFN.nMaxFile:=256;
OFN.lpstrFileTitle:="lamer";
OFN.lpstrTitle:="lamer1";
OFN.lpstrInitialDir:="c:\";
OFN.nMaxFileTitle:=16;
OFN.Flags:=OFN_PATHMUSTEXIST or OFN_FILEMUSTEXIST or OFN_HIDEREADONLY;
OFN.lpTemplateName:=0;
GetOpenFileName(OFN);
end;


---

← →
Gefest ©   (2003-04-14 10:35) [5]

Спасибо! Теперь все работает.

---

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

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



Память: 0.45 MB
Время: 0.014 c