This blog is for techies who develops apps and application by using Delphi, c#
First blog post
This is the post excerpt.
This is the post excerpt.
This blog is for techies who develops apps and application by using Delphi, c#
Sometimes Sentrifugo configuration stuck by showing configuration panel grayed out.
That might be because of Apache or MYSQL log files become too huge to write any log into that files.
So, Just rename them.
For Example rename error.log to error_log.
And restart apache and mysql services on XAMP, try to configure again.
I hope this will solve the problem.
Download openssl installer from following URL based on you operating system version (32 bit or 64 bit)
https://slproweb.com/products/Win32OpenSSL.html
We get WinXXOpenSSL-1_0_2h.exe. Install this. You will get folder in c drive called OpenSSL-Win64.
Run command prompt as administrator
Type these commands at prompt
Cd\
Cd OpenSSL-WinXX
Then you should get prompt like this
C:\OpenSSL-WinXX>
Type the following command to create the ssl files (cert.pem,and key.pm)
C:\OpenSSL-WinXX> Openssl req –x509 –newkey rsa:2048 –keyout key.pem –out cert.pem –days XXX
Then you will get following screen enter the pass phrase
Enter the desired phrase and press enter, then you will be asked to enter the same phrase for verifying,
After pressing enter, you will get following screen for details of certificates
Then the certificates will be created and saved in the folder of c:\openssl-WinXX\bin
Open your new project or already existing project. Go to creation of TIdHTTPWebBrokerBridge object in the project.
create a procedure in the private section of the class as
procedure OnGetSSLPassword(var APassword: String);
and implement
procedure TForm1.OnGetSSLPassword(var APassword: String);
begin
APassword := ‘<your password is pass phrase mentioned while creating ssl certificates>’;
end;
Use the IdSSLOpenSSL unit in uses list.
Change the code from
begin
FServer := TIdHTTPWebBrokerBridge.Create(Self);
end;
to
var
LIOHandleSSL: TIdServerIOHandlerSSLOpenSSL;
begin
FServer := TIdHTTPWebBrokerBridge.Create(Self);
LIOHandleSSL := TIdServerIOHandlerSSLOpenSSL.Create(FServer);
LIOHandleSSL.SSLOptions.CertFile := ‘<Path to cert.pem where it is saved>’;
LIOHandleSSL.SSLOptions.RootCertFile := ”;
LIOHandleSSL.SSLOptions.KeyFile := ‘<Path to key.pem where it is saved>’;
LIOHandleSSL.OnGetPassword := OnGetSSLPassword;
FServer.IOHandler := LIOHandleSSL;
end;