Einen Datensatz von einer MySql Tabelle per Click in einem Formular Anzeigen lassen.

[sammynrw]

Hallo Delphi Freunde,

Ich habe wieder mal ein problem mit Delphi und MySQL.

In einer DBGrid lasse ich mir meine Datensätze Anzeigen.
Wenn ich die Zeile an klicke ließt er mir den ID Autowert aus. Soweit alles gut.
Aber wie kann ich dann diesen Gesamten Datensatz in einem anderen Formular von Delphi übergeben.
Ich weiss nicht wie ich per SQL diesen Datensatz auslesen kann und wie ich diesen per Code dem Neuen
Formular übergeben kann.

Ich arbeiten mit MyDac und dachte ich könnte mit MyQuery diesen Datensatz (ID) wert auslesen und dem Neuen Formular übergeben. Geht aber nicht. Ich kenne den Weg nicht und weiss auch nicht die Richtige Syntax von SQL :-(

[mikhal]

Parameter heißt das Zauberwort. Du hast die ID bereits ermittelt, also öffne im neuen Formular eine Query mit dieser ID als Parameter.

Delphi-Quellcode:

SELECT ID, BLA, BLUBBER
  FROM <TABELLE>
 WHERE ID = :ID_NR

Sollte mit MyDAC recht gut funktionieren, da gibt es wenn ich mich Recht entsinne, einen Reiter Parameter...

Den Rest solltest du zusammen mit der OH hinkriegen.

Grüße
Mikhal

[baumina]

Da gibt's wie immer mehrere Wege.

Du könntest z.B. auf das gleiche Dataset greifen, dann stehst schon auf dem richtigen Datensatz.
Oder du machst nochmal einen select mit der übergebenen ID so in dieser Art

SQL-Code:

select * from TABELLE where ID=UEBERGEBENEID;

[sammynrw]

Jetzt bekomme ich ein anderes Problem:

Code:

MyQuery1.SQL.Text := 'SELECT ID, anfragen_id, Erfassungsdatum, Gewerblich_Privat, Firma, Anrede, Vorname, Nachname, Straße+Nr, Postleitzahl, Ort, Angebotsart, Benötigter_Betrag, KFZ-Kennzeichen, Fahrzeugart, Hersteller, Modell, Erstzulassung, Akt_Kilometerstand, Leistung, Kraftstoff, Farbe, Ergänzung, Unfall_Vorhanden, Unfall_Vorhanden, Versicherungsart, Telefon, Email, Mobilfunk, Fax, Status, Vertriebspartner_ID, Niederlassung, Sachbearbeiter   FROM cc_fahrzeug_anfragen WHERE ID = :16';

Jetzt Zeigt mir Delphi an das der String zu lang ist :-(

[sammynrw]

Baumina <<< Ich werde mal dein Code aussprobieren. ist wohl die gekürzte version :-D

[matthiaskary]

Hallo,

probier es mal mit:

MyQuery.SQL.Add('');
MyQuery.SQL.Add('');
MyQuery.SQL.Add(''); usw.

[mikhal]

Nicht nur das: es heißt nicht :16 sondern nur 16.

Der Doppelpunkt zeichnet den Parameter aus, also eine Variable, die an die Query übergeben wird. Hier ist einfach der Wert mit der Parameter-Methode zu übergeben.

Delphi-Quellcode:

Query.ParamByName('ID').AsInteger = 16;
Query.Open

Die Methode von Baumina führt auch zum Ziel, birgt aber Sicherheitsprobleme (Stichwort SQL-Injektion).

Grüße
Mikhal

[sammynrw]

Danke ... Es geht ... Vielen dank an alle.

Die Variante von mikhal funktioniert: :-D

[DeddyH]

Zitat:

Zitat von sammynrw (Beitrag 1265773)

Die Variante von mikhal funktioniert: :-D

Glaub ich nicht, dazu müsste man aus dem Vergleich eine Zuweisung machen (war vermutlich ein Tippfehler) ;)

[mikhal]

Ja, Tippfehler oder Pseudocode oder zuviel in anderen Sprachen geschrieben... Obwohl PL/SQL will auch Zuweisungen...:lol:

Grüße
Mikhal