I'm having partial success, and am very confused by what I am seeing.
Here is one of my current print routines:
Var vWillItFit as Int
Var vTextToPrint as String
Var vMaxWidth as Int
Var vLen as Int
Var vWidth as Int
// Prints the Pickup Company name
vWillItFit = 0
vTextToPrint = CleanPrintData(Pickup_Company)
vLen = @Len(vTextToPrint)
vMaxWidth = 300 //This is the Max printed width
While((vWillItFit = 0) And (vLen > 0))
{
Printstring(vTextToPrint, 0, 0, 0, vFont, vSize, 1)
If @PageExtentX() <= vMaxWidth Then
{
vWillItFit = 1
}
Else
{
vLen = vLen - 1
vTextToPrint = @Left(vTextToPrint, vLen)
}
}
Printstring(vTextToPrint, 160, vPosY + 255, 0, vFont, vSize, 0)
When the value stored in Pickup_Company is "Company @ Name", the printout is "Company".
When the value stored in Pickup_Company is "@ Name", the printout is "@ Name".
???