Visual Basic, .NET, ASP, VBScript
 

   
   
     

Форум - Общий форум

Страница: 1 | 2 |

 

  Вопрос: MDIForm кнопка свернуть и свернуть в окно Добавлено: 03.01.09 14:54  

Автор вопроса:  Aston | ICQ: 214-179-991 
Ребята подскажите плизз как в МДА форме убрать эти две кнопки, в свойствах нельзя сделать как в обычной форме. Если это можно сделать только с АПИ, то скинте плизз АПИшку.)

Ответить

  Ответы Всего ответов: 19  

Номер ответа: 1
Автор ответа:
 Father



Вопросов: 0
Ответов: 159
 Профиль | | #1 Добавлено: 03.01.09 15:07
  1. Option Explicit
  2. Private Declare Function SetWindowLong Lib "user32" Alias "SetWindowLongA" (ByVal hwnd As Long, ByVal nIndex As Long, ByVal dwNewLong As Long) As Long
  3. Private Declare Function GetWindowLong Lib "user32" Alias "GetWindowLongA" (ByVal hwnd As Long, ByVal nIndex As Long) As Long
  4. Private Const GWL_STYLE = (-16)
  5. Private Const WS_MAXIMIZEBOX = &H10000
  6. Private Const WS_MINIMIZEBOX = &H20000
  7.  
  8. Private Sub MDIForm_Load()
  9.     Call SetWindowLong(hwnd, GWL_STYLE, GetWindowLong(hwnd, GWL_STYLE) And Not WS_MAXIMIZEBOX And Not WS_MINIMIZEBOX)
  10. End Sub

Ответить

Номер ответа: 2
Автор ответа:
 Aston



ICQ: 214-179-991 

Вопросов: 42
Ответов: 272
 Профиль | | #2 Добавлено: 03.01.09 16:42
Спасибо - работает)

Ответить

Номер ответа: 3
Автор ответа:
 Aston



ICQ: 214-179-991 

Вопросов: 42
Ответов: 272
 Профиль | | #3 Добавлено: 03.01.09 17:28
Если не трудно кинь ещё на кнопку выходы АПИ если есть)

Ответить

Номер ответа: 4
Автор ответа:
 Father



Вопросов: 0
Ответов: 159
 Профиль | | #4 Добавлено: 03.01.09 18:14
And Not WS_SYSMENU '&H80000 ?

Ответить

Номер ответа: 5
Автор ответа:
 pc1



Вопросов: 0
Ответов: 7
 Профиль | | #5 Добавлено: 09.09.11 17:35
Ребята подскажите пожауйста......как вернуть обратно кнопки((((((((

Ответить

Номер ответа: 6
Автор ответа:
 Nash Bridges



Вопросов: 5
Ответов: 139
 Профиль | | #6 Добавлено: 09.09.11 20:09
  1. Call SetWindowLong(hwnd, GWL_STYLE, GetWindowLong(hwnd, GWL_STYLE) Or WS_MAXIMIZEBOX Or WS_MINIMIZEBOX)

Ответить

Номер ответа: 7
Автор ответа:
 pc1



Вопросов: 0
Ответов: 7
 Профиль | | #7 Добавлено: 13.09.11 13:00
hwnd - variable not found...(

Ответить

Номер ответа: 8
Автор ответа:
 AgentFire



ICQ: 192496851 

Вопросов: 75
Ответов: 3178
 Профиль | | #8 Добавлено: 13.09.11 15:25
lol. не догадываешься, что в нее нужно получить хендл окна?..

Ответить

Номер ответа: 9
Автор ответа:
 pc1



Вопросов: 0
Ответов: 7
 Профиль | | #9 Добавлено: 13.09.11 18:23
в данном случае я юзаю окно отдельного документа в Excel
нет не догадываюсь
тут подробнее если можно........

Ответить

Номер ответа: 10
Автор ответа:
 VbStarter



ICQ: 357911808 

Вопросов: 118
Ответов: 1340
 Web-сайт: moscowdevils.ru
 Профиль | | #10
Добавлено: 14.09.11 21:34
  1. me.hwnd
(на вб6 точно так, по идеи и на vba так же или так вот
  1. me!hwnd
(гдето наблюдал в вба такое))

Ответить

Номер ответа: 11
Автор ответа:
 VbStarter



ICQ: 357911808 

Вопросов: 118
Ответов: 1340
 Web-сайт: moscowdevils.ru
 Профиль | | #11
Добавлено: 14.09.11 21:36
т.е.
  1. Call SetWindowLong(hwnd, GWL_STYLE, GetWindowLong(me.hwnd, GWL_STYLE) Or WS_MAXIMIZEBOX Or WS_MINIMIZEBOX)

или
  1. Call SetWindowLong(hwnd, GWL_STYLE, GetWindowLong(me!hwnd, GWL_STYLE) Or WS_MAXIMIZEBOX Or WS_MINIMIZEBOX)

разживал и врот положил :)

Ответить

Номер ответа: 12
Автор ответа:
 pc1



Вопросов: 0
Ответов: 7
 Профиль | | #12 Добавлено: 15.09.11 17:42
так понимаете что указывает на Call SetWindowLong(hwnd, GWL_STYLE,
 
которая жирным выделено...

Ответить

Номер ответа: 13
Автор ответа:
 VbStarter



ICQ: 357911808 

Вопросов: 118
Ответов: 1340
 Web-сайт: moscowdevils.ru
 Профиль | | #13
Добавлено: 20.09.11 20:48
проще
  1. hwnd = me.hwnd

Ответить

Номер ответа: 14
Автор ответа:
 pc1



Вопросов: 0
Ответов: 7
 Профиль | | #14 Добавлено: 21.09.11 10:08
разъясните пожалуйста, что такое Me и что такое hwnd
буду благодарен за ссылочку на теорию или учебник...

Ответить

Номер ответа: 15
Автор ответа:
 AndreyMp



ICQ: 237822510 

Вопросов: 28
Ответов: 1182
 Профиль | | #15 Добавлено: 21.09.11 10:27
Сейчас состоится вынос тела. :)
ме - твоя форма
me.hwnd - хендл.

Ответить

Страница: 1 | 2 |

Поиск по форуму



© Copyright 2002-2011 VBNet.RU | Пишите нам