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
