Ich arbeite gerade mit BDE, aber nur zu test zwecken, also ich setz es dann in MYSQL um.
Ich will die DB durchsuchen und zwar, wenn in dein Editfeld z.B. 5 eingegeben wird, dann werden alle Daten mit ID 5 angezeigt.(also z.B. Name dann halt und Adresse..).
Brauch ich ein Query(ok ja^^), der SQl Code ist das schwierige, ich glaub damit muss ich mich noch ma auseinander setzten.
Dann das laden in die Editfelder, geht dann ja über den SQL COde.
edit1.text := query1.FieldByName('Name').AsString; // so oder? Wäre nett wenn mir jemand da helfen könnte.

[edit=sakura] Titel auf Wunsch angepasst. Mfg, sakura[/edit]

Der SQL-Code wäre:

SELECT * FROM tabellenname WHERE id = 1

Zitat von Die Muhkuh:

Der SQL-Code wäre:

SELECT * FROM tabellenname WHERE id = 1

also, muss ich das so machen:
'SELECT * FROM tabellenname WHERE id ='+edit1.Text Und dann muss ich ja noch die Daten einfügen in die Editfelder.
Beim Code muss dann ja noch was dazu für die einzelnen Felder oder?

Oder besser mit Parameter
Wenn du dem Query die Abfrage:
SELECT * FROM tabellenname WHERE id = :suchid; zuweist. brauchst du später, nur den Parameter mit
query1.ParamByName('suchid').assTring := Edit1.Text; absetzen

Hi,

ich würde das über Paramter lösen:

markieren

Delphi-Quellcode:

Query1.SQL.Text := 'SELECT * FROM tabellenname WHERE id = :id';
Query1.ParamCheck := true;
Query1.ParamByName('id').AsInteger := StrToInt(Edit1.Text);
Query1.Open;

// Auslesen wie gewohnt:
Edit2.Text := Query1.FieldByName('Feldname').AsString;

Zitat von Die Muhkuh:

Hi,

ich würde das über Paramter lösen:

markieren

Delphi-Quellcode:

Query1.SQL := 'SELECT * FROM tabellenname WHERE id = :id';
Query1.ParamCheck := true;
Query1.ParamByName('id').AsInteger := StrToInt(Edit1.Text);
Query1.Open;

// Auslesen wie gewohnt:
Edit2.Text := Query1.FieldByName('Feldname');

Ok Parameter sind ne gute Bereicherung für mich, allerdings funzt was net, muss ich bestimmt noch was deklarieren oder?

Fehler:
inkompatibletypen Tstrings und string.
inkompatibletypen string und Tfield.

Query1.SQL.Text := ...

Hai Seppel,

da fehlt ein .Text

markieren

Code:

Query1.SQL[b].Text[/b] := 'SELECT * FROM tabellenname WHERE id = :id';

EDIT: Dieser mkinzler. Hat keine Mathematik sondern "nur" Informatik studiert und postet doch schneller als der DP-Hai

Und hier:Edit2.Text := Query1.FieldByName('Feldname').asString;

ei ei ei, ich änder das gleich mal noch. Ist halt außen Kopf gemacht ne