Serial Port

[[egostar]]

Una pregunta, veo que estas tratando de usar una velocidad de Baud Rate=56,000, pero.... acaso no será Baud Rate=57,600

Salud OS

[JoseFco]

Ya cambie la velocidad tambien.

Empezado por egostar

Una pregunta, veo que estas tratando de usar una velocidad de Baud Rate=56,000, pero.... acaso no será Baud Rate=57,600

Salud OS

El programita espia al rodar la aplicacion original con el micro me dice que es a 56,000 y puedo leer los 8 hex que retorna el micro.

[[egostar]]

Hice un pequeño programa para capturar lo que se recibe en el puerto, ademas le he puesto las señales del puerto serial para ver cuando se envia y cuando se reciben caracteres y el estado de otras señales importantes.

Espero que esto funcione.

Salud OS

[JoseFco]

Eso esta perfecto.

Cuando lo ruedo con el micro me da los 8 hex, las luces solo son TX and RX.

Dime algo que configuracion tiene el serial port en ese programita?

Un Saludo.

[[egostar]]

Empezado por JoseFco

Eso esta perfecto.

Cuando lo ruedo con el micro me da los 8 hex, las luces solo son TX and RX.

Dime algo que configuracion tiene el serial port en ese programita?

Un Saludo.

Pues la configuracion es la que tu das excepto la velocidad que es 57,600.

Estoy usando los componentes Apro, este es el código que estoy usando en el programa

Código Delphi [-]
procedure TForm1.FormShow(Sender: TObject);
begin
  ApdSLController1.Monitoring := True;
end;

procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction);
begin
  ApdComport1.Open := False;
end;

procedure TForm1.BitBtn1Click(Sender: TObject);
begin
  ApdComPort1.PutString(#2#0);
end;

Salud OS

PD. Te paso el fuente, pero requieres de los componentes que te menciono.

[JoseFco]

Tengo que aprenderme ese componente Apro.

A este:

Código Delphi [-]
procedure TForm1.FormCreate(Sender: TObject);beginComport1.Connected:=true;Comport1.WriteStr(#2#0);end;

Le falta dejar el serial port reciviendo, que es lo que no logro hacer.Me da error. Un Saludo.

[[kurono]]

hola egostar puedes mostrar el codigo fuente de ese programa que hiciste

[[egostar]]

Empezado por JoseFco

Tengo que aprenderme ese componente Apro.

A este:

Código Delphi [-]
procedure TForm1.FormCreate(Sender:TObject);
begin
  Comport1.Connected:=true;
  Comport1.WriteStr(#2#0);
end;

Le falta dejar el serial port reciviendo, que es lo que no logro hacer.Me da error.

Un Saludo.

Seria bueno que nos mencionaras que error te da. si me dices donde bajo ese componente que usas podría hacer algunas pruebas para ver que es lo que te hace falta.

Empezado por kurono

hola egostar puedes mostrar el codigo fuente de ese programa que hiciste

Todo está en el archivo adjunto que coloque.

Salud OS

[JoseFco]

Hola Egostar.

Si el ComPort Library version 3.10 de Dejan Crnila es el que uso y lo encontre en un hilo de aqui del foro.
Yo entro a Google y aqui en en el foro a ver hilos y referencias sobre el comport.Tomo algunos codigos y trato de rodarlos, pero ya te digo me da errores algunas veces tres y tratando de repararlos cuando vengo a ver tengo 10 jajajajajajaja.Algun dia lo entendere mejor o al menos me dejara jugar con el.

Un Saludo.

[seo]

Empezado por JoseFco

Eso esta perfecto.

Cuando lo ruedo con el micro me da los 8 hex, las luces solo son TX and RX.

Dime algo que configuracion tiene el serial port en ese programita?

Un Saludo.

Oye ya instale el Async Apro para el delphi 5 que es el que uso, ahora no tengo ni idea de como usar los componentes que tiene este componente, no se si me equivoco pero creo que para usar el puerto serie necesito utilizar el puerto TapdComPort, ahora tengo la duda de como utilizar este componente, si puedes ayudarme te lo agradeceria.

Saludos.

[JoseFco]

Hola seo.

Yo lo que tengo es el ComPort Library version 3.10 para Delphi 3,4,5,6 y 7. Por Dejan Cernilla.
Con el Apro no te puedo ayudar no lo he trabajado.Pero si instalas este te puedo dar una ayudadita con tu proyecto.Si el micro que trabajas es de la familia Intell 51 te puedo ayudar un poco mas.


Un Saludo.

[seo]

Empezado por JoseFco

Hola seo.

Yo lo que tengo es el ComPort Library version 3.10 para Delphi 3,4,5,6 y 7. Por Dejan Cernilla.
Con el Apro no te puedo ayudar no lo he trabajado.Pero si instalas este te puedo dar una ayudadita con tu proyecto.Si el micro que trabajas es de la familia Intell 51 te puedo ayudar un poco mas.


Un Saludo.

Orale, nada mas dime donde lo encuentro, o si me lo puedes pasar mejor, y ya me das un pequeño tutorial de como se utiliza.

El micro que utilizo es el pic 16f877a (aunque tambien he utilizado los de la familia 51), pues la verdad comparandolos, son un poco mas complicados los de la familia 51.

Pues espero tu respuesta, gracias por contestar.

[seo]

Empezado por egostar

Hice un pequeño programa para capturar lo que se recibe en el puerto, ademas le he puesto las señales del puerto serial para ver cuando se envia y cuando se reciben caracteres y el estado de otras señales importantes.

Espero que esto funcione.

Salud OS

Hola egostar, he mirado desde el principio del tema hasta el fin, y se ve que eres bastante bueno, por eso te pido he de pedir ayuda, mira mi caso es que tambien tengo que leer y escribir datos por el puerto serial de mi pc a un micro, el problema es que no tengo idea de como hacerlo. El Baud rate al que envio es de 2400, con 8 bits, sin paridad y con bit de stop. Ya probe el micro y la conexion y si sirve, lo probe con una terminal uart que viene incluida en el kit de desarrollo que uso, lo que hago es enviar un dato y en seguida el uart lo muestra en un edit, pero necesito yo crear mi propio monitor de acuerdo al proyecto que hago.

Si puedieras ayudarme con alguna referencia, manual, o codigo para que de ahi partiera, te lo agradeceria mucho.

Saludos...