Einzelnen Beitrag anzeigen

mr.johnnyb

Registriert seit: 2. Feb 2006
Ort: München
13 Beiträge
 
#33

Re: Easy DataBase Komponenten

  Alt 2. Feb 2006, 16:13
Hallo zusammen,

auch wenn der letzte Beitrag ein weilchen zurück liegt. Auf mich hat das Thema genau zugetroffen, naja bin in Delphi absolut neu und Habe Das Borland Developer Studio 2005 PE, nun wie ich im Verlauf der Treads gesehen habe ist die Komponente auf Win32 Basis auch hiermit Kompatibel. Nun Ihrgendwie wollte bei mir geines der Beispiele mit MYSQL oder MSSQL laufen in die *.mdb schreiben geht. Nun dann dache ich schreibste dir selbst ein kleines Script einfach um mal zu probieren, Dieses sieht wie folgt aus:

Delphi-Quellcode:
unit Verb001_uni;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls, EDB, EDB_const, EDBSQLStrings;

type
  TForm1 = class(TForm)
    EDB1: TEDB;
    Button1: TButton;
    Button2: TButton;
    procedure Button2Click(Sender: TObject);
    procedure Button1Click(Sender: TObject);
  private
    { Private-Deklarationen }
  public
    { Public-Deklarationen }
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
begin
EDB1.CreateDBConnection(db_MYSQL, 'D73G822J', 'test', 'root', 'password1');

if EDB1.IsDBConnect then
    ShowMessage('Juhuuuuu es hat geklappt, wir sind mit der DB verbunden.')
else
    ShowMessage('Mist Verbidung hat immer noch nicht geklappt.');

EDB1.DB_Command('CREATE TABLE tbl_test (ID int AUTO_INCREMENT NOT NULL)')
end;

procedure TForm1.Button2Click(Sender: TObject);
begin
Close
end;

end.
Das Projekt liegt im gleichen Verzeichnis, wie die "Easy DataBase" Dateien. Komplieren geht auch aber beim Klick auf den Button kommt immer Zurück das keine Verbindung besteht, und Die Tabelle wird auch nicht angelegt. Kann mir bitte bitte jemand helfen.

Mit besten Grüßen
Mr. Johnny B
  Mit Zitat antworten Zitat