Source position: crypth.inc line 25
procedure encrypt_r(
__block: PAnsiChar;
__edflag: LongInt;
__data: Pcrypt_data
);