Серый форум — AHK: классы

Re: AHK: классы

null@example.com (serzh82saratov) — Tue, 29 Aug 2017 09:10:09 +0000

Там имя класса прописывается, мне это не нравится. Типа если захотел поменять имя, то чтобы лезть больше никуда не надо. В 28 есть решение, также переделал часы из коллекции.

Re: AHK: классы

null@example.com (YMP) — Tue, 29 Aug 2017 08:16:22 +0000

Ну а если там и прописать? Вот так ведь вроде работает.


m1 := new ClassName("Привет!", 300)
m2 := new ClassName("Пока!", 600) 
ToolTip % m1.arr[1] "`n" m2.arr[1]
Return

Class ClassName
{
   static arr := [], var := OnMessage(WM_LBUTTONDOWN := 0x201, ObjBindMethod(ClassName, "OnButtonDown"))
   __New(key, x) {
      Gui, New, +hwndhGui
      Gui, Show, x%x% w222 h222
      this.arr[1] := key
   }
   OnButtonDown(wp, lp, msg, hwnd) {
      MsgBox % this.arr[1] . "`n" . hwnd
   }
}

Re: AHK: классы

null@example.com (serzh82saratov) — Tue, 29 Aug 2017 07:40:12 +0000

Так лучше наверное нигде. В классе должно быть такое.

Re: AHK: классы

null@example.com (YMP) — Tue, 29 Aug 2017 07:05:51 +0000

А где ему придётся это прописывать?

Re: AHK: классы

null@example.com (serzh82saratov) — Tue, 29 Aug 2017 01:13:32 +0000

Согласись не красиво, предоставляя класс, объснять пользователю что ему надо (в моем случае) прописывать еще 5 замысловатых строк.

		OnMessage(This.WM_LBUTTONDOWN, ObjBindMethod(Class, "OnButtonDown"))
		OnMessage(This.WM_LBUTTONDBLCLK, ObjBindMethod(Class, "OnButtonDown"))
		OnMessage(This.WM_RBUTTONDOWN, ObjBindMethod(Class, "OnButtonDown"))
		OnMessage(This.WM_RBUTTONDBLCLK, ObjBindMethod(Class, "OnButtonDown"))
		OnMessage(This.WM_MOUSEWHEEL, ObjBindMethod(Class, "OnMouseWheel"))

Re: AHK: классы

null@example.com (teadrinker) — Tue, 29 Aug 2017 01:00:55 +0000

С одним OnMessage:

m1 := new ClassName("Привет!", 300)
m2 := new ClassName("Пока!", 600) 
ToolTip % m1.arr[1] "`n" m2.arr[1]
OnMessage(WM_LBUTTONDOWN := 0x201, ObjBindMethod(ClassName, "OnButtonDown"))
Return

Class ClassName
{
   static arr := []
   __New(key, x) {
      Gui, New, +hwndhGui
      Gui, Show, x%x% w222 h222
      this.arr[1] := key
   }
   OnButtonDown(wp, lp, msg, hwnd) {
      MsgBox % this.arr[1]
   }
}

Re: AHK: классы

null@example.com (serzh82saratov) — Tue, 29 Aug 2017 00:51:08 +0000

Формулировки честно говоря не было, от одного вопроса плавно перешли к другому.
С A_Gui лучше, а то в hwnd контрол может быть. Спасибо, сам недогадался, способ хороший, если сообщение требует привязки к конкретному окну. В моём случае это тоже требуется, но всё же не нравится дёргать OnProc по несколько раз при каждом клике или движении колёсика. При 10 окнах, 10 кликов вызовут очередь из 100 сообщений. Пока остановлюсь на своём решении передачи самого класса с одним OnMessage.

Re: AHK: классы

null@example.com (teadrinker) — Tue, 29 Aug 2017 00:36:02 +0000

А лучше даже так:

m1 := new ClassName("Привет!", 300)
m2 := new ClassName("Пока!", 600) 
ToolTip % m1.arr[1] "`n" m2.arr[1]
Return

Class ClassName
{
   static arr := []
   __New(key, x) {
      Gui, New, +hwndhGui
      Gui, Show, x%x% w222 h222
      this.arr[1] := key
      OnMessage(WM_LBUTTONDOWN := 0x201, ObjBindMethod(this, "OnButtonDown", hGui))
   }
   OnButtonDown(hGui, wp, lp, msg, hwnd) {
      if (hGui = A_Gui)
         MsgBox % this.arr[1]
   }
}

