Delphi-PRAXiS
Seite 4 von 4   « Erste     234   

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Datenbanken (https://www.delphipraxis.net/15-datenbanken/)
-   -   Probleme beim einfügen von neuen Datensätzen (https://www.delphipraxis.net/165061-probleme-beim-einfuegen-von-neuen-datensaetzen.html)

Flash68 5. Jan 2012 11:26

AW: Probleme beim einfügen von neuen Datensätzen
 
Das Datenmodul sieht wie folgt aus:

Delphi-Quellcode:
unit Datamodul;

interface

uses
  SysUtils, Classes, DB, ADODB;

type
  TDM_Rechner = class(TDataModule)
    CON_Rechner: TADOConnection;
    ADS_Rechner: TADODataSet;
    DS_Rechner: TDataSource;
    ADS_RechnerID: TAutoIncField;
    ADS_RechnerBezeichnung: TWideStringField;
    ADS_RechnerRechnertyp_ID: TIntegerField;
    ADS_RechnerStatus_ID: TIntegerField;
    ADS_RechnerBesonderheiten: TWideMemoField;
    ADS_RechnerGehäuse_ID: TIntegerField;
    ADS_RechnerNetzteil_ID: TIntegerField;
    ADS_RechnerMainboard_ID: TIntegerField;
    ADS_RechnerProzessor_ID: TIntegerField;
  private
    { Private-Deklarationen }
  public
    { Public-Deklarationen }
  end;

var
  DM_Rechner: TDM_Rechner;

implementation

{$R *.dfm}

end.
Die zugriffe sehen dann wie folgt aus:

Delphi-Quellcode:
procedure TFRM_Main.But_NeuClick(Sender: TObject);
begin
  DM_Rechner.ADS_Rechner.Append;
  but_Neu.Enabled:= false; but_abbrechen.Enabled:= true; bitbtn1.Enabled:= false;
  dbe_bezeichnung.SetFocus
end;

procedure TFRM_Main.But_AbbrechenClick(Sender: TObject);
begin
  DM_Rechner.ADS_Rechner.Cancel;
  DM_Rechner.ADS_Rechner.Edit;
  but_Neu.Enabled:= true; but_abbrechen.Enabled:= false;bitbtn1.Enabled:= true
end;
Mit F7 hab ich mal durch geklickt, hab aber keine Erfahrung damit und worauf ich da achten muß. Hab jetzt so nichts gesehen.


Alle Zeitangaben in WEZ +1. Es ist jetzt 12:47 Uhr.
Seite 4 von 4   « Erste     234   

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz