; DDT faktury do predtisteneho formulare 1
; verze z 7.11.1999
; Autor: WinDUO Team

Name('Adresa - samolepka')
FileName('Adr_fak1.WNS')
Designed('Faktura')
Author('Winduo Team','EMail: winduo@winduo.mine.nu','http://www.winduo.com','http://winduo.mine.nu')
Descr('Adresa z faktury na samolepku')


;MaxLines:Word
;MaxLinesPril:Word
;YTextFakt:Word
;YTextPril:Word
;SirkaFontuText:Real
;VyskaFontuText:Real

;MaxLines=9 ;Maximalni pocet radku ve fakture
;MaxLinesPril=45 ;Maximalni pocet radku v priloze
;YTextFakt=120   ;y-souřadnice začátku textu ve fakture
;YTextPril=10    ;y-souřadnice začátku textu v priloze
;SirkaFontuText=1.5
;VyskaFontuText=4


Designed('Faktura')

;DeclareRec('Program')
DeclareRec('Pohledavka')
GetBindRec('Pohledavka',0)

FontFace(Bold|Italic)
FontSize(4)
Text(105,59,TA_LEFT,Pohledavka.Firma)
Text(105,64,TA_LEFT,Pohledavka.Rozsireni)
Text(105,69,TA_LEFT,Pohledavka.Ulice)
Text(105,74,TA_LEFT,Pohledavka.Mesto)
Text(105,79,TA_LEFT,Pohledavka.PSC)

END