تعیین وضعیت datasource


// Gloabal variables section
GlobalVarArray : Array [0..12] of string =
('حالت غیرفعال', 'dsBrowse', 'حالت ویرایش رکورد قبلی', 'حالت ثبت رکورد جدید', 'dsSetKey', 'dsCalcFields', 'dsFilter',
'dsNewValue', 'dsOldValue', 'dsCurValue', 'dsBlockRead', 'dsInternalCalc', 'dsOpening');



GlobalVarArray[ord(DataSource1.State)];