Cursor.FieldCount

Top  Previous  Next

 

Syntax

function Cursor.FieldCount(Crsr: pointer): integer

 

Alternative Names

ibec_cr_FieldCount

 

Description

Returns the number of result set fields for cursor Crsr.

 

See also

Cursor.FieldName
Cursor.FieldValue
Cursor.Fetch

 

Example

execute udsblock()

as

begin

  /* create the cursor */

  mydata = Cursor.Create('select * from UDS$TEST_DATA');

 

  try

    GUI.ShowMessage('Number of fields in the cursor: ' || Cursor.FieldCount(mydata));

  

    /* get field names and current values */

    n = 0;

    while (n < Cursor.FieldCount(mydata))

    do begin

         GUI.ShowMessage('Field name: ' + Cursor.FieldName(mydata, n) || String.CRLF() + 'Value: ' + Cursor.FieldValue(mydata, n));

         n = n + 1;

       end

  finally

    Cursor.Close(mydata);

  end        

end