Ir para conteúdo
Faça parte da equipe! (2024) ×
Conheça nossa Beta Zone! Novas áreas a caminho! ×
  • Quem está por aqui   0 membros estão online

    • Nenhum usuário registrado visualizando esta página.

Ajudinha ake!


oinetooi
 Compartilhar

Posts Recomendados

Eu acho...que você deve por um PrintDialog no Form ( localizado na aba Dialogs )

E por no botão:

É necessário se cadastrar para acessar o conteúdo.

 

Iback assim que ele quer e explica melhor pra ele tipo com imagems desse geito ai e muito simples

 

É necessário se cadastrar para acessar o conteúdo.

Link para o comentário
Compartilhar em outros sites

Nao sei mas explicar mas direitinho pra ti

 

Tipo

 

1 Addicione um PrintDialog na Aba dialogs e um button na aba standard

 

2 Coloque os seguintes codes abaixo

 

var

Arquivo:textfile;

begin

AssignFile(Arquivo,'c:\Teste.txt');//Aonde è selecionado aonde está o *.txt

Rewrite(Arquivo);

writeln(Arquivo,'Teste de Impressão');//Aonde Vai o nome do Projeto

print;

closefile(Arquivo);

end;

 

Lembrando apague o begin e o end; deixe-o assim

 

procedure TForm1.Button1Click(Sender: TObject);

var

Arquivo:textfile;

begin

AssignFile(Arquivo,'c:\Teste.txt');//Aonde è selecionado aonde está o *.txt

Rewrite(Arquivo);

writeln(Arquivo,'Teste de Impressão');//Aonde Vai o nome do Projeto

print;

closefile(Arquivo);

end;

 

end.

 

3 De F9 no seu Projeto e estará Pronto para ser executado sem erro

 

É necessário se cadastrar para acessar o conteúdo.

 

flw

Link para o comentário
Compartilhar em outros sites

Este tópico está impedido de receber novos posts.
 Compartilhar

×
×
  • Criar Novo...

Informação Importante

Nós fazemos uso de cookies no seu dispositivo para ajudar a tornar este site melhor. Você pode ajustar suas configurações de cookies , caso contrário, vamos supor que você está bem para continuar.