}

// –

__fastcall StatRdDdTable: StatRdDdTable (TComponent* Owner)

: AsuTable(Owner)

{

TableName = «StatRashod/Dohod»;

}

// –

char *StatRdDdTable:getNameColumn (AnsiString nameField)

{

if (! nameField. AnsiCompareIC («StatRdDdName»)) return «наименование статьи»;

return 0;

}

// –

TFieldType StatRdDdTable:getFieldType (AnsiString nameField)

{

return ftString;

}

// –

namespace StatRdDdtable

{

void __fastcall PACKAGE Register()

{

TComponentClass classes[1] = {__classid(StatRdDdTable)};

RegisterComponents («АСУ-таблицы», classes, 0);

}

}

// –

Приложение C

Программа USStatProvodkiForm.h