يُرفق جدولاً BIFF8 (Excel ListObject) بنطاق خلايا ويُرجع كائن
TXLSTable الجديد
البنية
function AddTable(
const AName, ARange: WideString;
AColumns: TStrings):
TXLSTable;
| AName |
AName. WideString. اسم الجدول ذي المرجع البنيوي المعروض في Name Box في Excel، مثل 'SalesTable'. يصبح Name وDisplayName على الكائن المعاد |
| ARange |
ARange. WideString. نطاق الخلايا الذي يغطيه Table بصيغة A1، مثل 'A1:D10'. يُعامل الصف الأول من النطاق كصف رأس |
| AColumns |
TStrings. نص العناوين لكل عمود، ويجب أن يحتوي على عدد من الإدخالات يساوي تمامًا عرض النطاق |
ملاحظات
يُصدر BIFF8 مجموعة سجلات FEATHEADR11/FEAT11/LIST12 فقط عند SaveAs(xlExcel97). لا تتأثر حفظات BIFF5 (الجداول ميزة Excel 2003+)
يكتب هذا المثال منطقة مبيعات رباعية الأعمدة مربوطة كجدول في A1:D10
مثال
var
cols: TStringList;
begin
cols := TStringList.Create;
try
cols.Add('Region');
cols.Add('Product');
cols.Add('Quarter');
cols.Add('Revenue');
Sheet.AddTable('SalesTable', 'A1:D10', cols);
finally
cols.Free;
end;
انظر أيضاً