Variablenname als String auslesen?

[ernschd]

Problem:

Ich habe eine MySQL-Datenbank, die ich mit Mysql direct von Cristian Nicola anspreche.
Zuerst habe ich die "bequeme" Variante mit

Delphi-Quellcode:

FieldValueByName('string')

zum Lesen des Feldinhaltes verwendet. Dies ist unter anderem auch sinnvoll, wenn sich die Struktur der Datenbank ändert, z.B. durch hinzufügen eines Feldes.

Dann habe ich gemerkt, dass

Delphi-Quellcode:

FieldValue(integer)

schneller ist (in meinem Fall um 1 Sekunde).
Dies ist auch nachvollziehbar, da FieldValueByName den Datensatz in einer Schleife durchgeht, bis es den passenden Eintrag gefunden hat.

Aus diesem Grunde habe ich mir überlegt, zuerst die Feldnamen der Datenbank auszulesen.

Nun kann ich die entsprechenden Feldnamen Integervariablen zuordnen, mit welchen ich dann FieldValue bequem aufrufen kann.
Kurzes Bsp:

Delphi-Quellcode:

var i, KdNr : Integer;
    test : String;
begin
    // Feldnamen lesen
    FResult := FMysql.query('SHOW COLUMNS FROM `Tabelle`;', true, ex);
    for i := 0 to FResult.RowsCount-1 do begin
        if FResult.FieldValue(0) = 'KdNr' then KdNr:= i;  // KdNr ist jetzt z.B. 3
    end;

    FResult := FMysql.query('SELECT * FROM `Tabelle`;', true, ex);
    test := FResult.FieldValue(KdNr); // test enthält jetzt den Inhalt des Feldes Kundennummer

end;

Ich hoffe, mein Vorhaben ist bis hierher verständlich.
Nun suche ich jedoch noch nach einer schöneren Möglichkeit zur Zuordnung der Integervariablen zu den Feldnamen.
Gibt es vielleicht die Möglichkeit, den Namen einer Variable als String auszulesen? Vielleicht

Delphi-Quellcode:

if FResult.FieldValue(0) = KdNr.Name then KdNr:= i;

Als Programmierer bin ich ja naturgemäß faul und würde gerne nur die Variablen mit den Feldnamen als Bezeichnung deklarieren.
Wahrscheinlich hat sich mittlerweile mein Hirn schon verknotet, darum sehe ich bestimmt den Wald vor lauter Bäumen nicht mehr.

Andere/bessere Möglichkeiten? Arrays, Records o.ä.?

Bin für jeden Vorschlag dankbar.

[Luckie]

Zitat:

ch habe eine MySQL-Datenbank,..

Rat mal, welche Sparte da die passende wäre? ;)

[himitsu]

Nein, Variablennamen kann es garnicht als String geben, da der Kompiler nur die Speicheradresse einkompiliert ... die Namen sind also NUR im Qelltext, für uns Programmierer sichtbar.


Wenn du beim Programmieren die Strucktur schon kennst, dann kannst du doch für jedes Feld eine Variable anlegen

> entweder als Einzelvariablen oder ein einem Record, bzw. Object


Ansonsten gäbe es noch assoziative Arrays bzw. Listen, aber da hast du dann wieder dein altes Problem zurück, denn da muß ja auch wieder der Name in einer Liste gesucht werden.


[add]

Zitat:

Rat mal, welche Sparte da die passende wäre?

nja, aber hier geht es doch mehr um das Speicherproblem von Variablen :nerd:

[Stevie]

Solang die Abfrage nicht dynamisch ist - würd ich die Felder persistent machen, dann kannst du direkt darauf zugreifen.

[Sherlock]

Etwas-OT:

Zitat:

Zitat von ernschd

Dann habe ich gemerkt, dass

Delphi-Quellcode:

FieldValue(integer)

schneller ist (in meinem Fall um 1 Sekunde).
Dies ist auch nachvollziehbar, da FieldValueByName den Datensatz in einer Schleife durchgeht, bis es den passenden Eintrag gefunden hat.

Ist das echt normal bei MySQL? Das kann doch nicht wahr sein. Oder liegt das an den verwendeten Komponenten?

Sherlock

[ernschd]

Das hat nichts mit MySQL zu tun, sondern nur mit den Prozeduren von Mysql direct.
Man könnte also sagen, es betrifft nur die Komponenten.

[himitsu]

PS: du kannst auch die Felder direkt bei der Anfrage vorgeben

SQL-Code:

SELECT `Feld1`, `Feld2`, `Feld3` FROM `Tabelle`

mit mysql_fetch_assoc wird dann standardmäßig ein assoziatives Array angelegt, wo alle Werte in der angegebenen Reihenfolge doppelt drinnen sind

einmal mit Namen und dann nochmal je mit Index

Code:

$Result = mysql_fetch_assoc(...);

also $Result['Feld2'] == $Result[1]

[ernschd]

Zuerst mal danke.

Anscheinend ist es leider nicht möglich, ohne einen größeren Aufwand zu betreiben.

Hier habe ich einen Artikel über die Lösung meines Problems in VB6 gefunden:
Variable in VB 6.0 verwenden deren Namen als Zeichenketten bekannt sind
Hierzu wird eine Klasse verwenden, um Zugriff auf die benötigten Eigenschaften zu erhalten.

@Stevie: Kannst Du mir das bitte genauer erklären, was Du damit meinst? Ich kann doch auf die Felder direkt zugreifen, allerdings mit geringerer Performance als über den Feldindex.
@himitsu: mysql_fetch_assoc kann ich mit Mysql direct leider nicht verwenden.
@Luckie: ich finde auch, dass mein Problem ein Grundsätzliches ist und im Prinzip eher nichts mit Datenbanken zu tun hat.

[himitsu]

Zitat:

Zitat von ernschd

@himitsu: mysql_fetch_assoc kann ich mit Mysql direct leider nicht verwenden.

gibt es da denn nicht eine entsprechende Funktion ähnlicher Eigenschafft?

[add]
also versuch es doch mal mit einer "direkten" Abfrage wie in meinem Beitrag #7 erwähnt

und greif dann via FResult.FieldValue(idx) auf die Felder zu ... diese sollten dann doch in der Reihenfolge wie in deiner Abfrage drinstehn.

[ernschd]

Leider gibt es nichts entsprechendes wie mysql_fetch_assoc.

Die Idee mit der direkten Abfrage ist nicht schlecht, aber ich mache u.a. auch dynamische Abfragen (mittels einer Suchmaske), von daher fällt das auch flach.