Impressão Em Pascal alguém Me Ajuda!

[Maicon_iniciante]

alguém saberia me dizer como eu faço para imprimir algo via PROCEDIMENTO ou FUNÇÃO em pascal pois já procurei muito sobre isso é que vou fazer um programa de abertura de chamado e agendamento e preciso de algo para imprimir os chamados se alguém puder me ajudar estou muito agradecido.

[Denis Courcy]

alguém saberia me dizer como eu faço para imprimir algo via PROCEDIMENTO ou FUNÇÃO em pascal pois já procurei muito sobre isso é que vou fazer um programa de abertura de chamado e agendamento e preciso de algo para imprimir os chamados se alguém puder me ajudar estou muito agradecido.

Oi, Maicon!

Desenvolva seu algorítimo usando os seguintes comandos:

var

f: textfile;

buffer: string;

AssignFile(f, 'Lpt1'); {atribui ao handler f o indicador de opração do arquivo. Onde está Lpt1 (impressora) pode ser um arquivo ex.: c:\dados.txt}

rewrite(f); {informa que o arquivo em questão será aberto apenas para escrita }

writeln(f, buffer); {grava uma linha (conteudo da variavel buffer) no arquivo apontado acima}

closefile(f); {fecha o arquivo}

att

Denis Courcy

[Maicon_iniciante]

Valeu isso já me ajudou muito .

[ktoblepas]

Valeu isso já me ajudou muito .

Saudações!!!

Estava literalmente "brincando" no turbo pascal 7.0, mas acabou virando algo extremamente util para mim. O problema é que quando rodo o executavel a quantidade de linhas impressas como resultado excede o tamanho da tela, então não consigo visualizar tudo como deveria.

Saberiam me dizer como posso resolver este problema?

De repente tem como usar uma barra de rolagem...

ou usar uma interface que não seja DOS...

Ou o que eu mais queria, que era exportar o resultado para um arquivo de texto.

No exemplo dado acima, suponho que será impresso somente o que estiver dentro da variavel BUFFER.

se eu fosse fazer assim, teria que criar umas 80 variaveis, por que há muitos calculos e ordenação de texto etc...

alguém pode me dar uma maozinha ae?!

Desde já valeu a atenção!

Sorte e saúde a todos!

Desde já agradeço!