[Gambas-user] Upper left cell in a TableView

[Gianluigi]

Hello Fabien,

very nice, I like, though it not automatically adapts to the written.
👍
Regards
Gianluigi

2016-08-09 22:22 GMT+02:00 Fabien Bodard <gambas.fr at ...626...>:

> Really more shorter and more sure.
>
>
>
> ' Gambas class file
>
> Private OBS As Observer
>
>
> Public Sub Form_Open()
>
>   'need an observer to get the draw event after the array drawing
>   OBS = New Observer(TableView1.Children[0], True) As "OBS"
>
>   TableView1.Rows.Count = 10000
>   TableView1.Columns.Count = 6
>
> End
>
> Public Sub OBS_Draw()
>
>     Draw.ClipRect = Rect(0, 0, TableView1.Rows.W,
> TableView1.Columns.H) 'set the clippin region to the upper left cells
> size
>     Draw.Text("toto", 0, 0, TableView1.Rows.W, TableView1.Columns.H,
> Align.Center) 'Draw the text path
>
> End
>
> ------------------------------------------------------------
> ------------------
> What NetFlow Analyzer can do for you? Monitors network bandwidth and
> traffic
> patterns at an interface-level. Reveals which users, apps, and protocols
> are
> consuming the most bandwidth. Provides multi-vendor support for NetFlow,
> J-Flow, sFlow and other flows. Make informed decisions using capacity
> planning reports. http://sdm.link/zohodev2dev
> _______________________________________________
> Gambas-user mailing list
> Gambas-user at lists.sourceforge.net
> https://lists.sourceforge.net/lists/listinfo/gambas-user
>