fzeet 0.6.5 → 0.6.6

data/lib/fzeet/Dialog/Common.rb

@@ -1,89 +0,0 @@
-require_relative '../Window/Dialog'
-
-module Fzeet
-	class CommonDialog < Handle
-		include WindowMethods
-
-		HookProc = -> klass, hwnd, uMsg, wParam, lParam {
-			begin
-				if klass == Windows::BROWSEINFO
-					if uMsg == Windows::BFFM_IUNKNOWN
-						instance = ObjectSpace._id2ref(lParam)
-
-						if @@instances.include?(hwnd.to_i)
-							@@instances.delete(hwnd.to_i)
-						else
-							@@instances[hwnd.to_i] = instance
-
-							@@instances[hwnd.to_i].instance_variable_set(:@handle, hwnd)
-						end
-					end
-				else
-					if uMsg == Windows::WM_INITDIALOG
-						@@instances[hwnd.to_i] = ObjectSpace._id2ref(
-							klass.new(FFI::Pointer.new(lParam))[:lCustData].to_i
-						)
-
-						@@instances[hwnd.to_i].instance_variable_set(:@handle, hwnd)
-					end
-				end
-
-				result = @@instances[hwnd.to_i].hookProc(hwnd, uMsg, wParam, lParam) if @@instances[hwnd.to_i]
-			rescue
-				answer = Fzeet.message %Q{#{$!}\n\n#{$!.backtrace.join("\n")}}, buttons: [:abort, :retry, :ignore], icon: :error
-
-				Application.quit if answer.abort?
-			ensure
-				if uMsg == Windows::WM_NCDESTROY
-					@@instances.delete(hwnd.to_i)
-				end
-			end
-
-			result || 0
-		}
-
-		def self.crackMessage(hwnd, uMsg, wParam, lParam)
-			window = @@instances[hwnd.to_i]
-
-			args = {
-				hwnd: hwnd,
-				uMsg: uMsg,
-				wParam: wParam,
-				lParam: lParam,
-				result: 0,
-				window: window,
-				sender: window
-			}
-
-			args
-		end
-
-		def initialize
-			@messages = {}
-		end
-
-		attr_reader :struct
-
-		def hookProc(hwnd, uMsg, wParam, lParam)
-			args, result = nil, nil
-
-			if (handlers = @messages[uMsg])
-				args ||= self.class.crackMessage(hwnd, uMsg, wParam, lParam)
-
-				handlers.each { |handler|
-					(handler.arity == 0) ? handler.call : handler.call(args)
-
-					result = args[:result]
-				}
-			end
-
-			result
-		end
-
-		def on(msg, &block)
-			(@messages[Fzeet.constant(msg, :wm_)] ||= []) << block
-
-			self
-		end
-	end
-end

data/lib/fzeet/Dialog/FileDialog.rb

@@ -1,136 +0,0 @@
-require_relative 'Common'
-
-module Fzeet
-	class FileDialog < CommonDialog
-		DialogStruct = Windows::OPENFILENAME
-
-		HookProc = -> *args { CommonDialog::HookProc.(*args.unshift(DialogStruct)) }
-
-		def initialize(opts = {})
-			_opts = {
-				filter: nil,
-				customFilter: nil,
-				filterIndex: 0,
-				fileTitle: nil,
-				initialDir: nil,
-				title: nil,
-				flags: 0,
-				fileExtension: nil,
-				defExt: nil,
-				custData: 0,
-				hook: nil,
-				templateName: nil,
-				xflags: 0
-			}
-			badopts = opts.keys - _opts.keys; raise "Bad option(s): #{badopts.join(', ')}." unless badopts.empty?
-			_opts.merge!(opts)
-
-			@struct = DialogStruct.new
-
-			@struct[:lStructSize] = @struct.size
-			@struct[:hInstance] = Windows.GetModuleHandle(nil)
-			@struct[:lpstrFile] = @buf = FFI::MemoryPointer.new(:char, 4096)
-			@struct[:nMaxFile] = @buf.size
-			@struct[:Flags] = Fzeet.flags([:enablehook, :explorer, :enablesizing, :overwriteprompt] + [*_opts[:flags]], :ofn_)
-			@struct[:lCustData] = object_id
-			@struct[:lpfnHook] = HookProc
-
-			super()
-
-			begin
-				yield self
-			ensure
-				dispose
-			end if block_given?
-		end
-
-		def dispose; @buf.free end
-
-		def path; @buf.read_string end
-	end
-
-	class FileOpenDialog < FileDialog
-		def show(window = Application.window)
-			@struct[:hwndOwner] = window.handle
-
-			DialogResult.new((Windows.GetOpenFileName(@struct) == 0) ? Windows::IDCANCEL : Windows::IDOK)
-		end
-
-		def paths
-			return [path] if
-				(path = @buf.read_string).length + 1 != @struct[:nFileOffset]
-
-			result, tip = [], path.length + 1
-
-			until @buf.get_bytes(tip, 2) == "\0\0"
-				result << (name = @buf.get_string(tip))
-
-				tip += name.length + 1
-			end
-
-			result.map! { |name| "#{path}\\#{name}" }
-		end
-
-		def multiselect=(multiselect)
-			(multiselect) ?
-				@struct[:Flags] |= Windows::OFN_ALLOWMULTISELECT :
-				@struct[:Flags] &= ~Windows::OFN_ALLOWMULTISELECT
-		end
-	end
-
-	class FileSaveDialog < FileDialog
-		def show(window = Application.window)
-			@struct[:hwndOwner] = window.handle
-
-			DialogResult.new((Windows.GetSaveFileName(@struct) == 0) ? Windows::IDCANCEL : Windows::IDOK)
-		end
-	end
-
-	class FolderDialog < CommonDialog
-		DialogStruct = Windows::BROWSEINFO
-
-		HookProc = -> *args { CommonDialog::HookProc.(*args.unshift(DialogStruct)) }
-
-		def initialize(opts = {})
-			_opts = {
-				root: nil,
-				displayName: nil,
-				title: nil,
-				flags: 0,
-				hook: nil,
-				param: 0,
-				image: 0
-			}
-			badopts = opts.keys - _opts.keys; raise "Bad option(s): #{badopts.join(', ')}." unless badopts.empty?
-			_opts.merge!(opts)
-
-			@struct = DialogStruct.new
-
-			@struct[:ulFlags] = Fzeet.flags([:returnonlyfsdirs, :usenewui], :bif_)
-			@struct[:lpfn] = HookProc
-			@struct[:lParam] = object_id
-
-			super()
-		end
-
-		def path; @path && @path.dup end
-
-		def show(window = Application.window)
-			@struct[:hwndOwner] = window.handle
-
-			@path = nil
-
-			DialogResult.new(((pidl = Windows.SHBrowseForFolder(@struct)).null?) ? Windows::IDCANCEL : Windows::IDOK).tap { |result|
-				next unless result.ok?
-
-				FFI::MemoryPointer.new(:char, 4096) { |p|
-					Windows.SHGetPathFromIDList(pidl, p)
-
-					@path = p.read_string
-				}
-			}
-		ensure
-			Windows.CoTaskMemFree(pidl)
-		end
-	end
-end

data/lib/fzeet/Dialog/FindReplaceDialog.rb

@@ -1,105 +0,0 @@
-require_relative 'Common'
-
-module Fzeet
-	class FindReplaceDialog < CommonDialog
-		DialogStruct = Windows::FINDREPLACE
-
-		HookProc = -> *args { CommonDialog::HookProc.(*args.unshift(DialogStruct)) }
-
-		Message = Windows.DetonateLastError(0, :RegisterWindowMessage, Windows::FINDMSGSTRING)
-
-		def initialize(opts = {})
-			_opts = {
-
-			}
-			badopts = opts.keys - _opts.keys; raise "Bad option(s): #{badopts.join(', ')}." unless badopts.empty?
-			_opts.merge!(opts)
-
-			@frNotifies = {}
-
-			@struct = DialogStruct.new
-
-			@struct[:lStructSize] = @struct.size
-			@struct[:hInstance] = Windows.GetModuleHandle(nil)
-			@struct[:Flags] = Fzeet.flags(:enablehook, :fr_)
-			@struct[:lpstrFindWhat] = @findbuf = FFI::MemoryPointer.new(:char, 4096)
-			@struct[:lpstrReplaceWith] = @replacebuf = FFI::MemoryPointer.new(:char, 4096)
-			@struct[:wFindWhatLen] = @findbuf.size
-			@struct[:wReplaceWithLen] = @replacebuf.size
-			@struct[:lCustData] = object_id
-			@struct[:lpfnHook] = HookProc
-
-			super()
-		end
-
-		def dispose; [@findbuf, @replacebuf].each(&:free) end
-
-		def findWhat; @findbuf.read_string end
-		def replaceWith; @replacebuf.read_string end
-
-		def frProc(args)
-			return unless args[:lParam] == @struct.pointer.address
-
-			(handlers = @frNotifies[:all]) and handlers.each { |handler|
-				(handler.arity == 0) ? handler.call : handler.call(args)
-			}
-
-			if @struct[:Flags] & Windows::FR_DIALOGTERM != 0
-				(handlers = @frNotifies[Windows::FR_DIALOGTERM]) and handlers.each { |handler|
-					(handler.arity == 0) ? handler.call : handler.call(args)
-				}
-
-				self.dialog = false
-
-				dispose
-			elsif @struct[:Flags] & Windows::FR_FINDNEXT != 0
-				(handlers = @frNotifies[Windows::FR_FINDNEXT]) and handlers.each { |handler|
-					(handler.arity == 0) ? handler.call : handler.call(args)
-				}
-			elsif @struct[:Flags] & Windows::FR_REPLACE != 0
-				(handlers = @frNotifies[Windows::FR_REPLACE]) and handlers.each { |handler|
-					(handler.arity == 0) ? handler.call : handler.call(args)
-				}
-			elsif @struct[:Flags] & Windows::FR_REPLACEALL != 0
-				(handlers = @frNotifies[Windows::FR_REPLACEALL]) and handlers.each { |handler|
-					(handler.arity == 0) ? handler.call : handler.call(args)
-				}
-			end
-		end
-
-		def onNotify(notification, &block)
-			notification = Fzeet.constant(notification, :fr_) unless
-				notification.kind_of?(Integer) || notification == :all
-
-			(@frNotifies[notification] ||= []) << block
-
-			self
-		end
-	end
-
-	class FindDialog < FindReplaceDialog
-		def show(window = Application.window)
-			@struct[:hwndOwner] = window.handle
-			@handle = Windows.DetonateLastError(FFI::Pointer::NULL, :FindText, @struct)
-
-			self.dialog = true
-
-			window.on(FindReplaceDialog::Message, &method(:frProc))
-
-			self
-		end
-	end
-
-	class ReplaceDialog < FindReplaceDialog
-		def show(window = Application.window)
-			@struct[:hwndOwner] = window.handle
-			@handle = Windows.DetonateLastError(FFI::Pointer::NULL, :ReplaceText, @struct)
-
-			self.dialog = true
-
-			window.on(FindReplaceDialog::Message, &method(:frProc))
-
-			self
-		end
-	end
-end

data/lib/fzeet/Dialog/FontDialog.rb

@@ -1,39 +0,0 @@
-require_relative 'Common'
-
-module Fzeet
-	class FontDialog < CommonDialog
-		DialogStruct = Windows::CHOOSEFONT
-
-		HookProc = -> *args { CommonDialog::HookProc.(*args.unshift(DialogStruct)) }
-
-		def initialize(opts = {})
-			_opts = {
-				font: Control::Font,
-				color: 0
-			}
-			badopts = opts.keys - _opts.keys; raise "Bad option(s): #{badopts.join(', ')}." unless badopts.empty?
-			_opts.merge!(opts)
-
-			@struct = DialogStruct.new
-
-			@struct[:lStructSize] = @struct.size
-			@struct[:hInstance] = Windows.GetModuleHandle(nil)
-			@struct[:lpLogFont] = _opts[:font].logfont.pointer
-			@struct[:Flags] = Fzeet.flags([:enablehook, :both, :inittologfontstruct, :effects], :cf_)
-			@struct[:rgbColors] = _opts[:color]
-			@struct[:lCustData] = object_id
-			@struct[:lpfnHook] = HookProc
-
-			super()
-		end
-
-		def show(window = Application.window)
-			@struct[:hwndOwner] = window.handle
-
-			DialogResult.new((Windows.ChooseFont(@struct) == 0) ? Windows::IDCANCEL : Windows::IDOK)
-		end
-
-		def font; IndirectFont.new(Windows::LOGFONT.new(@struct[:lpLogFont])) end
-		def color; @struct[:rgbColors] end
-	end
-end

data/lib/fzeet/Dialog/PrintDialog.rb

@@ -1,75 +0,0 @@
-require_relative 'Common'
-
-module Fzeet
-	class PageSetupDialog
-		def initialize(opts = {})
-			_opts = {
-
-			}
-			badopts = opts.keys - _opts.keys; raise "Bad option(s): #{badopts.join(', ')}." unless badopts.empty?
-			_opts.merge!(opts)
-
-			@struct = Windows::PAGESETUPDLG.new
-
-			@struct[:lStructSize] = @struct.size
-			@struct[:hInstance] = Windows.GetModuleHandle(nil)
-			@struct[:Flags] = Fzeet.flags(0, :psd_)
-		end
-
-		attr_reader :struct
-
-		def show(window = Application.window)
-			@struct[:hwndOwner] = window.handle
-
-			DialogResult.new((Windows.PageSetupDlg(@struct) == 0) ? Windows::IDCANCEL : Windows::IDOK)
-		end
-	end
-
-	class PrintDialog
-		def initialize(opts = {})
-			_opts = {
-
-			}
-			badopts = opts.keys - _opts.keys; raise "Bad option(s): #{badopts.join(', ')}." unless badopts.empty?
-			_opts.merge!(opts)
-
-			@struct = Windows::PRINTDLG.new
-
-			@struct[:lStructSize] = 66
-			@struct[:hInstance] = Windows.GetModuleHandle(nil)
-			@struct[:Flags] = Fzeet.flags([:returndc, :usedevmodecopiesandcollate], :pd_)
-		end
-
-		attr_reader :struct
-
-		def show(window = Application.window)
-			@struct[:hwndOwner] = window.handle
-
-			DialogResult.new((Windows.PrintDlg(@struct) == 0) ? Windows::IDCANCEL : Windows::IDOK)
-		end
-	end
-
-	class PrintDialogEx
-		def initialize(opts = {})
-			_opts = {
-
-			}
-			badopts = opts.keys - _opts.keys; raise "Bad option(s): #{badopts.join(', ')}." unless badopts.empty?
-			_opts.merge!(opts)
-
-			@struct = Windows::PRINTDLGEX.new
-
-			@struct[:lStructSize] = @struct.size
-			@struct[:hInstance] = Windows.GetModuleHandle(nil)
-			@struct[:Flags] = Fzeet.flags([:returndc, :usedevmodecopiesandcollate], :pd_)
-		end
-
-		attr_reader :struct
-
-		def show(window = Application.window)
-			@struct[:hwndOwner] = window.handle
-
-			DialogResult.new((Windows.PrintDlgEx(@struct) != Windows::S_OK) ? Windows::IDCANCEL : Windows::IDOK)
-		end
-	end
-end