Fórum USUÁRIO DIGITA PORTA DA IMPRESSORA! tem como? #222238

25/03/2004

0

Delphi

Preciso fazer um esquema onde o usuário possa digitar o endereço da porta da impressora. Eu tentei a rotina abaixo mas nao funcionou:

procedure TForm1.Button1Click(Sender: TObject);
begin
     Memo1.Lines.SaveToFile(´c:\porta_impressora.txt);
end;


procedure TForm1.bot_imprimirClick(Sender: TObject);

var
     imprimir  : TextFile;
     imprime  : string;
begin
     Memo1.Lines.LoadFromFile(´c:\porta_impressora.txt´);
     imprime:=Mem1.Lines.Lines;
     AssignFile(imprimir,´LPT1´);
     Rewrite(imprimir);
     Writeln(imprimir,´ IMPRESSÃO DE ALGUMA COISA´);
end.


da um erro de (Inconpatible types), de qualquer modo, dessa maneira é impossivel, se alguem souber outra forma.
Detalhe: Preciso que fica gravado o endereco da porta, para que nao seja necessario o usuario digitar novamente quando entra de novo no programa.

VALEU!!!


Vispo

Vispo

Responder

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar