[Ivanius]

Да я именно это и искал, но мне никто так и не смог обьяснить что в этой библиотеке конкретно нужно(openSSL) потому и начал искать обходные пути.
Вроде бы все нашел, разобрался, но вот что:

Код:

procedure TUCCCheck.opencrtClick(Sender: TObject);
var
  cert:TX509Certificate;
begin
  if FileOpen.Dialog.Execute then
    try
      cert:=TX509Certificate.Create;
      cert.LoadFromFile(FileOpen.Dialog.FileName);
        with crttext.Lines do begin
          Add(cert.Issuer);
          Add(cert.Subject);
          Add(DATEToSTR(cert.NotBefore));
          Add(DATEToSTR(cert.NotAfter));
          Add(cert.Text);
        end;
    finally
      cert.Free;
    end;
end;

Ав вылетает когда окрываю файл, пробовал другие ДЛЛки, там ошибку пишет и все.....
Понял в чем была проблема, брал все из libeay32.pas а не дллки
сейчас не компилируется ссылаеться что нету этого пас файла.
В общем просьба скинуть сюда весь комплект рабочих файлов OpenSLLUtils.pas, libeay32.dll, libeay32.pas
в принципе файл вродебы открывается, но считать ничего не получается...