Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Library: Datenbanken (https://www.delphipraxis.net/22-library-datenbanken/)
-   -   Delphi Einen BDE Alias ohne Datenbankkomponenten erzeugen (https://www.delphipraxis.net/14837-einen-bde-alias-ohne-datenbankkomponenten-erzeugen.html)

p0ke 16. Jan 2004 16:58


Einen BDE Alias ohne Datenbankkomponenten erzeugen
 
Folgende kleine Prozedur wurde mit Hilfe der der BDE beiliegenden "Introduction to programming" erzeugt:

Delphi-Quellcode:
uses BDE;

procedure NewAlias(Alias, Driver, Params : PChar);
begin
  DbiInit(nil);
  try
    DbiAddAlias(nil, Alias, Driver, Params, True);
    DbiCfgSave(nil, nil, True);
  except
    ShowMessage('BDE Fehler!');
  end;
  DbiExit();
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
  // Übergabe der Parameter mit Eigenschaft : Wert
  // Mehrere Parameter durch ; trennen
  // Beispiel für das Anlegen eines Interbase Alias mit 2 Parametern
  NewAlias('MyAlias','INTRBASE','USER NAME: MYNAME; SQLQRYMODE: LOCAL');
end;
[edit=Matze]Code korrekt formatiert. Mfg, Matze[/edit]


Alle Zeitangaben in WEZ +1. Es ist jetzt 15:42 Uhr.

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