[r45]: / trunk / library / FileControl / FB_FileControl / Open / svnobj  Maximize  Restore  History

Download this file

8 lines (7 with data), 1.9 kB

1
2
3
4
5
6
7
// Opens a file
METHOD PUBLIC Open : SysFile.SysTypes.RTS_IEC_RESULT;
VAR_INPUT
    FileAccessMode : SysFile.ACCESS_MODE := SysFile.ACCESS_MODE.AM_APPEND_PLUS;
FileHandle := SysFile.SysFileOpen(szFile := Filename,
                                  am := FileAccessMode,
                                  pResult := ADR(Open));