PDA

Ver la Versión Completa : Componente para leer Smart Card


shoulder
16-01-2014, 18:44:34
Hola instale el componente para leer mi smartcard de tarjeta de clave digital uso las sentencias y no hace nada....

procedure TForm1.Button1Click(Sender: TObject);
Var

data, cadena : string;
MyData:String;
sw1, sw2: byte;

begin
MyData:=' ';
sw1:=0;
sw2:=0;
PCSCConnector1.Init;
PCSCConnector1.UseReaderNum := 0;

If not PCSCConnector1.Open then
ShowMessage('Error Abrir');
If not PCSCConnector1.Connect then
ShowMessage('Error Conectar');


If not PCSCConnector1.Connect then
PCSCConnector1.Connect;

PCSCConnector1.GetResponseFromCard('ins', MyData, sw1, sw2)
end;

elmago00
16-01-2014, 23:13:33
para que deseas la smartcard? te pregunto por que hay muchas.
explica un poco mas por favor.

shoulder
17-01-2014, 01:14:14
Hola mago, en la empresa donde estoy usamos tarjeta (smart card) con el chip para firma digital, por eso tengo que acceder al lector de tarjeta (baje el componente y no hace nada).
Gracias.

Neftali [Germán.Estévez]
17-01-2014, 16:29:21
¿Este componente de dónde ha salido?
¿Trabaja con alguna DLL o servidor COM? Si es así ¿está instalado? ¿Es el que viene con el lector?

...
Muchas dudas para poder ayudarte.

shoulder
17-01-2014, 20:51:03
Hola lo baje de este enlace

http://stackoverflow.com/questions/1278077/delphi-smartcards

donde dice a second choice can be Delphi PC/SC SmartCard Component 0.91 (http://www.vclcomponents.com/go/37859/373536343e37343033613b663266366136613660306636313630336137653236326537333e32356232663e31363236613631 3738343136653733376137303230363637333f30343137613f333265366437363632/).

Gracias.