procedure TForm2.FormCreate(Sender: TObject);
begin
IdSSLOpenSSLHeaders.Load;
end;
procedure TForm2.SpeedButton1Click(Sender: TObject);
begin
try
memo1.Text := idhttp1.Get('https://weblogin.runescape.com/login.ws');
finally
idhttp1.Free;
idssliohandlersocketopenssl1.Free;
end;
end;
Network and collaborate with thousands of CTOs, CISOs, and IT Pros rooting for you and your success.
”The time we save is the biggest benefit of E-E to our team. What could take multiple guys 2 hours or more each to find is accessed in around 15 minutes on Experts Exchange.
Our community of experts have been thoroughly vetted for their expertise and industry experience.