Страница: 1 |
Страница: 1 |
Вопрос: в API есть GetSystemMetrics, а SetSystemMet
Добавлено: 04.04.05 12:41
Автор вопроса: vahta8
В API есть GetSystemMetrics, а SetSystemMetrics нету
кто нибуть может, подсказать другую декларацию на подоби SetSystemMetrics плиз
Ответы
Всего ответов: 13
Номер ответа: 1
Автор ответа:
sne
Разработчик Offline Client
ICQ: 233286456
Вопросов: 34
Ответов: 5445
Web-сайт:
Профиль | | #1
Добавлено: 04.04.05 13:24
э... всмысле !?
Номер ответа: 2
Автор ответа:
vahta8
Вопросов: 1
Ответов: 9
Профиль | | #2
Добавлено: 04.04.05 13:33
Нужно задать рабочее пространство для рабочего стола,
чтобы при максимизации окон они не раскрывались на весь
экран, типа WindowsPanel, он не дает окнам максимизацию на весь экран.
----------------
короче надо задать рабочую область рабочего стола!
Номер ответа: 3
Автор ответа:
GSerg
Вопросов: 0
Ответов: 1876
Профиль | | #3
Добавлено: 04.04.05 14:52
SystemParametersInfo вообще и SPI_SETWORKAREA в частности.
Номер ответа: 4
Автор ответа:
vahta8
Вопросов: 1
Ответов: 9
Профиль | | #4
Добавлено: 04.04.05 14:56
А примерчик где можно надыбать ?
Номер ответа: 5
Автор ответа:
vahta8
Вопросов: 1
Ответов: 9
Профиль | | #5
Добавлено: 04.04.05 14:58
SystemParametersInfo вообще и SPI_SETWORKAREA в частности
-------------------------------------
по подробней
Номер ответа: 6
Автор ответа:
CyRax
Разработчик Offline Client
ICQ: 204447456
Вопросов: 180
Ответов: 4229
Web-сайт:
Профиль | | #6
Добавлено: 04.04.05 15:12
Создаёшь переменную типа RECT, в ней указываешь координаты и передаёшь эту переменную параметром в SystemParametersInfo.
У тебя MSDN нету чтоли?
Номер ответа: 7
Автор ответа:
vahta8
Вопросов: 1
Ответов: 9
Профиль | | #7
Добавлено: 04.04.05 15:17
Option Explicit
Const SPI_SETWORKAREA = 47
Const SPI_GETWORKAREA = 48
Private Declare Function SystemParametersInfo Lib "user32" Alias "SystemParametersInfoA" (ByVal uAction As Long, ByVal uParam As Long, lpvParam As Any, ByVal fuWinIni As Long) As Long
Private Type RECT
Left As Long
Top As Long
Right As Long
Bottom As Long
End Type
Private Sub Command2_Click()
Dim typRect As RECT
typRect.Top = 0
typRect.Left = 0
typRect.Right = Me.Width
typRect.Bottom = Me.Height
Call SystemParametersInfo(SPI_SETWORKAREA, 0, typRect, 0)
End Sub
Номер ответа: 8
Автор ответа:
vahta8
Вопросов: 1
Ответов: 9
Профиль | | #8
Добавлено: 04.04.05 15:18
не хрена не срабатывает!
Номер ответа: 9
Автор ответа:
vahta8
Вопросов: 1
Ответов: 9
Профиль | | #9
Добавлено: 04.04.05 15:20
Может я пропустил что то?
Номер ответа: 10
Автор ответа:
vahta8
Вопросов: 1
Ответов: 9
Профиль | | #10
Добавлено: 04.04.05 15:38
ЛЮДИ помогите !!! Примером, у кого есть поделитесь!
Уже неделю парюсь
Номер ответа: 11
Автор ответа:
CyRax
Разработчик Offline Client
ICQ: 204447456
Вопросов: 180
Ответов: 4229
Web-сайт:
Профиль | | #11
Добавлено: 04.04.05 16:06
А получать ты пробовал? Работает?
Если работает, то либо флаг нужно ещё какой, либо либо глянь в API-GUIDE. Мож там какая особенность есть.
Во всяком случае так получает:
SystemParametersInfo(SPI_GETWORKAREA, vbNull, RC, 0)
Номер ответа: 12
Автор ответа:
vahta8
Вопросов: 1
Ответов: 9
Профиль | | #12
Добавлено: 04.04.05 16:32
Спасибо!!! CyRax !!! Огромное!!!
ТЫ Super!!!
Номер ответа: 13
Автор ответа:
CyRax
Разработчик Offline Client
ICQ: 204447456
Вопросов: 180
Ответов: 4229
Web-сайт:
Профиль | | #13
Добавлено: 04.04.05 16:36
Тебе просто повезло что cresta этой ночью обнаружил ошибку в моей проге