Warning: A non-numeric value encountered in /home2/icentarb/public_html/icentar/classes/class.permissions.php on line 101
Warning: filesystem::file_put_contents(data/session_del.php): failed to open stream: Permission denied in /home2/icentarb/public_html/icentar/classes/class.filesystem.php on line 142
Private Sub Detail_Print(Cancel As Integer, PrintCount As Integer)
Dim DuzTeksta As Single
Dim DuzinaPapira As Single
Dim Sredina As Single
Dim I As Integer
Dim N As Integer
Dim StartX As Integer
Dim StartY As Integer
Dim Ispuna As Boolean
Dim Boja
DuzinaPapira = Me.Width
Me.ForeColor = 255
Me.FontSize = 18
Me.FontBold = True
DuzTeksta = Me.TextWidth("ŠAHOVKA TABLA")
Sredina = (DuzinaPapira - DuzTeksta) / 2
Me.CurrentX = Sredina
Print "ŠAHOVSKA TABLA"
StartY = M