Fórum Auntenticar em impressoras 40 colunas Mecaf #359825
11/06/2008
0
Os comandos estão de acordo com exemplos da propria fabricante.
Renato
Curtir tópico
+ 0Posts
12/06/2008
Edilcimar
Gostei + 0
12/06/2008
Renato
Edilcimar o comando para autenticar é este :
ret := CPModoDoc;
if( ret = 0 ) then LModoDoc := TRUE; // Passou para o modo Doc
Aviso.Caption := ´´;
if( LModoDoc ) then
if( InsDoc ) then begin
if op = ´AV´ then begin // Se for venda a vista
if edVVista.Text <> ´0,00´ then begin
ptexto := Pchar(´[ ´+NReg+´ ] ´+op+´-´+lbNumUsuario.Caption+´ * ´+datetostr(date())+´ * ´+edVVista.Text);
end else begin
ShowMessage(´ PREENCHA O VALOR A VISTA ´);
edVVista.SetFocus;
end;
end;
´NReg´ é o numero do registro no caixa
Autentica ,mas depois começa e ejetar a Bobina da impressora
Gostei + 0
12/06/2008
Edilcimar
Aqui ela está imprimindo como um DOC, portanto irá imprimir o tamanho da folha difinida como padrão windows. Pergunto onde é que você sai do modo DOC?
Eu não trabalho com mecaf, mas creio que o princípio básico é válido para qualquer impressora.
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)