Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > Varios
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Grupo de Teaming del ClubDelphi

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 13-08-2004
emeceuy emeceuy is offline
Miembro
 
Registrado: jun 2003
Ubicación: Uruguay
Posts: 122
Poder: 21
emeceuy Va por buen camino
PUERTO PARALELO, componente para manejarlo

HOLA A TODOS !

Bueno, no se si no será muy ambiciosa mi pretención, pero lo que quiero es saber si existe algún componente que me permita controlar en forma "relativamente sencilla" el puerto paralelo del PC.
He estado buscando en internet y parece que hay mucho información acerca del puerto serial, pero lo que encontré del puerto paralelo no es muy claro y no lo logro entender.

Lo que pretendo es un componente o código de delphi que me permita asignar un valor lógico a determinado pin del puerto. Por ejemplo, poner un voltaje de nivel alto (1 logico) en el pin nº7 (por ejemplo, o en cualquier otro pin de salida), y tambien poder leer el estado de los pines.

Les agradecería mucho si me pueden dar una mano en esto, porque lo que he conseguido, no lo entiendo bien, no me parece sencillo, y tengo que crear este software par aun proyecto y no se como controlar al puerto.

Gracias x 1000000

mArCe
__________________
Marcelo C.
Responder Con Cita
  #2  
Antiguo 14-08-2004
soul6301 soul6301 is offline
Miembro
 
Registrado: may 2004
Posts: 77
Poder: 20
soul6301 Va por buen camino
Hola:

Yo buscaba ese componente también pero no encontré algo parecido. Sin embargo pude resolver mi problema usando lenguaje Assembler. Lo que tienes que hacer es, en cualquier procedimiento que uses, escribir la etiqueta "asm" y luego el lenguaje en assembler, por ejemplo:

asm
MOV DX,378H //Asigno a Dx la dirección del puerto que es 378H
MOV AL,01H //Asigno el dato que quiero sacar a AL
OUT DX,AL //Saco el dato.
end;

Si quieres encender el séptimo pin, una salida lógica sería "0100 0000", que es equivalente a 70H, entonces escribirías:

asm
MOV DX,378H //Asigno a Dx la dirección del puerto que es 378H
MOV AL,70H //Asigno el dato que quiero sacar a AL
OUT DX,AL //Saco el dato.
end;

Espero te sirva mi ayuda. Si quieres profundizar el tema, escríbime a jean6301@hotmail.com
Puedo enviarte unos ejemplos de ayuda si deseas.

Suerte!
Responder Con Cita
  #3  
Antiguo 15-08-2004
Avatar de Paoti
Paoti Paoti is offline
Miembro
 
Registrado: may 2003
Ubicación: Monterrey. N.L., México
Posts: 612
Poder: 21
Paoti Va por buen camino
ahi les va un link



esta el componente esta sencillo para mandar datos al lpt (lptCtrl)



no lo he probado



P.S. soul, te agregue al smn, por fa, me podrias enviar ejemplos de lo que has hecho, necesito automatiar un proyecto y no se como



de antemano gracias
__________________
Estudia y anda en la calle.... que asi serás el doble de listo que los demás...

análisis de información
análisis y diseño de sistemas

Paoti Rios Reséndiz
Responder Con Cita
  #4  
Antiguo 16-08-2004
Avatar de Paoti
Paoti Paoti is offline
Miembro
 
Registrado: may 2003
Ubicación: Monterrey. N.L., México
Posts: 612
Poder: 21
Paoti Va por buen camino
http://vclcomponents.com/x_authors.asp?ID_AUTHOR=7337


se me olvido porner el link ahi esta



nos vemos
__________________
Estudia y anda en la calle.... que asi serás el doble de listo que los demás...

análisis de información
análisis y diseño de sistemas

Paoti Rios Reséndiz
Responder Con Cita
  #5  
Antiguo 16-08-2004
soul6301 soul6301 is offline
Miembro
 
Registrado: may 2004
Posts: 77
Poder: 20
soul6301 Va por buen camino
Hola:

No sabía de la existencia del componente. Voy a descargarlo y probarlo.

No hay problema Paoti, acepto mantener contacto por el msn. Te enviaré el ejemplo que hice acerca del puerto paralelo, pero es muy sencillo, la base de todo está en el lenguaje assembler. En fin, espero pueda ayudarte en lo que necesitas. Me agradaría que me enviaras un mail pidiendo qué es lo que buscas exactamente.

Gracias.
Responder Con Cita
  #6  
Antiguo 16-08-2004
emeceuy emeceuy is offline
Miembro
 
Registrado: jun 2003
Ubicación: Uruguay
Posts: 122
Poder: 21
emeceuy Va por buen camino
No lo puedo hacer funcionar

Estimado Soul y Paoli: Gracias a ambos por responder

Voy a bajar y probar el componente.
Por otro lado, Soul, no pude hacer funcionar el procedimiento que me diste (compila bien, pero no responde el puerto). Te envié un mail pidiendo si me podrías enviar mas informacion, y explicandote un poco el problema.

Saludos
y gracias

mArCe
__________________
Marcelo C.
Responder Con Cita
Respuesta



Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro


La franja horaria es GMT +2. Ahora son las 15:24:05.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi