Workable hyperlink on FXDialogBox screen

This relies on IE - some other clever person might be able to expand the
platforms supported:

require ‘fox’
require ‘fox/colors’
include Fox

class TestLink < FXMainWindow
def initialize( app )
super( app, “Test Link”, nil, nil, DECOR_ALL, 0, 0, 400, 300)

link = FXButton.new( self, "http://www.ruby-lang.org/", nil, nil, 0, 
  FRAME_NONE )
link.textColor = FXColor::Blue
link.connect( SEL_COMMAND, method( :load_link ) )

end

def load_link( sender, selector, data )
if PLATFORM =~ /mswin/
require ‘win32ole’
ie = WIN32OLE.new(‘InternetExplorer.Application’)
ie.visible = TRUE
ie.navigate( sender.to_s )
end
end

def create; super; show( PLACEMENT_SCREEN ); end
end

FXApp.new(“Link Example”, “FXRuby”) do |theApp|
TestLink.new(theApp)
theApp.create
theApp.run
end

David Naseby
http://homepages.ihug.com.au/~naseby/

···

-----Original Message-----
From: colotechpro@yahoo.com [mailto:colotechpro@yahoo.com]

I’m trying to put a workable hyperlink on my FXDialogBox screen, and
I’m wondering if anyone else has done something like this without
using something like MS Word.