VS:GetWSSubrowActualStringN/ja

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

Description

ハンドルで指定したワークシートの、データベース設定されている行の文字列を返します。

PROCEDURE GetWSSubrowActualStringN(
                  worksheet        :HANDLE;
                  row              :INTEGER;
                  column           :INTEGER;
                  subrow           :INTEGER;
                  VAR cellString   :DYNARRAY[] of CHAR);

def vs.GetWSSubrowActualStringN(worksheet, row, column, subrow):
    return cellString

Parameters

worksheet		HANDLE		ワークシートのハンドル
row		INTEGER		行
column		INTEGER		列
subrow		INTEGER		補助行
cellString		DYNARRAY[] of CHAR		文字列

Example

PROCEDURE WStest;
   VAR
       autoRecalcState : BOOLEAN;
       worksheet : HANDLE;
       inString, outString : DYNARRAY [] OF CHAR;
BEGIN
   inString := '';
   outString := '';

   worksheet := CreateWS('MyWS', 5, 5);

   RectangleN(0, 0, 1, 0, 1, 1);

   {Save the current AutoRecalc state}
   autoRecalcState := GetWSAutoRecalcState(worksheet);

   {Turn off worksheet Auto Recalculation}
   SetWSAutoRecalcState(worksheet, false);

   { creates a database sub-row for the type 'RECT' }
   inString := '=DATABASE((T=RECT))';
   SetWSCellFormulaN(worksheet, 3, 0, 3, 0, inString);

   { inserts a formula into a database row cell }
   inString := '=T';
   SetWSCellFormulaN(worksheet, 3, 1, 3, 1, inString);

   {Restore AutoRecalc state}
   SetWSAutoRecalcState(worksheet, autoRecalcState);

   {Now recalculate the worksheet}
   RecalculateWS(worksheet);

   { gets subrow actual string }
   GetWSSubrowActualStringN(worksheet, 3, 1, 1, outString);

   AlrtDialog(outString); { the subrow cell actual string }
END;
RUN(WStest);

Version

利用可能バージョン: Vectorworks 2012