Einsatz von Access Komponnenten in Delphi 5

[kae]

Hallo,

Hat jemand schon einmal die Access-Komponenten benutzt. Ich möchte die Komponenten einsetzten. Bei mir erscheint aber auch die Meldung Klasse nicht registriert. Wenn ich das Access über den aufruf Create.oleobject(access.Applikacation) dann funktioniert es. Das Access wird gestartet. Ich möchte aber von Delphi aus nur eine Tabelle mit Access bearbeiten.

[Andreas Kosch]

Hallo,

für diese Aufgabe sind die ACCESS-Komponenten nicht geeignet (genauer gesagt, ACCESS sieht dies so nicht vor). Viele ACCESS-Objekte sind in der Typbibliothek als HIDDEN gekennzeichnet und können somit von einem Client nicht direkt angefordert werden. Um eine ACCESS-Datenbanktabelle im eigenen Programm zu bearbeiten, würde ich direkt zur BDE (ACCESS 97-Format) oder zu ADO (ACCESS 2000-Format) greifen.

Das die ACCESS-Komponenten von Delphi 5 im Prinzip funktionieren, demonstriert das folgende Beispiel:
<pre>
unit Unit1;

interface

uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
StdCtrls, OleServer, Access97;

type
TForm1 = class(TForm)
Button1: TButton;
AccessForm1: TAccessForm;
procedure FormCreate(Sender: TObject);
procedure FormDestroy(Sender: TObject);
procedure Button1Click(Sender: TObject);
private
{ Private-Deklarationen }
FAccessSrv : Access97._Application;
public
{ Public-Deklarationen }
end;

var
Form1: TForm1;

implementation

{$R *.DFM}

procedure TForm1.FormCreate(Sender: TObject);
begin
FAccessSrv := CoApplication.Create;
FAccessSrv.Visible := True;
end;

procedure TForm1.FormDestroy(Sender: TObject);
begin
FAccessSrv := nil;
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
AccessForm1.ConnectTo(FAccessSrv.Forms[0]);
AccessForm1.Caption := 'Der erste Test';
end;

end.
</pre&gt