Y yep New Member Nov 10, 2007 #1 using the trial 5.8, I tried to code something like a simple "matrix afterdark alike", which works on the desktop and not on the ppc (eten x500 with WM5) My (poor) code attached below. Any reason why ? regards, thierry. Attachments yep_matrix.sbp 2.2 KB · Views: 208
using the trial 5.8, I tried to code something like a simple "matrix afterdark alike", which works on the desktop and not on the ppc (eten x500 with WM5) My (poor) code attached below. Any reason why ? regards, thierry.
Erel B4X founder Staff member Licensed User Longtime User Nov 11, 2007 #2 The second coordinates of DrawString determine the lower right corner of the text boundaries. For example instead of: B4X: form1.DrawString (Chr(t), 8, 10*i , j , 10*i, 264 , cGreen ) You should write: B4X: form1.DrawString (Chr(t), 8, 10*i , j , 500, 500 , cGreen ) BTW, there is no need to set Form.ForeLayer to true as you are not using it. Instead of using TimeH, TimeM and TimeS you can use: B4X: Sub App_Start ... TimeFormat("hh:mm:ss") End Sub Sub Timer2_Tick label1.Text="Yep Matrix time = " & Time(Now) End Sub
The second coordinates of DrawString determine the lower right corner of the text boundaries. For example instead of: B4X: form1.DrawString (Chr(t), 8, 10*i , j , 10*i, 264 , cGreen ) You should write: B4X: form1.DrawString (Chr(t), 8, 10*i , j , 500, 500 , cGreen ) BTW, there is no need to set Form.ForeLayer to true as you are not using it. Instead of using TimeH, TimeM and TimeS you can use: B4X: Sub App_Start ... TimeFormat("hh:mm:ss") End Sub Sub Timer2_Tick label1.Text="Yep Matrix time = " & Time(Now) End Sub