PC Toledo

Boa tarde a todos.

Gostaria de saber se é possível centralizar dentro da ACHOICE as opções de impressoras ?

Na captura das impressoras tentei utilizar:


LOCAL nPrn, aPrn := padc(Win_PrinterList(),30)


e deu falha.

Também tentei:


nPrn := AChoice( 7, 1, MaxRow() - 1, 78 , padc(aPrn,30) , .T ...

alaminojunior, obrigado, pois a sua citação do chr(12) me fez tentar esta alternativa....

Partindo do principio que antes da impressão, a função esta lendo um arquivo TEXTO , fiz a seguinte alteração e aparentemente deu certo:





cText := MemoRead( cArq )
nLinh := MlCount( cText )
For n := 1 to nLinh

oPrn:TextOut(HB_AnsiToOem(MemoLine(cText,85,n)),.t.)

cLinha := memoline ...

Caros colegas, bom dia!

O grande auxilio do Toledo já me foi muito mais que suficiente para o que eu queria.

Mas a titulo de matar minha curiosidade, gostaria de saber o seguinte:

Quando gerei o arquivo "relfor.txt" adicionei os EJECTs ao fim de cada pagina e repeti o cabeçalho do relatório no ...

Obrigado mais uma vez

Desculpem, mas eu havia entendido que o controle de páginas poderia ser feito na construção do arquivo ".txt", e nele, inseri o comando EJECT ao final de cada pagina.

Obrigado pelas dicas e vou rever o programa.

Segue o arquivo TXT

Caros companheiros, boa noite.

Estou apelando a vocês pois não consegui resolver o problema (Pura ferrugem depois de muito tempo parado).

Pesquisei aqui no fórum e localizei a rotina de impressão abaixo, gerei o relatório em arquivo texto, controlei via programa o EJECT, porem, só imprime 1 pagina ...

Como seria bom se o mundo todo compartilhasse conhecimento como aqui.

Agradeço ao Kapiaba pela indicação do link com a solução do Porter.

Itamar, boa tarde e obrigado pela atenção.

Não há nenhum arquivo "log".

Quando utilizava o CLIPPER e o sistema apresentava algum erro na execução por um erro no nome de variável por exemplo, o sistema abortava e as informações do erro apareciam logo em seguida na tela.

Notei que o Harbour faz a ...

Primeiramente, é um prazer voltar a este FORUM, pois fui clippeiro por muitos anos e tive a oportunidade de utilizar muito material, principalmente do Toledo.

Fiquei feliz ao ver alguns programas voltarem a funcionar com o Harbour, mas minha duvida é justamente esta.

O executável esta funcionando ...