Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Низкоуровневое программирование > Win Api
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 23.11.2009, 17:40   #1
-CrAzYMaN-
 
Регистрация: 18.11.2009
Сообщений: 6
По умолчанию Диалоговое окно "Сохранить как..."

как сделать что бы при выборе файла через диалог "сохранить как" оно автоматом подставляло расширение файла? или только руками?
Код:
ZeroMemory(&ofn, sizeof(OPENFILENAME));
ofn.lStructSize = sizeof(OPENFILENAME);
ofn.hwndOwner = hdlg;
ofn.lpstrFile = szFile;
ofn.nMaxFile = sizeof(szFile);
ofn.lpstrFilter = "Файли резервних копій баз даних (*.gdb, *.fdb)\0*.gbk;*.fbk\0Всі файли (*.*)\0*.*\0\0";
ofn.nFilterIndex = 1;
ofn.lpstrFileTitle = NULL;
ofn.nMaxFileTitle = 0;
ofn.lpstrInitialDir = NULL;
ofn.Flags = OFN_PATHMUSTEXIST |OFN_HIDEREADONLY;
if (GetSaveFileName(&ofn)==TRUE)
{
	dlgitmhwnd = GetDlgItem(hdlg,IDC_EDIT5);
	SendMessage(dlgitmhwnd,WM_SETTEXT,(WPARAM)0,(LPARAM)szFile);
}
-CrAzYMaN- вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Аналог функции "Сохранить как->Веб-страница, полностью" beemoto Работа с сетью в Delphi 1 23.11.2009 17:12
Аналог функции "Сохранить как->Веб-страница, полностью" Magister Yoda Работа с сетью в Delphi 16 22.09.2009 12:53
при вводе на листе "магазин"- код товара появлялось "описание" товара из "склада" с "продажной ценой" aleksei78 Microsoft Office Excel 13 25.08.2009 12:04
Функция "Сохранить как" GibiW Мультимедиа в Delphi 2 14.05.2009 01:28
сделать окно "открыть","сохранить как" blackstersl Общие вопросы Delphi 1 24.08.2008 10:31