Xbasic
DICTIONARY.EXTERNAL_RECORD_CONTENT_GET Function
Syntax
C External_record_content_get(C tablename,C content_expression[,C order[,C filter]])
Arguments
- tablename
Character
- content_expression
Character
- order
Character
- filter
Character
Description
Retrieve external tables records in a cr-lf separated list.
Example
This example returns the size of a form without opening it.
function get_form_size as V (formname as C, ptr as P ) dim windowsize as C dim xTwips as N dim yTwips as N dim ptr.str_width as N dim ptr.str_height as N windowsize = dictionary.external_record_content_get(a5.Form_Location(formname),"contents_m","","name='"+formname+"'.and.type='FRMI'") xTwips = val( word(windowsize,2,"FORMSIZE:X=") ) yTwips = val( word(windowsize,2,"FORMSIZE:Y=") ) ptr.str_width = str(xTwips/(72*20),6,3) ptr.str_height = str(yTwips/(72*20),6,3) end function
It is necessary to define a component of ptr before passing it.
dim ptr as P ptr.foo = "C" get_form_size("BarChart", ptr) ? ptr.str_height = 4.938 ? ptr.str_width = 10.552
See Also