>*_______________________________________________________________________________ >function do_it() > > > local n, out, p1, p2 > > && (1) > out = space(4096) > p1 = 'First' > p2 = 'Second' > > n= sPrintf_str_str (@m.out, "Hello %s and %s", m.p1, m.p2) > out = left(m.out, m.n) > ?out > > && (2) > out = space(4096) > p1 = 'Third' > p2 = 'Fourth' > > n= sPrintf_str_str (@m.out, "Hello %s and %s", m.p1, m.p2) > out = left(m.out, m.n) > ?out > > && (3) > out = space(4096) > p1 = 'Third' > p2 = 24 > > n= sPrintf_str_int (@m.out, "Hello %s and %d", m.p1, m.p2) > out = left(m.out, m.n) > ?out > > && (4) > out = space(4096) > p1 = 'Third' > p2 = 'Seven' > > n= sPrintf_str_str (@m.out, "Hello %s and %s", m.p1, m.p2) > out = left(m.out, m.n) > ?out >endfunc >*_______________________________________________________________________________ >function sPrintf_str_str( out, sformat, p1, p2) > > declare integer sprintf in msvcrt.dll as sPrintf_str_str ; > string@, string, string, string > > return sPrintf_str_str (@m.out, m.sformat, m.p1, m.p2) > >endfunc >*_______________________________________________________________________________ >function sPrintf_str_int( out, sformat, p1, p2) > > declare integer sprintf in msvcrt.dll as sPrintf_str_int ; > string@, string, string, integer > > return sPrintf_str_int(@m.out, m.sformat, m.p1, m.p2) > >endfunc >*_______________________________________________________________________________ >Looks great, Gregory. Thanks a lot.