Гра "Перший мільйон", Детальна інформація

Гра "Перший мільйон"

Тип документу: Курсова

Сторінок: 31

Предмет: Комп`ютерні науки

Автор: Ісак І.І.

Розмір: 166.5

Скачувань: 1972

11 12 13 14 15 16 17 18 19 20 21

Form1->Table2->First();

Form1->Table5->First();

for (int i=0; iTable2->RecordCount; i++)

{

Form1->Table5->Insert();

Form1->Table5->FieldValues[("VOPROS")]=Form1->Table2->FieldValues[("VOPROS")];

Form1->Table5->FieldValues[("A")]=Form1->Table2->FieldValues[("A")];

Form1->Table5->FieldValues[("B")]=Form1->Table2->FieldValues[("B")];

Form1->Table5->FieldValues[("C")]=Form1->Table2->FieldValues[("C")];

Form1->Table5->FieldValues[("D")]=Form1->Table2->FieldValues[("D")];

Form1->Table5->FieldValues[("PR_OTV")]=Form1->Table2->FieldValues[("PR_OTV")];

Form1->Table2->Next();

Form1->Table5->Next();

}

}

void restore_base3 (void)

{

Form1->Table3->First();

Form1->Table6->First();

for (int i=0; iTable3->RecordCount; i++)

{

Form1->Table6->Insert();

Form1->Table6->FieldValues[("VOPROS")]=Form1->Table3->FieldValues[("VOPROS")];

Form1->Table6->FieldValues[("A")]=Form1->Table3->FieldValues[("A")];

Form1->Table6->FieldValues[("B")]=Form1->Table3->FieldValues[("B")];

Form1->Table6->FieldValues[("C")]=Form1->Table3->FieldValues[("C")];

Form1->Table6->FieldValues[("D")]=Form1->Table3->FieldValues[("D")];

Form1->Table6->FieldValues[("PR_OTV")]=Form1->Table3->FieldValues[("PR_OTV")];

Form1->Table3->Next();

Form1->Table6->Next();

11 12 13 14 15 16 17 18 19 20 21

The online video editor trusted by teams to make professional video in minutes