Delphi-PRAXiS
Seite 1 von 5  1 23     Letzte » 

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Datenbanken (https://www.delphipraxis.net/15-datenbanken/)
-   -   Delphi Access Tabelle durchsuchen (https://www.delphipraxis.net/103941-access-tabelle-durchsuchen.html)

Seppel 24. Nov 2007 19:34

Datenbank: Access • Zugriff über: BDE

Access Tabelle durchsuchen
 
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.
Delphi-Quellcode:
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]

Die Muhkuh 24. Nov 2007 19:37

Re: Suchen!
 
Der SQL-Code wäre:

SQL-Code:
SELECT * FROM tabellenname WHERE id = 1

Seppel 24. Nov 2007 19:39

Re: Suchen!
 
Zitat:

Zitat von Die Muhkuh
Der SQL-Code wäre:

SQL-Code:
SELECT * FROM tabellenname WHERE id = 1

also, muss ich das so machen:
SQL-Code:
'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?

mkinzler 24. Nov 2007 19:44

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

Die Muhkuh 24. Nov 2007 19:44

Re: Suchen!
 
Hi,

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

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;

Seppel 24. Nov 2007 20:04

Re: Suchen!
 
Zitat:

Zitat von Die Muhkuh
Hi,

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

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.

mkinzler 24. Nov 2007 20:05

Re: Suchen!
 
Delphi-Quellcode:
Query1.SQL.Text := ...

Sharky 24. Nov 2007 20:06

Re: Suchen!
 
Hai Seppel,

da fehlt ein .Text
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 :stupid:

mkinzler 24. Nov 2007 20:07

Re: Suchen!
 
Und hier:
Delphi-Quellcode:
Edit2.Text := Query1.FieldByName('Feldname').asString;

Die Muhkuh 24. Nov 2007 20:14

Re: Suchen!
 
ei ei ei, ich änder das gleich mal noch. Ist halt außen Kopf gemacht ne ;-)


Alle Zeitangaben in WEZ +1. Es ist jetzt 17:04 Uhr.
Seite 1 von 5  1 23     Letzte » 

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz