Работа с контролния CommonDialog
CommonDialog контрол позволява на разработчиците на приложения за сближаване на развитието на интерфейса на програмата към стила, използван в Windows.
Така че, както аз често трябваше да се справи с проблема, свързан с използването и експлоатацията на контрол CommonDialog и наскоро получила множество имейли с въпроси за прилагането му, той решава да сподели с всички, че аз знам. Използването на всеки диалогов прозорец ще се опита да даде на отделен преглед.
Преди да започнете, изберете менюто Project | Компоненти контролен елемент MicrosoftCommon диалог контрол 6.0. В лентата с инструменти ще електронна поща икона. контрол CommonDialog.
Място за вашата електронна поща форма. контрола CommonDialog, вие получавате възможност да се обадя тези прозорци, като например:
1.Okno диалог Open;
2.Okno диалоговия Save As;
3.Okno Цвят диалог;
4.Okno Font диалог;
5.Okno диалог за печат;
Изборът на вида на диалогов прозорец се появява като зададете свойства в действие, съответстваща стойност или с помощта на подходящ метод.
Open диалогов прозорец
За да се обадите на диалоговия прозорец Open neohodimo CommonDialog1.Action сграда, разположена на 1 или да се прилага метод ShowOpen. Но, преди да сте въвели пълноправен прозорец Windows Open -koe, трябва да зададете номер на имота.
1. Задайте начална директория, която ще се отвори, когато са предвидени повикване CommonDialog1.
CommonDialog1.InitDir = "C: My Documents"
Освен ако не сте инсталирали този имот, директорията, която сте използвали за последен път ще се отвори по подразбиране.
2. Определете типа на файловете, които ще бъдат показани Отваряне на диалогов прозорец. За да направите това, ние заявяваме низ променлива strFileType и я възлага на необходимите стойности.
Дим strFileType Както стринга
strFileType = "Всички файлове (*. *) | * * |".
strFileType = StrFileType "Word документи (* .doc) | * .doc |"
strFileType = StrFileType "Текстови файлове (* .txt) | * .txt |"
Тогава имот филтър. CommonDialog. Задаваме стойност на променлива strFileType.
Забележка. Да не се включва интервали преди или след сепаратора, в противен случай няма да получите тези файлове, които са посочени.
Задайте филтъра по подразбиране, като изберете стойност на документите на Word.
Когато отворите диалоговия прозорец Open в текстовото поле "Файлове от тип". изглеждате Word документи (* .doc) надпис.
3. И накрая, ние се покаже диалоговия прозорец Open.
Разбира се, след като ти се обадя диалоговия прозорец Open. тогава той трябва да се използва по предназначение, т.е. изберете файла и да го отворите. избор на файла се извършва както в Windows - електронна, а да продължи да се предава към пътя на програмата и името на файла, който сте избрали на файла. Има две свойства CommonDialog1 за тази цел - както и.
CommonDialog1.FileTitle - връща избрано името на файла с разширение (например "Hello.doc".);
CommonDialog1.FileName - връща по пътя към избрания файл (. Например "C: My DocumentsHello.doc");
Знаейки тази информация, можете да направите необходимите операции по избраните файлове.
Сега ние трябва да защитим програмата от неочаквани действия на потребителя.
Какво може един потребител.
1.Vvesti несъществуващ файл или някакви знаци и кликнете върху бутона Open;
2. Да не се избере някоя от файла, щракнете върху бутона Open;
За да се предотвратят подобни действия Flags собственост, за да се задава съответния константа.
cdlOFNFileMustExist - Посочва, че потребителят може да влезе само имена на съществуващи файлове, ако флагът е зададен и потребителят въведе невалиден името на файла, се показва предупреждение. Този флаг автоматично задава cdlOFNPathMustExist флаг.
Предупреждение. На диалоговия прозорец Open е флага да се даде възможност на опцията "Отвори като само за четене". не смятаме, че работата на този флаг, това ще добави още една константа, която го премахва от диалоговия панел.
cdlOFNHideReadOnly - Прави невидим ключ само за четене.
И сега на имота Flags е както следва.
CommonDialog1.Flags = CdlOFNFileMustExist или CdlOFNHideReadOnly
3. Не изберете файловете, натиснете бутона Отказ;
4.Vybrat файл и натиснете бутона Отказ;
Какво щеше да се предотврати появата на грешки в тези действия на потребителя допълни горе манипулатор код за грешка. Трябва да се отбележи, че грешката трябва да създава самия диалогов прозорец, за това, CommonDialog1.CancelError собственост е настроена да True. Tepr като кликнете върху бутона Cancel ще генерира 32 755 грешка - Отказ беше избран (Изберете Отказ).
Сега skompanuem всички по-горе в един подреден код:
Частни Под mnuOpen_Click ()
"Декларирам низ променлива да зададете типове файлове
Дим strFileType Както стринга
"Ако възникне грешка, т.е. потребителят nazhel бутона Отказ,
"Отидете на грешката манипулатор - ErrorHandler
На Error GoTo ErrorHandler
"Позволява генерирането на грешки дозиране
"Инициализиране на променливата strFileType низ
strFileType = "Всички файлове (*. *) | * * |".
strFileType = StrFileType "Word документи (* .doc) | * .doc |"
strFileType = StrFileType "Текстови файлове (* .txt) | * .txt |"
"Задаване си свойства Филтър
"Задайте желаното индекса
"Directory се инициализира svostvu InitDir
"Осигурява защита срещу неправилно въведен даден файл или директория, както и скриване на знамето като само за четене
CommonDialog1.Flags = cdlOFNFileMustExist или cdlOFNHideReadOnly
"Обадете се отваря диалога
CommonDialog1.Action = 1 "Или CommonDialog1.ShowOpen
"Налице е разположен вашия код. (Не забравяйте, че по пътя към файла, който се чете от името на файла на имот)
"Обработка на засечени грешки дозиране
Ако Err.Number = 32,755 Тогава
Сега отвореният диалог е готов за работа.
Ако искате да експериментирате с един прозорец Отваряне на диалогов прозорец. По-долу са константи могат да бъдат причислени към собственост изкупни Flags.
Свързани статии