Hi, is there any way to get the following BMax example to work in B3D?
http://www.blitzbasic.com/Community/posts.php?topic=47573
my code is not working:
Graphics 640,480,0,2
bank = CreateBank( 256 * 3 * 4 )
hwnd = api_GetActiveWindow()
hdc = api_GetDC( hwnd )
font = LoadFont("Tahoma.ttf",20)
SetFont font
api_GetCharABCWidths( hdc, 0, 255, bank )
For i=0 To 255*3
Text x,y, PeekInt( bank, i)
x = x + 20: If x > 620 Then x = 0: y = y + 20
Next
WaitKey()
End
....my english is very bad, sorry for that....hope anybody can help - thanks.
http://www.blitzbasic.com/Community/posts.php?topic=47573
my code is not working:
Graphics 640,480,0,2
bank = CreateBank( 256 * 3 * 4 )
hwnd = api_GetActiveWindow()
hdc = api_GetDC( hwnd )
font = LoadFont("Tahoma.ttf",20)
SetFont font
api_GetCharABCWidths( hdc, 0, 255, bank )
For i=0 To 255*3
Text x,y, PeekInt( bank, i)
x = x + 20: If x > 620 Then x = 0: y = y + 20
Next
WaitKey()
End
....my english is very bad, sorry for that....hope anybody can help - thanks.