I have a list box that displays several fields of a table as a single element. I am trying to format it so that there are trailing blanks at the end of each field. I want the beginning of each field to line up. I am using the following code:

putavailinlist = 0
sele mainclint2
set order to id
go top
intrinsic = reccount()
for find = 1 to intrinsic
IF !empty(mainclint2.company_na)
putavailinlist = putavailinlist + 1
store (padr(mainclint2.company_na,36) + padr(mainclint2.contact,36) + padr(mainclint2.address,50) + ' ' + alltrim(str(mainclint2.id))) to dontincludestring(find)
ENDIF
if not eof()
skip
endif
endfor

How can I get the fields that are stored in the array to format nicely in a list box?