VS:ReadLn/ja

.VectorScript|VectorScript ..VS:Function Reference|Function Reference ..VS:Function_Reference_Appendix|Appendix

Description

開いているファイルから1行分のデータを読み込みます。

PROCEDURE ReadLn(
         VAR z   :ANY);

def vs.ReadLn():
    return z

Parameters

z

ANY

１番目のデータ

Example

PROCEDURE Example;
VAR
   fileName, value1, value2, value3 :STRING; 
   major, minor, maintenance, platform :INTEGER;
BEGIN
   GetVersion(major, minor, maintenance, platform);
   IF platform = 1 THEN BEGIN
      fileName := '/Example.txt';
   END ELSE BEGIN
      fileName := 'C:\Example.txt';
   END;
   Open(fileName);
   ReadLn(value1, value2, value3);
   Close(fileName);
   AlrtDialog(lineOfText);
END;
RUN(Example);

Version

利用可能バージョン: MiniCAD