Einzelnen Beitrag anzeigen

rosch

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

datenbank zu laufzeit mit zeos erstellen

  Alt 6. Nov 2003, 15: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