You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
tdebindings/korundum/rubylib/tutorials/p8/p8.rb

40 lines
969 B

13 years ago
require 'Korundum'
class BookMarkList < KDE::ListView
k_dcop 'void add(TQString)'
slots 'setURLInBrowser(TQListViewItem *)'
def initialize()
super(nil, "Bookmarks")
addColumn( i18n("My Bookmarks") );
connect( self, SIGNAL('clicked(TQListViewItem *)'),
self, SLOT('setURLInBrowser(TQListViewItem *)'))
end
def add( s )
insertItem( KDE::ListViewItem.new( self , s ) )
end
def setURLInBrowser( item )
if item.nil? then return end
dcopRef = KDE::DCOPRef.new("p7", "Browser")
if ! dcopRef.setURL(item.text(0))
tqWarning("Error with DCOP\n")
end
end
end
about = KDE::AboutData.new("p8", "Tutorial - p8", "0.1")
KDE::CmdLineArgs.init(ARGV, about)
a = KDE::UniqueApplication.new()
mylist = BookMarkList.new
mylist.resize( 300, 200 )
a.mainWidget = mylist
mylist.show
a.exec