Class: Fzeet::Control

Inherits:
Handle
  • Object
show all
Includes:
WindowMethods
Defined in:
lib/fzeet/windows/user/Control/Common.rb

Constant Summary

Constants included from WindowMethods

WindowMethods::EnumChildProc

Instance Attribute Summary collapse

Class Method Summary collapse

Instance Method Summary collapse

Methods included from WindowMethods

#[], #capture=, #capture?, #dialog=, #dialog?, #dlgmsg?, #drawMenuBar, #eachChild, #enabled=, #enabled?, #focus=, #focus?, #invalidate, #location, #location=, #long, #menu, #menu=, #message, #paint, #position, #position=, #postmsg, #question, #rect, #reframe, #sendmsg, #show, #size, #size=, #style, #style?, #text, #text=, #textlen, #topmost=, #topmost?, #update, #visible=, #visible?, #xstyle, #xstyle?

Methods included from Toggle

#toggle

Constructor Details

#initialize(className, parent, id, opts = {}) ⇒ Control 



29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
 
# File 'lib/fzeet/windows/user/Control/Common.rb', line 29

def initialize(className, parent, id, opts = {})
  @parent = parent
  @id = Command[id]

  handlers = {}

  opts.delete_if { |k, v|
    next false unless v.kind_of?(Proc)

    handlers[k] = v; true
  }

  _opts = {
    xstyle: [],
    caption: id.capitalize,
    style: [],
    x: 0,
    y: 0,
    width: 0,
    height: 0,
    position: [],
    anchor: nil
  }
  badopts = opts.keys - _opts.keys; raise "Bad option(s): #{badopts.join(', ')}." unless badopts.empty?
  _opts.merge!(opts)

  _opts[:xstyle] = Fzeet.flags(_opts[:xstyle], *self.class::Prefix[:xstyle])
  _opts[:caption] = _opts[:caption].to_s
  _opts[:style] = Fzeet.flags([:child, :visible, :tabstop], :ws_) | Fzeet.flags(_opts[:style], *self.class::Prefix[:style])
  _opts[:x], _opts[:y], _opts[:width], _opts[:height] = _opts[:position] unless _opts[:position].empty?

  @handle = Windows.DetonateLastError(FFI::Pointer::NULL, :CreateWindowEx,
    _opts[:xstyle], className, _opts[:caption], _opts[:style],
    _opts[:x], _opts[:y], _opts[:width], _opts[:height],
    @parent.handle, FFI::Pointer.new(@id), Windows.GetModuleHandle(nil), nil
  )

  attach

  sendmsg(:setfont, Font.handle, 1)

  handlers.each { |k, v| on(k, &v) }

  case _opts[:anchor]
  when :ltr
    @parent.on(:size) { |args|
      self.position = @parent.rect.tap { |r| r[:bottom] = _opts[:height] }.to_a

      args[:result] = nil if @parent.class == MDIChild
    }
  when :lrb
    @parent.on(:size) { |args|
      self.position = @parent.rect.tap { |r| r[:top] = r[:bottom] - _opts[:height]; r[:bottom] = _opts[:height] }.to_a

      args[:result] = nil if @parent.class == MDIChild
    }
  when :ltrb
    @parent.on(:size) { |args|
      self.position = @parent.rect.to_a

      args[:result] = nil if @parent.class == MDIChild
    }
  else raise ArgumentError, "Bad anchor spec: #{_opts[:anchor]}."
  end if _opts[:anchor]
end

Instance Attribute Details

#id ⇒ Object (readonly)

Returns the value of attribute id.



95
96
97
 
# File 'lib/fzeet/windows/user/Control/Common.rb', line 95

def id
  @id
end

#parent ⇒ Object (readonly)

Returns the value of attribute parent.



95
96
97
 
# File 'lib/fzeet/windows/user/Control/Common.rb', line 95

def parent
  @parent
end

Class Method Details

.crackNotification(args) ⇒ Object 



27
 
# File 'lib/fzeet/windows/user/Control/Common.rb', line 27

def self.crackNotification(args) end

Instance Method Details

#dispose ⇒ Object 



97
 
# File 'lib/fzeet/windows/user/Control/Common.rb', line 97

def dispose; detach end