unit editFenetreBase;
{creation Data base des fenetres ouvertes au depart
30/10/00}
interface

uses
  SysUtils, Windows, Messages, Classes, Graphics, Controls,
  StdCtrls, Forms, DBCtrls, DB, DBTables, Mask, ExtCtrls;

type
  TEditFenetreBaseForm = class(TForm)
    TableexpExprience: TStringField;
    ScrollBox: TScrollBox;
    Label1: TLabel;
    EditExprience: TDBEdit;
    DBNavigator: TDBNavigator;
    Panel1: TPanel;
    DataSource1: TDataSource;
    Panel2: TPanel;
    Tableexp: TTable;
    Button1: TButton;
    TableexpF1: TIntegerField;
    TableexpF2: TIntegerField;
    TableexpF3: TIntegerField;
    TableexpF4: TIntegerField;
    TableexpF5: TIntegerField;
    TableexpF6: TIntegerField;
    TableexpF7: TIntegerField;
    TableexpF8: TIntegerField;
    TableexpF9: TIntegerField;
    TableexpF10: TIntegerField;
    TableexpF11: TIntegerField;
    TableexpF12: TIntegerField;
    TableexpF13: TIntegerField;
    TableexpF14: TIntegerField;
    TableexpF15: TIntegerField;
    TableexpF16: TIntegerField;
    TableexpF17: TIntegerField;
    TableexpF18: TIntegerField;
    TableexpF19: TIntegerField;
    TableexpF20: TIntegerField;
    TableexpF21: TIntegerField;
    TableexpF22: TIntegerField;
    TableexpF23: TIntegerField;
    TableexpF24: TIntegerField;
    TableexpF25: TIntegerField;
    TableexpF26: TIntegerField;
    TableexpF27: TIntegerField;
    TableexpF28: TIntegerField;
    TableexpF29: TIntegerField;
    TableexpF30: TIntegerField;
    TableexpF31: TIntegerField;
    TableexpF32: TIntegerField;
    GroupBox1: TGroupBox;
    DBCheckBox1: TDBCheckBox;
    DBCheckBox2: TDBCheckBox;
    DBCheckBox3: TDBCheckBox;
    DBCheckBox4: TDBCheckBox;
    GroupBox2: TGroupBox;
    DBCheckBox5: TDBCheckBox;
    DBCheckBox6: TDBCheckBox;
    DBCheckBox7: TDBCheckBox;
    DBCheckBox8: TDBCheckBox;
    DBCheckBox9: TDBCheckBox;
    GroupBox3: TGroupBox;
    DBCheckBox10: TDBCheckBox;
    DBCheckBox11: TDBCheckBox;
    DBCheckBox12: TDBCheckBox;
    DBRadioGroup1: TDBRadioGroup;
    GroupBox4: TGroupBox;
    DBCheckBox13: TDBCheckBox;
    DBCheckBox14: TDBCheckBox;
    DBCheckBox15: TDBCheckBox;
    GroupBox5: TGroupBox;
    DBCheckBox16: TDBCheckBox;
    DBCheckBox17: TDBCheckBox;
    GroupBox6: TGroupBox;
    DBCheckBox18: TDBCheckBox;
    procedure FormCreate(Sender: TObject);
  private
    { déclarations privées }
  public
    { déclarations publiques }
  end;

var
  EditFenetreBaseForm: TEditFenetreBaseForm;

implementation

{$R *.DFM}

procedure TEditFenetreBaseForm.FormCreate(Sender: TObject);
begin
  Tableexp.Open;
end;

end.