Update URL in source code comments

Author: delphidabbler

demos/58/Unit1.pas

@@ -83,7 +83,7 @@ procedure HandleBodyAttrs(const Document: IDispatch);
 
 procedure TForm1.Button1Click(Sender: TObject);
 
-  // from http://www.delphidabbler.com/tips/72
+  // from https://www.delphidabbler.com/tips/72
   procedure Pause(ADelay: Cardinal);
   var
     StartTC: Cardinal;