Width of each character.

[Jacob Wall]

TEXTOUT_P() returns the X coordinate at which the next character of the string should be drawn if it had more characters (from the Help).

So with a bit of trial and error you could figure it out from that, here's a sample to get started:

Code:

EXPORT ChrWidth()
BEGIN
  LOCAL mychars:={"A","B","C","1","2","3"};
  LOCAL mylist:={}, k;
  FOR k FROM 1 TO SIZE(mychars) DO
    mylist:=CONCAT(mylist,{TEXTOUT_P(mychars(k),0,0)});
  END;
  MSGBOX(mylist);
END;