Smartcard auslesen, Kommandos senden

[newuser01]

Zitat von Bummi:

ist doch alles in CPort drin

Delphi-Quellcode:

function StrToBaudRate(Str: string): TBaudRate;
function StrToStopBits(Str: string): TStopBits;
function StrToDataBits(Str: string): TDataBits;
function StrToParity(Str: string): TParityBits;
function StrToFlowControl(Str: string): TFlowControl;
function BaudRateToStr(BaudRate: TBaudRate): string;
function BaudRateToInt(BaudRate: TBaudRate): Integer;
function StopBitsToStr(StopBits: TStopBits): string;
function DataBitsToStr(DataBits: TDataBits): string;
function ParityToStr(Parity: TParityBits): string;
function FlowControlToStr(FlowControl: TFlowControl): string;

ok danke

muss ich das dann mit dem zusatz "br" machen oder ohne also:

Code:

so?:

sBaudrate := 9600;
ComPort.BaudRate := StrToBaudRate('br'+sBaudrate);

oder so?:

Code:

sBaudrate := 9600;
ComPort.BaudRate := StrToBaudRate(sBaudrate);