Database Desktop утилитасы арқылы дайындалған бос кестені программа арқылы
(динамикалық түрде) дайындауға болады. Мысалы, Paradox типті My Databases алиасында Нөмірі, Шығарған завод, Маркасы, Шығарған жылы, Түсі, Бағасы атаулы алты өрістен түратын Rous5.db кестенің өріс тақырыптарын дайындау тәсілі
мына амалдар арқылы орындалады.
1. Жаңа проект ашып, формада Tablel, Buttonl компоненттерін орнату.
2. Код терезесінде Buttonl компонентінің OnClick оқиғасын өңдеуіш процедурасын
құру керек.
Procedure Tforml.ButtonlCIick(Sender:TObject) Begin With Table do Begin DatabaseName: = 'My Databases'; TableType:=ttParadox; TableName: = 'Rous5.db'; With FieldDefs do Begin With AddFieldDef do Begin Name: = 'Шығарған завод'; DataType:=ftString; Size:=20; End; With AddFieldDef do Begin Name: = 'MapKacbi'; DataType:=ftString; Size:=20; End; With AddFieldDef do Begin Name: = 'Tyci'; DataType:=ftString; Size:=20; End; End; CreateTable; End; End; мұндағы Create Table (Кесте құру) - TTable компонентінің кесте құру әдісі. Ол
таңдалған құрылым бойынша бос кесте құрады (әдісті Paradox не dBase форматында ғана
пайдалану мүмкін); Table — берілгендер қоры кестесіне қол жеткізу компоненті.
Программада пайдаланылған қасиеттер: DatabaseName — алиас атауын
анықтау; TableType — кесте типі; TableName — кесте атауы;
