User Function Exemplo()
local cLinha := "123"+Chr(9)+"45"+CRLF+"6789"
local cRes
cRes := MemoLine(cLinha, 6, 1, 2, .f.) //"123 4"
cRes := MemoLine(cLinha, 6, 1, 2, .t.) //"123 "
cRes := MemoLine(cLinha, 7, 1, 3, .f.) //"123 4"
cRes := MemoLine(cLinha, 7, 1, 3, .t.) //"123 "
cRes := MemoLine(cLinha, 6, 2, 2, .f.) //"5 "
cRes := MemoLine(cLinha, 6, 2, 2, .t.) //"45 "
cRes := MemoLine(cLinha, 7, 2, 3, .f.) //"5 "
cRes := MemoLine(cLinha, 7, 2, 3, .t.) //"45 "
cRes := MemoLine(cLinha, 12, 2, 3, .f.) //"6789 "
cRes := MemoLine(cLinha, 12, 2, 3, .t.) //"6789 "
Return
|