VPF::Как изменять размер формы при вращении колеса мыши

ViterAlex

Дата 31.8.2010, 21:48 (ссылка)

(нет голосов)

Загрузка ...

Шустрый

Профиль
Группа: Участник
Сообщений: 94
Регистрация: 7.10.2009
Где: Харьков

Репутация: нет
Всего: 7

Как можно изменить размер формы при вращении колеса мыши? В WPF я всего два дня, поэтому многого не знаю. Пытался привязаться к MouseWheel, но ничего не получается:

Код


  Private Sub ClockGrid_MouseWheel(ByVal sender As System.Object, ByVal e As System.Windows.Input.MouseWheelEventArgs)
    If e.Delta > 0 Then
      Me.Height = Me.Height * 1.01
      Me.Width = Me.Width * 1.01
    Else
      Me.Width = Me.Width * 0.99
      Me.Height = Me.Height * 0.99
    End If
  End Sub

KelTron

Дата 1.9.2010, 18:57 (ссылка)

(нет голосов)

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 745
Регистрация: 8.10.2006
Где: Красноярск

Репутация: 2
Всего: 38

Чтобы получить реальные размеры нужно использовать ActualWidth и ActualHeight

--------------------

Тысячами незримых нитей обвивает тебя Закон. Разрубишь одну - преступник. Десять - смертник. Все - Бог.
Эвенгар Салладорский, основатель Школы Тьмы.

ViterAlex

Дата 1.9.2010, 21:28 (ссылка)

(нет голосов)

Загрузка ...

Шустрый

Профиль
Группа: Участник
Сообщений: 94
Регистрация: 7.10.2009
Где: Харьков

Репутация: нет
Всего: 7

Чтобы получить — да, а чтобы задать? Получилось вот так:

Код


  Private Sub ClockGrid_MouseWheel(ByVal sender As System.Object, ByVal e As System.Windows.Input.MouseWheelEventArgs)
    Debug.Print(Me.ActualHeight)
    With ClockGrid
      If e.Delta > 0 Then
        .Height = .ActualHeight * 1.1
        .Width = .ActualWidth * 1.1
      Else
        .Width = .ActualWidth * 0.9
        .Height = .ActualHeight * 0.9
      End If
      If .ActualHeight < .MinHeight Then .Height = .MinHeight
      If .ActualHeight > .MaxHeight Then .Height = .MaxHeight
      If .ActualWidth < .MinWidth Then .Width = .MinWidth
      If .ActualWidth > .MaxWidth Then .Height = .MaxWidth
      .UpdateLayout()
    End With
  End Sub

Это сообщение отредактировал(а) ViterAlex - 4.9.2010, 21:28

1 Пользователей читают эту тему (1 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| WPF и Silverlight \| Следующая тема »