kann man zur Laufzeit ein Query erzeugen ?

Gruß Siegfried

ja

MfG
Klaus

exakt. Solange die Eigenschaften (im allgemeinen einfach der String in SQL) stimmen, ists genauso wie eine IDE-Query.

bis bald
akari

bin dabei die Code für ein dynamisches Query zu erzeugen. Zeilen habe ich von einem Edid/Label abgeleitet. asIn_1 ist der Weg/Db, asIn_2 und asIn_3 sind Filter.

ProzessQueryCount = 0;
ProzessQuery.Length++;
ProzessQuery[ProzessQueryCount] = new TQuery(this);
ProzessQuery[ProzessQueryCount]->Close()
ProzessQuery[ProzessQueryCount]->Close()
ProzessQuery[ProzessQueryCount]->SQL->Clear();
ProzessQuery[ProzessQueryCount]->SQL->Add("SELECT * FROM '" + asIn_1  + "' Where");
ProzessQuery[ProzessQueryCount]->SQL->Add(asIn_2 + " = '" + asIn_3 + "'");
ProzessQuery[ProzessQueryCount]->RequestLive = true;
ProzessQuery[ProzessQueryCount]->DBSession->AddPassword(asPwUserDb_2);
ProzessQuery[ProzessQueryCount]->Open();
int QueryRegCount = ProzessQuery[ProzessQueryCount]->RecordCount;
ProzessQueryCount += 1;

zum Beenden habe ich folgender Code.

delete ProzessQuery[0];

Frage: ist dieses so richtig, und bei Label Edit usw. verwende ich Parent. Brauche ich hier dies ?

Gruß Siegfried

probier es doch mal aus?
Schau dir mal an was Parent darstellt und ob TQuery ein parent hat. Dann weist du das du fü nichtvisuelle Komponenten keinen Parent brauchst, nur einen Owner.

bis bald
akari

ProzessQueryCount = 0;
ProzessQuery.Length++;
ProzessQuery[ProzessQueryCount] = new TQuery(this);
ProzessQuery[ProzessQueryCount]->Owner;
ProzessQuery[ProzessQueryCount]->Close()
ProzessQuery[ProzessQueryCount]->Close()
ProzessQuery[ProzessQueryCount]->SQL->Clear();
ProzessQuery[ProzessQueryCount]->SQL->Add("SELECT * FROM '" + asIn_1  + "' Where");
ProzessQuery[ProzessQueryCount]->SQL->Add(asIn_2 + " = '" + asIn_3 + "'");
ProzessQuery[ProzessQueryCount]->RequestLive = true;
ProzessQuery[ProzessQueryCount]->DBSession->AddPassword(asPwUserDb_2);
ProzessQuery[ProzessQueryCount]->Open();
int QueryRegCount = ProzessQuery[ProzessQueryCount]->RecordCount;
ProzessQueryCount += 1;

Ich hoffe, das ich auch den Rest hinbekomme.

bis bald Siegfried

diese Zeile ist unsinn:

ProzessQuery[ProzessQueryCount]->Owner;

Den Owner hast du ja schon im Konstruktor gesetzt.

Außerdem, warum schließt du zweimal die Query mit Close(), bevor du sie öffnest?

Richtig, bei einem Query, das vorher nicht existiert, benötigt man diese Zeilen nicht.

Gruß Siegfried

bis bald
Siegfried

Es ist nicht gewährleistet, das die Form mit dynamische Query's geöffnet ist.

Es ist nicht wichtig, ob das Form geöffnet ist. Wichtig ist, das sowohl das Form als auch das dynamische TQuery instanziert sind, bevor du drauf zu greifst.

bis bald
akari

mach dir ein DataModule
in diesem schreibst du alles was mit Datenbanken zutun hat

aus deiner eigentlichen Form schreibst du ca. sowas
HoleDaten (SQL, TStringList);
oder direktes Datenholen

MfG
Klaus

DyaForm->ProzessQuery.Length++;
DyaForm->ProzessQuery[ProzessQueryCount] = new TQuery(this);

usw.
DataModul ist mir klar, muß aber dynamische Query's benutzen, da das Program bestimmt, wieviele Query's benötigt werden.

bis bald
Siegfried

du brauchst keinen extra Zähler für die Anzahl an Abfragen, dazu gibt es doch die Length-Eigenschaft

DyaForm->ProzessQuery.Length++;
DyaForm->ProzessQuery[DyaForm->ProzessQuery.Length -1] = new TQuery(this);

Du darfst natürlich nicht vergessen, alle Query-Instanzen wieder zu löschen.

Statt DynamicArray kannst du dir auch std::vector anschauen, das ist etwas eleganter und bietet mehr Funktionen.

Das Array kannst du aber auch in ein DataModul unterbringen, genau so wie du es in das Form integriert hast.

bis bald
akari

bis bald
Siegfried