What is wrong in this code ? Public Sub Button1_Click()
Dim f, r As Single Dim pPtr As Pointer Dim strm As Stream f = 1 / 3 pPtr = Alloc(1, 4) 'alloc 4 * 1 Byte for single strm = Memory pPtr For Read Write Write #strm, f As Single r = Read #strm As Single Print f ' --> 0.3333333 Print r ' --> 1.261169E-44 Close #strm Free(pPtr) End ------------------------------------------------------------------------------ Try before you buy = See our experts in action! The most comprehensive online learning library for Microsoft developers is just $99.99! Visual Studio, SharePoint, SQL - plus HTML5, CSS3, MVC3, Metro Style Apps, more. Free future releases when you subscribe now! http://p.sf.net/sfu/learndevnow-dev2 _______________________________________________ Gambas-user mailing list Gambas-user@lists.sourceforge.net https://lists.sourceforge.net/lists/listinfo/gambas-user
