IF CBOX_gerar_pdf=True THEN iDestination(iPDF) ELSE iPreview(ipvZoom100) END
iBorder(0,0,iPageWidth(),10,1,10)
//Lado Esquerdo //Linha //Altura //Espessura //Cor Fundo
iPrint("Empresa Matos informatica Ltda "+CR+"Relatorio Bancos"+CR) iHLine(0, iPageWidth()) iPrint("") iPrint(iXPos(1) + "Codigo" + iXPos(18) +"Nome") FOR EACH bancos iPrint(iXPos(1)+ NumToString(bancos.id_bancos,"06d") + iXPos(18) + bancos.nome) END iEndPrinting() ShellExecute(iLastFile())
// Blog com Video e Exemplo
http://windevdesenvolvimento.blogspot.com.br/2016/11/aula-973-windev-relatorio-34-iborder.html
https://www.youtube.com/watch?v=T90px41APZc
|