Re: [Haskell-cafe] Gtk2hs multiple column TreeView with ListStore issue

2011-03-20 Thread Andy Stewart
Hi Кирилл,

Here have a simplest code at 
http://code.haskell.org/gtk2hs/gtk/demo/treelist/ListDemo.hs

Cheers, 

  -- Andy

PS:

  All gtk2hs user, it's always best choose to read source code of demo
  when you don't know how to fix some problem.
  
  Demo has include in Cabal package.
  Example, we have build demo sub-directory in package gtk-0.12.0.tar.gz 
  Otherwise package, such as Cairo and Pango is same. 
  
  Of course, ask in gtk2hs-user mailing-list 
(gtk2hs-us...@lists.sourceforge.net) are welcome! :)

Кирилл Березин pecheni...@gmail.com writes:

 I cannot force GTK to render data in TreeView with ListStore model with 
 multiple columns through
 Haskell. I have the following code

 addTextColumn view name =

     do

     col - treeViewColumnNew

     rend - cellRendererTextNew

     treeViewColumnSetTitle col name
     treeViewColumnPackStart col rend True
     treeViewColumnSetExpand col True
     treeViewAppendColumn view col

 prepareTreeView view = 

     do

     addTextColumn view column1

     addTextColumn view column2

     --adding data here

 Then I try to add some data, and there are problems. I tried these:

     --variant 1 (data TRow = TRow {one::String, two::String}

     model - listStoreNew ([] :: [TRow])

     listStoreAppend model $ TRow { one = Foo, two = Boo }

     treeViewSetModel view model

     --variant 2

     model - listStoreNew ([] :: [[String]])

     listStoreAppend model [foo,boo]

     treeViewSetModel view model

     --variant 3

     model - listStoreNew ([] :: [(String, String)])

     listStoreAppend model (foo, boo)

     treeViewSetModel view model

 But in all cases I see the table with column header and one blank row 
 inserted. Any help will be
 appreciated.

 ___
 Haskell-Cafe mailing list
 Haskell-Cafe@haskell.org
 http://www.haskell.org/mailman/listinfo/haskell-cafe


___
Haskell-Cafe mailing list
Haskell-Cafe@haskell.org
http://www.haskell.org/mailman/listinfo/haskell-cafe


Re: [Haskell-cafe] Gtk2hs multiple column TreeView with ListStore issue

2011-03-20 Thread Andy Stewart
Andy Stewart lazycat.mana...@gmail.com writes:

 Hi Кирилл,

 Here have a simplest code at 
 http://code.haskell.org/gtk2hs/gtk/demo/treelist/ListDemo.hs

 Cheers, 

   -- Andy

 PS:

   All gtk2hs user, it's always best choose to read source code of demo
   when you don't know how to fix some problem.
   
   Demo has include in Cabal package.
   Example, we have build demo sub-directory in package gtk-0.12.0.tar.gz 
   Otherwise package, such as Cairo and Pango is same. 
Others package, damn english helper. :)

  -- Andy

   
   Of course, ask in gtk2hs-user mailing-list 
 (gtk2hs-us...@lists.sourceforge.net) are welcome! :)

 Кирилл Березин pecheni...@gmail.com writes:

 I cannot force GTK to render data in TreeView with ListStore model with 
 multiple columns through
 Haskell. I have the following code

 addTextColumn view name =

     do

     col - treeViewColumnNew

     rend - cellRendererTextNew

     treeViewColumnSetTitle col name
     treeViewColumnPackStart col rend True
     treeViewColumnSetExpand col True
     treeViewAppendColumn view col

 prepareTreeView view = 

     do

     addTextColumn view column1

     addTextColumn view column2

     --adding data here

 Then I try to add some data, and there are problems. I tried these:

     --variant 1 (data TRow = TRow {one::String, two::String}

     model - listStoreNew ([] :: [TRow])

     listStoreAppend model $ TRow { one = Foo, two = Boo }

     treeViewSetModel view model

     --variant 2

     model - listStoreNew ([] :: [[String]])

     listStoreAppend model [foo,boo]

     treeViewSetModel view model

     --variant 3

     model - listStoreNew ([] :: [(String, String)])

     listStoreAppend model (foo, boo)

     treeViewSetModel view model

 But in all cases I see the table with column header and one blank row 
 inserted. Any help will be
 appreciated.

 ___
 Haskell-Cafe mailing list
 Haskell-Cafe@haskell.org
 http://www.haskell.org/mailman/listinfo/haskell-cafe


 ___
 Haskell-Cafe mailing list
 Haskell-Cafe@haskell.org
 http://www.haskell.org/mailman/listinfo/haskell-cafe


___
Haskell-Cafe mailing list
Haskell-Cafe@haskell.org
http://www.haskell.org/mailman/listinfo/haskell-cafe


[Haskell-cafe] Gtk2hs multiple column TreeView with ListStore issue

2011-03-19 Thread Кирилл Березин
I cannot force GTK to render data in TreeView with ListStore model with
multiple columns through Haskell. I have the following code

addTextColumn view name =

do

col - treeViewColumnNew

rend - cellRendererTextNew

treeViewColumnSetTitle col name
treeViewColumnPackStart col rend True
treeViewColumnSetExpand col True
treeViewAppendColumn view col

prepareTreeView view =

do

addTextColumn view column1

addTextColumn view column2

--adding data here

Then I try to add some data, and there are problems. I tried these:

--variant 1 (data TRow = TRow {one::String, two::String}

model - listStoreNew ([] :: [TRow])

listStoreAppend model $ TRow { one = Foo, two = Boo }

treeViewSetModel view model

--variant 2

model - listStoreNew ([] :: [[String]])

listStoreAppend model [foo,boo]

treeViewSetModel view model

--variant 3

model - listStoreNew ([] :: [(String, String)])

listStoreAppend model (foo, boo)

treeViewSetModel view model

But in all cases I see the table with column header and one blank row
inserted. Any help will be appreciated.
___
Haskell-Cafe mailing list
Haskell-Cafe@haskell.org
http://www.haskell.org/mailman/listinfo/haskell-cafe