AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Programmierung allgemein Datenbanken Delphi datenbank zu laufzeit mit zeos erstellen
Thema durchsuchen
Ansicht
Themen-Optionen

datenbank zu laufzeit mit zeos erstellen

Ein Thema von rosch · begonnen am 6. Nov 2003 · letzter Beitrag vom 12. Nov 2003
Antwort Antwort
rosch

Registriert seit: 6. Nov 2003
6 Beiträge
 
#1

datenbank zu laufzeit mit zeos erstellen

  Alt 6. Nov 2003, 16:40
Hallo!

ich bin anfänger und bitte euch um hilfe beim anlegen von datanbanken in mysql.
ich verwende zeos komponenten.

procedure TfrmKlientAnlegen.btnSaveClick(Sender: TObject);
var
dbneu : string;
begin
dbneu := dbedtName.Text;
if MessageDlg('Soll der Klient angelegt werden?',
mtConfirmation,[mbYes, mbNo], 0) = mrYes then
begin
with dmBuchhaltung do
begin
qeKlient.Post;
qeKlient.Edit;

//Datenbank erstellen mit TZConnection

bhconnect.Database := dbneu;
bhconnect.User := 'root';
bhconnect.Password := '';

end;
if MessageDlg('Neuer Klient wurde Angelgt!',
mtInformation,[mbOK], 0) = mrOK then
begin
frmKlientAnlegen.Close;
end;
end;
end;

welchen befehl muss ich verwenden um eine datenbank zu erzeugen.

danke für die hilfe
rosch
  Mit Zitat antworten Zitat
Horald

Registriert seit: 29. Okt 2003
11 Beiträge
 
#2

Re: datenbank zu laufzeit mit zeos erstellen

  Alt 6. Nov 2003, 19:29
Hallo,

ich würde es mit SQL-Befehlen machen
Willst du datenbanken oder Tabellen anlegen?

Datenbanken geht mit CREATE DATABASE
Tabellen geht mit CREATE TABLE

Komplett sieht das z.B. so aus
Code:
CREATE TABLE `TableName` (`feld1` CHAR (3) DEFAULT '0', `feld2` TINYINT (3) UNSIGNED DEFAULT '0')
Du brauchst den Befehl in Delphi dann nur mit einer Query aufzurufen:

Code:
mysqlquery1.sql.clear;
mysqlquery1.sql.add('CREATE TABLE ...(s.oben) ...');
mysqlquery1.ExecSql;
Hilft dir das weiter

Gruß

Horst
  Mit Zitat antworten Zitat
rosch

Registriert seit: 6. Nov 2003
6 Beiträge
 
#3

Re: datenbank zu laufzeit mit zeos erstellen

  Alt 6. Nov 2003, 20:04
Hallo Horst!

danke für die prompte antwort!

so weit ist mir die SQL-Anweisung klar nur wie übergebe ich eine variable wie zb.:'dbedtName.Text'
an die anweisung richtig. bisher bin ich eigentlich an diesem problem gescheitert.

Code:
[sql]
CREATE DATABASE ':dbedtName.Text'
[/sql]
so scheint es falsch zu sein.

danke

rosch
  Mit Zitat antworten Zitat
Horald

Registriert seit: 29. Okt 2003
11 Beiträge
 
#4

Re: datenbank zu laufzeit mit zeos erstellen

  Alt 11. Nov 2003, 19:53
hallo rosch,

Zitat:
so weit ist mir die SQL-Anweisung klar nur wie übergebe ich eine variable wie zb.:'dbedtName.Text'
an die anweisung richtig. bisher bin ich eigentlich an diesem problem gescheitert.

Code:

SQL-Code:
 
CREATE DATABASE ':dbedtName.Text'
So wie ich es mache, übergibst du eine Stinrglist, bzw. fügst jeweils ein string zu der Stringliste "sql" hinzu, dann müsste der befehl in etwa so aussehen:

Code:
mysqlquery1.sql.clear;
mysqlquery1.sql.add('CREATE DATABASE '+dbedtName.text);
mysqlquery1.ExecSql;
Hilf das weiter

Gruß

Horst
  Mit Zitat antworten Zitat
rosch

Registriert seit: 6. Nov 2003
6 Beiträge
 
#5

Re: datenbank zu laufzeit mit zeos erstellen

  Alt 12. Nov 2003, 05:23
Danke

hat mir sehr geholfen

rosch
  Mit Zitat antworten Zitat
Antwort Antwort


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 18:47 Uhr.
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