This works for me, assuming you want to leave field 1 where it is and align field 2:
on alignFieldBaselines pField1, pField2 local tDescent1, tDescent2, tBot1, tBot2, tDiff1, tDiff2, tRef local fFormattedBottom1, fFormattedBottom2 put item 4 of the formattedRect of line 1 of fld pField1 into fFormattedBottom1 put item 4 of the formattedRect of line 1 of fld pField2 into fFormattedBottom2 put item 4 of measureText(line 1 of fld pField1, fld pField1 ,"bounds") into tDescent1 put item 4 measureText(line 1 of fld pField2, fld pField2 ,"bounds") into tDescent2 put the bottom of fld pField1 into tBot1 put the bottom of fld pField2 into tBot2 put tBot1 - fFormattedBottom1 + tDescent1 into tDiff1 put tBot2 - fFormattedBottom2 + tDescent2 into tDiff2 put the bottom of fld pField1 -(tDiff1 - tDiff2) into tRef set the bottom of fld pField2 to tRef end alignFieldBaselines --- Marty > On Jun 21, 2018, at 10:24 AM, Bob Sneidar via use-livecode > <use-livecode@lists.runrev.com> wrote: > > I modified as follows, but pField2 is one pixel high. Not sure why. > > Bob S > > on alignFieldBaselines pField1, pField2 > 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 pField1 into fFormattedBottom1 > put item 4 of the formattedRect of line 1 of pField2 into fFormattedBottom2 > > put item 4 of measureText(line 1 of pField1, pField1 ,"bounds") into > tDescent1 > put item 4 measureText(line 1 of pField2, pField2 ,"bounds") into tDescent2 > > put the bottom of pField1 into tBot1 > put the bottom of pField2 into tBot2 > > put tBot1 - fFormattedBottom1 + tDescent1 into tDiff1 > put tBot2 - fFormattedBottom2 + tDescent2 into tDiff2 > > -- set the bottom of pField1 to tRef + tDiff1 > set the bottom of pField2 to tBot1 + tDiff2 > end alignFieldBaselines > > >> On Jun 21, 2018, at 10:09 , Bob Sneidar via use-livecode >> <use-livecode@lists.runrev.com> wrote: >> >> Or better yet: (should probably be submitted to the Master Library). Trouble >> with this is that it relocates both fields. It should probably only move >> pField2. >> >> on alignFieldBaselines pField1, pField2 >> 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 pField1 into fFormattedBottom1 >> put item 4 of the formattedRect of line 1 of pField2 into fFormattedBottom2 >> >> put item 4 of measureText(line 1 of pField1, pField1 ,"bounds") into >> tDescent1 >> put item 4 measureText(line 1 of pField2, pField2 ,"bounds") into tDescent2 >> >> put the bottom of pField1 into tBot1 >> put the bottom of pField2 into tBot2 >> >> put tBot1 - fFormattedBottom1 + tDescent1 into tDiff1 >> put tBot2 - fFormattedBottom2 + tDescent2 into tDiff2 >> >> set the bottom of pField1 to tRef + tDiff1 >> set the bottom of pField2 to tRef + tDiff2 >> end alignFieldBaselines >> >> Bob S >> >> >>> On Jun 21, 2018, at 04:37 , Niggemann, Bernd via use-livecode >>> <use-livecode@lists.runrev.com> wrote: >>> >>> 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 >>> ---------------------------------------------------------- >>> >>> >>> >>> _______________________________________________ >>> use-livecode mailing list >>> use-livecode@lists.runrev.com >>> Please visit this url to subscribe, unsubscribe and manage your >>> subscription preferences: >>> http://lists.runrev.com/mailman/listinfo/use-livecode >> >> >> _______________________________________________ >> use-livecode mailing list >> use-livecode@lists.runrev.com >> Please visit this url to subscribe, unsubscribe and manage your subscription >> preferences: >> http://lists.runrev.com/mailman/listinfo/use-livecode > > > _______________________________________________ > use-livecode mailing list > use-livecode@lists.runrev.com > Please visit this url to subscribe, unsubscribe and manage your subscription > preferences: > http://lists.runrev.com/mailman/listinfo/use-livecode _______________________________________________ use-livecode mailing list use-livecode@lists.runrev.com Please visit this url to subscribe, unsubscribe and manage your subscription preferences: http://lists.runrev.com/mailman/listinfo/use-livecode