ExecuteAttributeEvent

Top  Previous  Next

Assign event OnReadAttribute for importing attributes. When the last record has been reached, set lastrecord = true.

 

TAttributeReadEvent = procedure(Sender: TObject; link: integer; var attribute: word; var lastrecord: boolean);

 

Syntax: ExecuteAttributeEvent