Align baselines of 2 fields

[Niggemann, Bernd]

Hi Mary,

I suppose you want to center those fields around a common horizontal baseline.

You might try this if that is what you want. Should work with different fonts and sizes.

Two fields, one button.

Kind regards
Bernd

----------------------------------------------------------
on mouseUp
   local tDescent1, tDescent2, tBot1, tBot2, tDiff1, tDiff2, tRef
   local fFormattedBottom1, fFormattedBottom2
   
   put 120 into tRef

   put item 4 of the formattedRect of line 1 of field 1 into fFormattedBottom1
   put item 4 of the formattedRect of line 1 of field 2 into fFormattedBottom2
   
   put item 4 of measureText(line 1 of field 1, field 1 ,"bounds") into tDescent1
   put item 4 measureText(line 1 of field 2, field 2 ,"bounds") into tDescent2

   put the bottom of field 1 into tBot1
   put the bottom of field 2 into tBot2
   
   put tBot1 - fFormattedBottom1 + tDescent1 into tDiff1
   put tBot2 - fFormattedBottom2 + tDescent2 into tDiff2
   
   set the bottom of field 1 to tRef + tDiff1
   set the bottom of field 2 to tRef + tDiff2
end mouseUp
----------------------------------------------------------