Re: AHK: классы

null@example.com (teadrinker) — Tue, 29 Aug 2017 00:29:10 +0000

Так ты зададачу не можешь чётко сформулировать.

serzh82saratov пишет:

каждый экземпляр это новое окно

Ну а у тебя

Gui, Show, w222 h222

Подразумевается, что это одно и то же окно Gui, 1:. Если это разные окна, их нужно создавать

Gui, New, +hwndhGui

А потом, чтобы не было лишних срабатываний OnMessage, проверять параметр hwnd:

m1 := new ClassName("Привет!", 300)
m2 := new ClassName("Пока!", 600) 
ToolTip % m1.arr[1] "`n" m2.arr[1]
Return

Class ClassName
{
   static arr := []
   __New(key, x) {
      Gui, New, +hwndhGui
      Gui, Show, x%x% w222 h222
      this.arr[1] := key
      OnMessage(WM_LBUTTONDOWN := 0x201, ObjBindMethod(this, "OnButtonDown", hGui))
   }
   OnButtonDown(hGui, wp, lp, msg, hwnd) {
      if (hGui = hwnd)
         MsgBox % this.arr[1]
   }
}

Re: AHK: классы

null@example.com (serzh82saratov) — Tue, 29 Aug 2017 00:26:11 +0000

serzh82saratov пишет:

Думаю надо писать то, что необходимо для конкретного функционала.

serzh82saratov пишет:

А зачем мне такая функция, если нет доступа к нужным мне данным?

Мне собственно изначально надо было внутри класса, так как речь идёт про как бы общий массив используемый в классе, и если что то написано вопреки тезису - "иметь отношение ко всем экземплярам объектов" то я просто варвар. Хотя - массив общий для всех экземпляров, вроде ему соответсвует.

Re: AHK: классы

null@example.com (serzh82saratov) — Tue, 29 Aug 2017 00:14:24 +0000

teadrinker пишет:

Ну так а откуда в функции за пределами класса возьмётся this?

А зачем мне такая функция, если нет доступа к нужным мне данным?

Re: AHK: классы

null@example.com (serzh82saratov) — Tue, 29 Aug 2017 00:13:27 +0000

Я тебе пытался привести как пример часы. В моём случае, или в других подобных, каждый экземпляр это новое окно (был пример и с двумя окнами п.34), создали окна, потом понадобилось какое то удалить, естественно удаляем вместе с экземпляром.

teadrinker пишет:

Нет, внутри конструктора имеет смысл писать то, что будет иметь отношение ко всем экземплярам объектов.

Думаю надо писать то, что необходимо для конкретного функционала.

Re: AHK: классы

null@example.com (teadrinker) — Tue, 29 Aug 2017 00:07:05 +0000

serzh82saratov пишет:

Тогда пусто.

Ну так а откуда в функции за пределами класса возьмётся this?

Re: AHK: классы

null@example.com (teadrinker) — Tue, 29 Aug 2017 00:00:57 +0000

serzh82saratov пишет:

Так если я потом этот объект (экземпляр) удалю, я сообщения перестану получать.

Этого не понял, зачем тогда вообще его создавать?

serzh82saratov пишет:

Если пишешь класс, то как то не по фен шую что то выводить за его пределы

Нет, внутри конструктора имеет смысл писать то, что будет иметь отношение ко всем экземплярам объектов. Вообще в принципе нелогично писать внутри метода __New

Gui, Show, w222 h222

если в реальности нужно только одно окно, а объектов может быть много. Получается, что команда Show выполняется всякий раз, как создаётся новый объект. А какой в этом смысл?

Re: AHK: классы

null@example.com (serzh82saratov) — Mon, 28 Aug 2017 23:56:17 +0000

Тогда пусто.

m1 := new ClassName("Привет!")
m2 := new ClassName("Пока!") 
m1.Destroy()
ToolTip % m1.arr[1] "`n" m2.arr[1]
Return

Class ClassName
{
   static arr := [], var := OnMessage(WM_LBUTTONDOWN := 0x201, "OnButtonDown")
   __New(key) {
      Gui, Show, w222 h222
      this.arr[1] := key
   }
   OnButtonDown(wp, lp, msg, hwnd) {
      MsgBox % this.arr[1]
   }
      Destroy() {   
      This.Base := ""
   }
}

OnButtonDown()  {
   MsgBox % this.arr[1]
}