1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:

var SQLText :string;
    MyDB    :TZConnection;
begin

  MyDB := HauptForm.ZConnection1;


  //Datenbank erstellen
  MyDB.LoginPrompt   := false;
  MyDB.Database      := NAME_DER_DATENBANK;
  MyDB.User          := BENUTZERNAME;
  MyDB.Password      := PASSWORT;
  MyDB.Protocol      := 'oracle';
  MyDB.Connect;

end;