cheveguerra/Kelloggs_V3
1
0
Fork 0
mirror of https://github.com/KeymonSoft/Kelloggs_V3.git synced 2026-04-19 21:59:29 +00:00
Code Issues Packages Projects Releases Wiki Activity

Cambio de logos

Browse Source
This commit is contained in:
cvaldes1201
2023-10-05 12:18:07 -06:00
parent 63175116b2
commit ee0bef318d
16 changed files with 56 additions and 46 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
B4A/C_Cliente.bas
View File

@@ -1020,7 +1020,7 @@ Sub B_IMP2_Click
'printer.Initialize(cmp20.OutputStream)
Printer1.Reset
Dim bmp As Bitmap
bmp.InitializeResize(File.DirAssets, "kelloggs.png", 376, 129, True) 'ignore
bmp.InitializeResize(File.DirAssets, "knv_logo_white.png", 376, 129, True) 'ignore
Dim myimage As AnImage = Printer1.ImageToBWIMage(bmp)
myimage = Printer1.DitherImage2D(myimage, 128)
myimage= Printer1.PackImage(myimage)