impressora sweda IFS 7000 II v1.0
oi eu estou fazendo uma rotina para a impressão de cheques da impressora sweda ifs7000ii mas está dando um ero na data..
Result := EnviaComando(´24´+ Copy(String(Banco), 1, 3)+Direita(´000000000000´ + IntToStr(Round(StrToFloat(String(Valor)) * 100)), 12)+ Copy(String(Verso), 1, 1) + Copy(String(Mensagem), 1, 120)+Copy(String(Ano), 1, 1)+Copy(String(Data), 1, 8));
alguem tem uma rotina pra que eu possa comparar?
Result := EnviaComando(´24´+ Copy(String(Banco), 1, 3)+Direita(´000000000000´ + IntToStr(Round(StrToFloat(String(Valor)) * 100)), 12)+ Copy(String(Verso), 1, 1) + Copy(String(Mensagem), 1, 120)+Copy(String(Ano), 1, 1)+Copy(String(Data), 1, 8));
alguem tem uma rotina pra que eu possa comparar?
Ale
Curtidas 0