Revert "Improve TNewLinkLabel.AdjustHeight." Closes #462.

Components/BidiCtrls.pas

@@ -139,9 +139,9 @@ end;
 function TNewLinkLabel.AdjustHeight: Integer;
 begin
   var OldHeight := Height;
-  var IdealHeight := SendMessage(Handle, LM_GETIDEALHEIGHT, 0, 0);
-  if IdealHeight <> 0 then
-    Height := IdealHeight;
+  var IdealSize: TSize;
+  SendMessage(Handle, LM_GETIDEALSIZE, Width, LPARAM(@IdealSize));
+  Height := IdealSize.cy;
   Result := Height - OldHeight;
 end;