[BoRoV]

Код:

if FileExist(ExtractFilePath(ParamStr(0)) + 'key.ccbf') then
begin
  Form3.sMemo1.Lines.LoadFromFile(ExtractFilePath(ParamStr(0)) + 'key.ccbf');
  Form3.sBitBtn1.Click;
end;