| ( |
|
|
|||
| Gets a line of text | |||
 |
|
| Parameters: | |
| Record name | |
|
|
global
procedure PrintNote(record NotepadVc Noter)
BEGIN
Integer i,rwcnt;
string 255 tstr;
rwcnt = LineTextCnt(Noter);
for (i=0;i<rwcnt;i=i+1) begin
tstr = LineTextGet(Noter,i);
OUTFORMFIELD("F_NOTE",tstr);
end;
RETURN;
END;
|
|
| Related topics: | |