ActiveDelphi

FABIO_1979

Boa noite amigos

Criei uma procedure para ler umas variáveis de um arquivo ini ocorre que esta dando o seguinte erro:

incompatible types integer and string

Ghost_Rider · Enviada: Qui Jan 31, 2013 9:13 pm Assunto:

A propriedade Baud é integer, vc esta passando uma string....

Faça assim :
ACBRECF1.Device.Baud:=StrToInt(B);

FABIO_1979 · Enviada: Sex Fev 01, 2013 2:49 pm Assunto:

Obrigado deu certo no entanto, quando início o sisema da a seguinte mensagem:

"MODELO NÃO DEFINIDO"

O arquivo ini ficou assim:

[Config]
modelo=ecfDaruma
porta=COM6
baud=115200

aqui embaixo leio a procedure que lê o ini e passo para o componente

procedure TForm1.Button2Click(Sender: TObject);
begin
ateconfig;
P:=acbrecf1.Porta;
M:=acbrecf1.ModeloStr;
ACBRECF1.Device.Baud:=StrToInt(B);
end;

Ghost_Rider · Enviada: Sáb Fev 02, 2013 8:57 am Assunto:

Bom amigo, vamos lá...

O componente ACBr assim como outro qualquer, tem propriedades e eventos, e assim como qualquer outro componente, precisa de dados para que possa executar suas rotinas...

O componente para ECF do ACBr é igual nesse sentido,ou seja, assim que você fecha o programa todas suas propriedades perdem o valor, assumindo apenas os valores default do próprio componente..

Sendo assim, a propriedade porta, modelo e baud se PERDEM ao fechar o programa, entendeu ??? ou seja, tem que ficar num INI e dai ao carregar o programa você passar os valores, assim:

Acbr.Porta := porta;
Acbr.modelo := modelo;
Acbr.baud := velocidade;

Observe que vc ta fazendo ao contrario

P:=acbrecf1.Porta;
M:=acbrecf1.ModeloStr;
ACBRECF1.Device.Baud:=StrToInt(B);

Outra coisa, deixa o baud por padrão em 9600...apenas impressoras mais modernas utilizam uma velocidade maior que essa...

Abraço...