At the announcement of procedure there is a mistake of performance of the program
proc OutToPrinter,colsubkat,lpsubkat
.count dd 0
.countKat dd 0
.x dd 0
.lpKat dd 0
.CurAd dd 0
.EndKat dd 0
.char db 0
.firs dd 0
enter
........................
invoke Rectangle,[printDC],[CurrX],[CurrY],1050,65; Here there is a mistake
........................
return
If instead of:
proc OutToPrinter,colsubkat,lpsubkat
.count dd 0
.countKat dd 0
.x dd 0
.lpKat dd 0
.CurAd dd 0
.EndKat dd 0
.char db 0
.firs dd 0
enter
.........
To replace on
proc OutToPrinter,colsubkat,lpsubkat
.count dd 0
.countKat dd 0
.x dd 0
enter
......
All works why? Fasm 1.48
Inside procedure the conclusion to the printer is carried out and the change of fonts.

That must be due to the stack misalignment (you allocate the variable of 1 byte size on it, and it has to be dword-aligned); but that's strange, as 1.48 has updated the stdcall.inc with the corrected "enter" macro, which should align the stack for you. Maybe you are using old version of macros?