*_______________________________________________________________________________ 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 *_______________________________________________________________________________