Курсовая работа: Разработка информационной системы Отель

Table4.Active:=False;

Table5.Active:=False;

Table6.Active:=False;

Table1.DatabaseName:=k;

Table2.DatabaseName:=k;

Table3.DatabaseName:=k;

Table4.DatabaseName:=k;

Table5.DatabaseName:=k;

Table6.DatabaseName:=k;

Table1.TableName:='Nomera';

Table2.TableName:='Zan_nom';

Table3.TableName:='Post';

Table4.TableName:='Arhiv';

Table5.TableName:='Dop_ysl';

Table6.TableName:='Okaz_dy';

Table1.Active:=True;

Table2.Active:=True;

Table3.Active:=True;

Table4.Active:=True;

Table5.Active:=True;

Table6.Active:=True;

end;

procedure TForm1.N6Click(Sender: TObject);

begin

Close;

end;

procedure TForm1.N11Click(Sender: TObject);

begin

PageControl1.Visible:=True;