Source position: lbstring.pas line 57
procedure TripleDESEncryptStringCBC(
const InString: AnsiString;
var OutString: AnsiString;
const Key: TKey128;
Encrypt: Boolean
);