Painel de líderes

Nossa, desculpe, realmente kkk Vlu muito obrigado cara, vlu mesmo Juliomar eu já coloco o Modelo da Balança atraves de um arquivo INI veja: procedure TFrVendas.Timer1Timer(Sender: TObject); var portHandle: Integer; begin //Pegar Marca e Modelo da Balança vArqUsa_Balanca := TIniFile.Create(extractfilepath(ParamStr(0))+'ArqUsa_Balanca.ini'); vMarcaBalanca:= vArqUsa_Balanca.ReadString('Balanca','Marca',''); vModeloBalanca:= vArqUsa_Balanca.ReadString('Balanca','Modelo',''); // if acbrBal1.Ativo then ACBrBAL1.Desativar; // configura porta de comunicação ACBrBAL1.Modelo := TACBrBALModelo(vModeloBalanca); ACBrBAL1.Device.HandShake := TACBrHandShake(FrConfiguracao.DataSetConfigBalancaHandShaking.AsInteger); ACBrBAL1.Device.Parity := TACBrSerialParity(FrConfiguracao.DataSetConfigBalancaParity.AsInteger); ACBrBAL1.Device.Stop := TACBrSerialStop(FrConfiguracao.DataSetConfigBalancaStopBits.AsInteger); ACBrBAL1.Device.Data := FrConfiguracao.DataSetConfigBalancaDataBits.AsInteger; ACBrBAL1.Device.Baud := FrConfiguracao.DataSetConfigBalancaBaudRate.AsInteger; ACBrBAL1.Device.Porta := FrConfiguracao.DataSetConfigBalancaPortaSerial.Value; ACBRBAL1.Ativar; end; Mas eu resolvi, era só um pequeno ajuste no código do meu aplicativo, vlu cara

6.3 - Mostre respeito pelo modo de escrever. Escreva de modo claro, gramaticalmente e semanticamente correto. Não escreva TUDO EM MAIÚSCULAS. Isso é lido como se estivesse gritando e é considerado rude. Favor leia as regras do fórum. Bom sem ter logs e maiores informações meio difícil de conseguir ajudar! é como se quisesse mostrar um foto pra um cego!