Hi,
vielen, vielen Dank für Deine fixe Antwort. (Sorry für meine lahme Antwort, war 4 Tage Ski fahren)
Ich hatte das Problem schon gelöst, gefällt mir aber nicht so gut:
Habe die betreffende Funktion in der ScardCL.pas verändert:
Delphi-Quellcode:
var
SCardCLGetUID: function(ulHandleCard: SCARDHANDLE;
var pucUID ;
ulUIDBufLen: ULONG;
var pulnByteUID: ULONG) : ULONG; stdcall;
Delphi-Quellcode:
var
OkErr : ULONG;
dwActiveProtocol : PDWord;
UID, ReaderName : String ;
UID_Reader:array[0..12]of CHAR;
UIDLen : ULong ;
hCard : LongInt ;
begin
....
UIDLen := 12 ;
OkErr := SCardCLGetUID(hCard,UID_Reader,UIDLen,UIDLen);
Wie soll ich denn folgendes verstehen?
Zitat:
Je nachdem, wie du pucUID lesen/verwenden willst.
(OKERR/TOKErr = LongInt und ENTRY = stdcall)
Mit bestem Gruß
Thomas