Umstellung auf https: Wie geht jetzt UrlExists, Get, Shellexecute

[Theseus]

Meine PICOLAY-Website wurde auf HTTPS umgestellt. Jetzt funktionieren die Internetzugriffe aus dem Programm heraus nicht mehr.

Delphi-Quellcode:

procedure TForm1.ShowPICOLAYhomepage1Click(Sender: TObject);
begin
     try
        if UrlExists('https://www.picolay.de/whatsnew.htm', true) then
        begin
             ShellExecute(Application.Handle, 'open',
             PChar('https://www.picolay.de'), nil, nil,
             SW_ShowNormal);
        end;
     except
        MessageDlg('Sorry, [url]www.picolay.de[/url] not found' , mtConfirmation, [mbok], 0);
     end;
end;



procedure CheckforNewVersion;
var
 MyIdHTTP: TIdHTTP;
 currentversion, webversion : string;
 connected : boolean;
begin
     connected := false;
     try
        connected := UrlExists('https://www.picolay.de/latestversion.txt', true);
     except;
     end;
     if connected then
     begin
          currentversion := '20240215';
          webversion := '0';
          MyIdHTTP := TIdHTTP.Create(Form1);
          try
             webversion := MyIdHTTP.Get('https://www.picolay.de/latestversion.txt');
             finally
             FreeAndNil(MyIdHTTP);
          end;
          if webversion > currentversion then
          begin
            MessageDlg('New free version of PICOLAY available! Please'
             +#13+ 'download from [url]www.picolay.de[/url] as soon as possible.' , mtinformation, [mbok], 0);
          end;
    end;
end;

Wer hilft mir bei der Umstellung des Codes? Bin aus der Generation, für die das Internet Neuland ist

Vielen Dank,
Theseus