Kleines Tool: SQL - TableToClass

[Hobbycoder]

Zitat:

Zitat von API (Beitrag 1413192)

Es möchte Changelog.pas auf dem C:\ Rootfolder erstellen?

---------------------------
Table To Class - Test - 0.0.0.0
---------------------------
Datei "C:\Changelog.pas" kann nicht erstellt werden. Access is denied.
---------------------------
OK
---------------------------

Bei was passiert das? Ich wüsste nicht, dass ich irgendwo eine solche Datei erstellen würde. Jedenfalls nicht bewusst. Könnte höchstens sein, dass eine von den UniDAC-Kompoenten das möchte. Gleich mal schauen.

[API]

Zitat:

Zitat von Klaus01 (Beitrag 1413193)

..mal versucht manuell eine Datei in C:\ anzulegen?

Das geht natürlich (bei mir auch) nicht.

Eigentlich wollte ich damit sagen, dass C:\ nicht der optimale Ort ist, um Logdateien zu erstellen.7

[Hobbycoder]

Bei mir macht er das nicht. Woher stammt die Ausgabe, die du zitiert hast?

[API]

Zitat:

Zitat von Hobbycoder (Beitrag 1413199)

Bei mir macht er das nicht. Woher stammt die Ausgabe, die du zitiert hast?

Die Meldung erscheint, wenn ich auf [Klassen für alle Tabellen erzeugen] klicke.

[Hobbycoder]

Okay.
Dann hast du in den "weiteren Einstellungen" keine Ausgabepfad hinterlegt. Mach da mal einen rein, dann sollte das wohl passen.
Der, der in der Hauptansicht unten steht, gilt nur wenn man nur die eine Tabelle speichern möchte. Wenn man "Klasse für alle Tabellen erzeugen" anklickt nimmt er immer den Pfad aus den Voreinstellungen.

Das ist so, weil ich das irgendwann mal so geändert habe, dass er sich die Einstellungen für jede Tabelle einzeln merken können soll.
Damit bin ich auch noch nicht glücklich. Vielleicht sollte ich dort eine Pfadauswahl einblenden, oder drauf hinweisen, dass noch kein Pfad eingestellt ist.

[API]

Noch etwas:

Wenn ich im "Connection-Manager", im Dialog "Verbindung bearbeiten" als DB-System "MS SQL-Server" auswähle, reagiert die Anwendung einige Sekunden nicht mehr. Es werden bei mir auch keine Server gefunden.
Die Suche nach Servern sollte erst dann ausgeführt werden, wenn auf den "Pfeil-nach-Unten" im Server/IP_Adresse Dropdown geklickt wird. Somit kann man eine IP Adresse manuell eingeben, ohne dass jedesmal dieser Suchvorgang gestartet wird (so funktioniert es zumindest auch im Excel Data Connection Wizard)

[Hobbycoder]

Danke. Werd ich so machen.

[Hobbycoder]

Hab noch mal eine neue Version hochgeladen.

War noch ein kleiner Fehler in der INI-Datei. Ich habe noch alle o.g. Fehler/Verbesserungen umgesetzt, und ein paar Kleinigkeiten gemacht.

[jobo]

Firbird types von alterton.info

Code:

 SELECT r.rdb$field_name            AS field_name,
       r.rdb$description           AS field_description,
       r.rdb$default_value         AS field_default_value,
       r.rdb$null_flag             AS field_not_null_constraint,
       f.rdb$field_length          AS field_length,
       f.rdb$field_precision       AS field_precision,
       f.rdb$field_scale           AS field_scale,
       CASE f.rdb$field_type
         WHEN 261 THEN 'BLOB'
         WHEN 14 THEN 'CHAR'
         WHEN 40 THEN 'CSTRING'
         WHEN 11 THEN 'D_FLOAT'
         WHEN 27 THEN 'DOUBLE'
         WHEN 10 THEN 'FLOAT'
         WHEN 16 THEN 'INT64'
         WHEN 8 THEN 'INTEGER'
         WHEN 9 THEN 'QUAD'
         WHEN 7 THEN 'SMALLINT'
         WHEN 12 THEN 'DATE'
         WHEN 13 THEN 'TIME'
         WHEN 35 THEN 'TIMESTAMP'
         WHEN 37 THEN 'VARCHAR'
         ELSE 'UNKNOWN'
       END                         AS field_type,
       f.rdb$field_sub_type        AS field_subtype,
       coll.rdb$collation_name     AS field_collation,
       cset.rdb$character_set_name AS field_charset
FROM   rdb$relation_fields r
       LEFT JOIN rdb$fields f
              ON r.rdb$field_source = f.rdb$field_name
       LEFT JOIN rdb$collations coll
              ON f.rdb$collation_id = coll.rdb$collation_id
       LEFT JOIN rdb$character_sets cset
              ON f.rdb$character_set_id = cset.rdb$character_set_id
WHERE  r.rdb$relation_name = 'TEST2' -- table name
ORDER  BY r.rdb$field_position;

[jobo]

Ich würde noch Postgresql gut finden, auch wenn ich das Tool absehbar nicht brauche.

@sql field types: Wieso nutzt Du die Metainfo Funktion nicht, auf die mkinzler hingewiesen hat?
Außerdem müsste doch ein simples "select * from <quelle> where 1=0" reichen, damit Delphi selbst die Feldtypen an die Felder bindet? Dort wären sie dann abgreifbar.
Wahrscheinlich gibt es nur bei Float Typen aus der DB Interpretationsspielraum bzw. müsste der Anwender entscheiden können, was was werden soll, money, double, bcd, ..