windows + меню "пуск"

[Chuvak]

ответьте пожалуйста:
1) как изменить положение меню ПУСК
2) можно ли сделать так, чтобы при нажатии кнопки в моей проге нажималась кнопка ПУСК
3) ПУСК - это кнопка или окно? (мне впаривают, что это окно)

[GSerg]

Код: Выделить всё

Private Declare Function FindWindowEx Lib "user32" Alias "FindWindowExA" (ByVal hWnd1 As Long, ByVal hWnd2 As Long, ByVal lpsz1 As String, ByVal lpsz2 As String) As Long
Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long
Private Declare Function GetWindowRect Lib "user32" (ByVal hwnd As Long, lpRect As RECT) As Long
Private Declare Function MoveWindow Lib "user32" (ByVal hwnd As Long, ByVal x As Long, ByVal y As Long, ByVal nWidth As Long, ByVal nHeight As Long, ByVal bRepaint As Long) As Long

Private Type RECT
    Left As Long
    Top As Long
    Right As Long
    Bottom As Long
End Type


Function FindStartButton() as Long
  Dim tWnd As Long
  tWnd = FindWindow("Shell_TrayWnd", vbNullString)
  FindStartButton = FindWindowEx(tWnd, ByVal 0&, "BUTTON", vbNullString)
End Function

Private Sub MoveStart (X as Long, Y as Long)
  Dim R As RECT, bWnd As Long
  bWnd = FindStartButton
  GetWindowRect bWnd, R
  MoveWindow bWnd, X, Y, R.Right - R.Left, R.Top - R.Bottom, True
End Sub


Заметь, что кнопка будет двигаться в пределах статусбара.

Ну и по названию функция нетрудно догадаться, окно оно или нет.

[serix]

Заметь, что кнопка будет двигаться в пределах статусбара.

Кнопка двигается не в пределах статусбара, по-моему пределов вообще нет, т.к эту кнопочку можно спрятать, передвинув за экран ...

[GSerg]

Ниже, левее, правее - можно, а выше нельзя. Или можно? Но для этого наверно нужно поменять этой кнопке Parent, чтобы у неё координатная система поменялась. У неё ведь позиция (0, 0) - это её дефолтовое положение. Если координату Y сделать положительной, кнопкка пойдёт вниз, а если отрицательной - вверх, но не выйдет за пределы статусбара в том смысле, что её не будет видно.