Me too, but I had some mixed results with this approach. In other words, it was almost perfect, but not precise.
Let me try to find my old thread.
>>Step 1: Change FIELD02's left to be the same as FIELD01's left
>>Step 2: Change FIELD02's width to match its original right edge
>>Step 3: Change FIELD02's expression to be something like this:
>>
>> PADL(FIELD02, ExtraSpaces(FIELD01))
>>
>>Step 4: Create an ExtraSpaces( ) function:
>>
>>FUNCTION ExtraSpaces(lcField1Value)
>> ** Font info for field 1
>> lcName1 = "Arial"
>> lcSize1 = 12
>> lcStyle1 = "B"
>>
>> ** Font info for field 2
>> lcName2 = "Arial"
>> lcSize2 = 10
>> lcStyle2 = "N"
>>
>> lnTextWidth = TXTWIDTH(lcField1Value,lcName1,lcSize1,lcStyle1)*;
>> FONTMETRIC(6,lcName1,lcSize1,lcStyle1)
>>
>> lnSpaceWidth = TXTWIDTH(SPACE(1),lcName2,lcSize2,lcStyle2)*;
>> FONTMETRIC(6,lcName2,lcSize2,lcStyle2)
>>
>> lnSpaces = CEILING(lnTextWidth/lnSpaceWidth)
>>
>> RETURN lnSpaces
>>ENDFUNC
>>
>>
>>I hope this makes sense. I can send you a sample if you need it.
>
>Exactly what I had in mind, and actually with all the details I meant to leave to him as homework. You saved me a few minutes :)
If it's not broken, fix it until it is.
My Blog