OnCreate Form

procedure TForm1.FormCreate(Sender: TObject);
begin
  With Self Do BEgin
    Caption:='';
    //BorderStyle:=bsNone;
    Top:=(Screen.Height - Self.Height) div 2;
    Left:=(Screen.Width - Self.Width) div 2;
    WindowState:=wsMaximized;
  End; //End With Self

  With DBNavigator1 Do Begin
    Anchors:=[akLeft,akTop,akRight];
    VisibleButtons:=[nbFirst,nbPrior,nbNext,nbLast];
    Flat:=True;
  End; // End DBNavigator1

  sBitBtn5.Anchors:=[akTop,akRight];
  //DBGrid1.Anchors:=[akLeft,akTop,akRight,akBottom];
  DBGrid1.Align:=alClient;
end;