Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Datenbanken (https://www.delphipraxis.net/15-datenbanken/)
-   -   Delphi Ado Connection zur Laufzeit erzeugen, wie geht das?? (https://www.delphipraxis.net/90336-ado-connection-zur-laufzeit-erzeugen-wie-geht-das.html)

karin_ro 15. Apr 2007 16:04

Datenbank: DB2 • Zugriff über: ADO

Ado Connection zur Laufzeit erzeugen, wie geht das??
 
Hallo,

kann mir jemand sagen, wie das geht. Ich würde das erner in einer Konsolanwendung integrieren und dort hbae glaube ich nicht die
Möglichkeit mit einem Datamodul zu arbeiten.
:gruebel:

Bernhard Geyer 15. Apr 2007 20:23

Re: Ado Connection zur Laufzeit erzeugen, wie geht das??
 
Wie mit jeder anderen Komponente auch:

Delphi-Quellcode:
MyDBMOdule := TADOConnection.Create(nil);
MyDBModule. ...
Und nicht vergessen bei ADO: CoInitialize(nil) am Anfang aufzurufen und am Ende noch CoUninitialize.


Bei DB2-Empfehle ich dir mal AnyDac bzw. ZEOS anzuschauen. ADO ist primär für MS SQL Server und Access geeignet.

marabu 15. Apr 2007 20:35

Re: Ado Connection zur Laufzeit erzeugen, wie geht das??
 
Herzlich willkommen in der Delphi-PRAXiS, Karin.

Abgesehen von Bernhards Hilfestellung: Warum solltest du in einer console application kein Datenmodul verwenden können?

Delphi-Quellcode:
unit dm;

interface

uses
  SysUtils, Classes, DB, ADODB;

type
  TDMTest = class(TDataModule)
    ADOConnection: TADOConnection;
    ADOTable: TADOTable;
    ADOTableID: TLargeintField;
    ADOTableFOLDER: TStringField;
    ADOTableOUTLINE_ID: TLargeintField;
  end;

var
  DMTest: TDMTest;

implementation

{$R *.dfm}

uses
  ActiveX;

initialization
  CoInitialize(nil);
  DMTest := TDMTest.Create(nil);
finalization
  DMTest.Free;
  CoUninitialize;
end.
Freundliche Grüße

karin_ro 16. Apr 2007 06:13

Re: Ado Connection zur Laufzeit erzeugen, wie geht das??
 
Danke für den Tip!,
in der Zwischenzeit habe ich es auch versucht ein DataModul einzubinden und es hat geklappt.
:)


Alle Zeitangaben in WEZ +1. Es ist jetzt 18:17 Uhr.

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