[Gambas-user] Creating a picture and inserting

[Rolf-Werner Eilert]

There was a typo in what I programmed yesterday, I found it - sorry for 
the noise and thank you very much again, Fabien!

Regards
Rolf


Am 09.08.2017 18:20, schrieb Rolf-Werner Eilert:
> One more question:
>
> If I need a Picture (e.g. for a GridView), how do I convert it?
>
> Regards
> Rolf
>
> Am 09.08.2017 17:23, schrieb Fabien Bodard:
>>    Dim i As Integer
>>    Dim hImg As Image
>>
>>    For i = 0 To 200
>>      hImg = New Image(32, 32, Color.Transparent)
>>
>>      Paint.Begin(hImg)
>>      Paint.Font.Bold = True
>>
>>      Paint.Ellipse(0, 0, Paint.Width, Paint.Height)
>>
>>      Paint.Brush = Paint.Color(Color.Yellow)
>>      Paint.Fill(True)
>>      Paint.Brush = Paint.Color(Color.Black)
>>      Paint.Stroke
>>
>>      Paint.Text(i, 0, 0, Paint.Width, Paint.Height, Align.Center)
>>      Paint.Brush = Paint.Color(Color.red)
>>      Paint.Fill
>>
>>      Paint.End
>>
>>      ListView1.Add(i, "Item " & i, hImg.Picture)
>>    Next
>
>
> ------------------------------------------------------------------------------
>
> Check out the vibrant tech community on one of the world's most
> engaging tech sites, Slashdot.org! http://sdm.link/slashdot
> _______________________________________________
> Gambas-user mailing list
> Gambas-user at lists.sourceforge.net
> https://lists.sourceforge.net/lists/listinfo/gambas-user
>
>