Numeric Format Problem

[Jim O]

Here is a sample program that simulates the problem:

Procedure test;

var

h : handle;

wdth : real;

procedure testNum;

begin

textOrigin(0", 1");

begintext; Num2StrF(wdth*12) endtext;

end;

Procedure wrksht;

begin

wdth := GetCellNum(h, 1, 1);

end;

Begin

h := GetObject('Worksheet-1');

wrksht;

testNum;

end;

run(test);

[Jim O]

SOlved the problem. I needed to go to Page -> Units and set to Fractional. JIm