Рассылка закрыта
При закрытии подписчики были переданы в рассылку "Программирование на Visual Basic/Visual Studio и ASP/ASP.NET" на которую и рекомендуем вам подписаться.
Вы можете найти рассылки сходной тематики в Каталоге рассылок.
| ← Август 2001 → | ||||||
|
1
|
2
|
3
|
4
|
5
|
||
|---|---|---|---|---|---|---|
|
6
|
7
|
8
|
9
|
10
|
11
|
12
|
|
13
|
15
|
16
|
17
|
18
|
19
|
|
|
20
|
21
|
22
|
24
|
25
|
26
|
|
|
27
|
28
|
29
|
30
|
31
|
||
Автор
Статистика
7.043 подписчиков
-23 за неделю
-23 за неделю
Новости сайта Visual Basic Helper
| |||
| Здравствуйте, уважаемые подписчики рассылки "Новости сайта Visual Basic Helper". Читайте в этом выпуске: | |||
|
- Обновление сайта - Настройка панели в Visual Basic - Изменение бордюра TextBox - Описание функции MoveFile - Описание функции ChooseColor | |||
| Обновление сайта | |||
| В раздел API функции добавлено 20 описаний API функций: AngelArc, Arc, Beep, BringWindowToTop, CharLower, CharUpper, ChooseColor, CreateDirectory, CreateDirectoryEx, CreatePen, CreatePenInderect, CreateSolidBrush, DeleteObject, EnableWindow, EnumWindows, ExtFloodFill, FindWindow, GetPixel, MoveFile, PaintDesktop. Также в раздел добавлен глоссарий - основные термины и понятия, связанные с работой API функций (сейчас в глоссарии только три термина, но раздел постоянно обновляется). Если у вас есть описание API функции и вы хотите разместить его на сайте Visual Basic Helper, то скачайте программу API Description Maker, с помощью которой вы быстро и удобно создадите описание функции, программа сама создаст HTML файл с дизайном сайта Visual Basic Helper. | |||
| Обновлён ActiveX элемент InetState. Текущая версия - 1.1, в которой была исправлена ошибка с определением свойств Интрнет - соединения и было добавлено несколько новых свойств. | |||
| Настройка панели в Visual Basic | |||
Совет по улучшению панели инструментов в VB - добавьте на вашу панель кнопку "Сохранить [имя файла]", это упростит сохранение текущей формы, модуля или другого файла. Делается это вот так: правым кликом по панели инструментов выводим меню и выбираем пункт "Настроить". В открывшемся диалоговом окне выбираем закладку "Команды", в списке "Категории" выбираем элемент "Файл" и из соседнего списка перетаскиваем на панель команду "Сохранить [имя файла]". Вот что у меня получилось: | |||
| Изменение бордюра TextBox | |||
| Совет для тех, кого не устраивает стандартный двойной бордюр текстового поля (TextBox), а заменим мы его на одинарный бордюр, который в некоторых случаях смотрится намного красивее. Для этого необходимо использовать API Функцию SetWindowLong: | |||
| Private Declare Function SetWindowLong Lib "user32" Alias "SetWindowLongA" (ByVal hwnd As Long, ByVal nIndex As Long, ByVal dwNewLong As Long) As Long Private Const GWL_style="(-16)" Private Const WS_BORDER = &H800000 Private Const WS_CHILD = &H40000000 Private Const WS_VISIBLE = &H10000000 | |||
| Код для изменения стиля добавим в загрузку формы, в которой находится TextBox (txtFlat): | |||
| Private Sub Form_Load () retVal = SetWindowLong (txtFlat.hwnd, GWL_STYLE, WS_BORDER OR WS_CHILD OR WS_VISIBLE End Sub | |||
| Вот и готово, но тут могут возникнуть некоторые проблемы, одна из них - это если TextBox имеет ScrollBar, то он просто перестаёт нормально работать. Напишите мне, если понадобится решение этой проблемы. | |||
| Описание функции MoveFile | |||
| Функция MoveFile перемещает или переименовывает файл или папку. Если переименовывается или перемещается папка, то переименовываются или перемещаются все подпапки (изменяются пути к подпапкам). | |||
| lpExistingFileName - Файл или папка для перемещения или переименовывания. | |||
| lpNewFileName - Новое имя для файла или папки. | |||
| В случае успеха функция возвращает 1, в случае ошибки функция возвращает 0. | |||
| Описание функции ChooseColor | |||
| Функция ChooseColor открывает стандартное окно Common Dialogs для выбора цвета. Вся необходимая информация для создания диалогового окна хранится в структуре CHOOSECOLOR. | |||
| Declare Function ChooseColor Lib "comdlg32.dll" Alias "ChooseColorA" (pChoosecolor As CHOOSECOLOR) As Long | |||
| pCooseColor - структура CHOOSECOLOR. | |||
| В случае ошибки или при нажатии пользователем кнопки Отмена, функция возвращает 0 (используйте CommDlgExtendedError для получения кода ошибки). В случае успеха функция возвращает значение, отличное от нуля.
| |||
| Благодарю за интерес к рассылке. Автор рассылки: Александр Сайт рассылки: Visual Basic Helper - помощь в программировании на VB. | |||
 | |||
| http://subscribe.ru/
E-mail: ask@subscribe.ru | Отписаться | Рейтингуется SpyLog |
| В избранное | ||
