Delphi-PRAXiS
Seite 1 von 3  1 23      

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Datenbanken (https://www.delphipraxis.net/15-datenbanken/)
-   -   Delphi Suchen mit TQuery ? (https://www.delphipraxis.net/66068-suchen-mit-tquery.html)

Vader 24. Mär 2006 09:45

Datenbank: Paradox • Version: 7 • Zugriff über: TQuery

Suchen mit TQuery ?
 
hallo,

bei datenzugriff mit ttable habe ich so gesucht, nach einen bestimmtem wort in einen feld
der paradoxtabelle ,mit hilfe eines edit wo man den suchbegriff eingibt und einen
buttonclickereigniss der die suche startet

Delphi-Quellcode:
procedure TForm1.Button5Click(Sender: TObject);
var suche: string;
begin

suche:= edit1.Text;
Table1.Locate('Nachname', suche, [loCaseInsensitive,loPartialKey ]);

end;
wie schaut das buttonclickereigniss bei tquery aus ?
mfg vader

marabu 24. Mär 2006 09:52

Re: Suchen mit TQuery ?
 
Hallo Vader,

beim Arbeiten mit Datenbanken hast du fast immer eine Listenansicht und eine Detailansicht. Wenn du in der Liste suchen willst, dann verwendest du Locate() - egal ob TTable oder TQuery das DataSet bereitstellen. Du suchst ja dann in den Daten, die von deiner Anwendung schon gezeigt werden.

TQuery bietet dir im Gegensatz zu TTable die Möglichkeit die Gesamtmenge der Zeilen einer Tabelle oder Sicht sinnvoll zu beschränken. Dazu dient die WHERE-Klausel im SQL-Statement.

SQL-Code:
SELECT * FROM tabelle WHERE name = :suche
Grüße vom marabu

bundy 24. Mär 2006 09:58

Re: Suchen mit TQuery ?
 
hi

ich würde das auch so machen


Delphi-Quellcode:

MyQuery.SQL.TEXT := 'select * from table where Nachname = :parNachname';
MyQuery.Params.ParamByName('parNachname').AsString:=edit1.text;
MyQuery.active:=true;

lg
Bundy

mkinzler 24. Mär 2006 10:00

Re: Suchen mit TQuery ?
 
Hallo Vader,

das Thema wurde mit dir doch schon in diesem Betreff erläutert

Vader 24. Mär 2006 10:09

Re: Suchen mit TQuery ?
 
ja, aber da habe ich meine kleine datenbank mit ttable gemacht und wollte wissen wie man sucht,
jetzt habe ich sie mit tquery, ich möchte denn unterschied kennenlernen zwischen ttable und tquery,
vorteile,nachteile bevor ich mir ein buch kaufe

mfg vader

Vader 24. Mär 2006 10:18

Re: Suchen mit TQuery ?
 
marabu schreibt:
Zitat:

TQuery bietet dir im Gegensatz zu TTable die Möglichkeit die Gesamtmenge der Zeilen einer Tabelle oder Sicht sinnvoll zu beschränken. Dazu dient die WHERE-Klausel im SQL-Statement.
Delphi-Quellcode:
SELECT * FROM tabelle WHERE name = :suche
habs so probiert

Delphi-Quellcode:
procedure TForm1.Button7Click(Sender: TObject);
begin
SELECT * FROM tabelle WHERE name = :suche
end;
fehlermeldung:

Delphi-Quellcode:
[Fehler] Unit1.pas(87): Undefinierter Bezeichner: 'SELECT'
mfg vader

Sharky 24. Mär 2006 10:19

Re: Suchen mit TQuery ?
 
Zitat:

Zitat von Vader
... ich möchte denn unterschied kennenlernen zwischen ttable und tquery, ...

Hai Vader,

der unterschied ist eigentlich recht einfach erklärt.
Eine TTable holt immer alle Datensätze einer Tabelle aus der Datenbank. Das filtern findet dann lokal auf dem Client statt.

Bei einem TQuery sagst DU der Datenbank was für Datensätze Du haben möchtest (z.B. WHERE feld = value).

Daraus folgt das die Datenmenge die Du bei einer TTable bekommst dem SQL-Befehlt SELECT * FROM tabelle eines TQuery enspricht.


Was ist nun der Nachteil einer TTable? Wie gesagt werden immer alle Felder und alle Datensätze einer Tabelle zum Client übertragen.

Stelle dir nun vor Du hast eine Tabelle mit den Adressen aller Einwohner von Deutschland und suchst nun die Hausnummer eines Menschen von dem Du Name, PLZ und Strasse kennst.

Bei einer TTable würden jetzt also zig Millionen Datensätze (mit allen Feldern jedes DS) zu deinem Clientübertragen und dort würdest Du dann suchen bzw. filtern.

Bei einer TQuery sagst Du einfach:
SQL-Code:
SELECT hausnummer von tabelle WHERE (plz = :such_plz) AND (strasse = :such_strasse) AND (name = :such_name)
Jetzt bekommst Du von der DB zu deinem Client nur die Hausnummern welche deiner Suchanfrage entsprechen.
Das sind dann vielleicht einige hundert Byte. Und bei einer TTable sind es einige hunder MegaByte.

Ich hoffe das bringt etwas Licht in die Dunkelheit.

Nachtrag!!!
@Vader: Du musst den Code den man Dir zeigt auch so übernehmen.

Es müsste bei dir also so aussehen:
Delphi-Quellcode:
procedure TForm1.Button7Click(Sender: TObject);
begin
  Query1.Close;
  Query1.SQL.Text := 'SELECT * FROM tabelle WHERE name = :suche';
  Query1.ParamCheck := True;
  Query1.ParamByName('suche').AsString := Edit1.Text;
  Query1.Open
end;

bundy 24. Mär 2006 10:25

Re: Suchen mit TQuery ?
 
Der unerschild liegt auf der Hand.

Wenn du eine Datenbankanwendung programmierst, die über das Web laufen soll, dann hast du mit Query enorme einspahrungen in den Ladezeiten.

Bei einem Table lades du mal alle Daten, und dann "Locatest" du einen oder mehrer Datensätze.
Aber zu diesem Zeitpunkt hast du schon alle Daten geladen (problem wenn du zb. 20.000 Datensätze ladest)

Beim Query definierst du vorher was du laden willst, und geladen wird dann nach SQL CODE.



lg
Bundy

bundy 24. Mär 2006 10:26

Re: Suchen mit TQuery ?
 
uups da hab ich wieder zu langsam getippt :(

Vader 24. Mär 2006 10:58

Re: Suchen mit TQuery ?
 
hallo sharky,

das bringt ein bißchen licht ins dunkel, datenbankprogrammierung ist irgenwie etwas anders, wie das tagesgeschäft !

das funzt jetzt in einen feld der tabelle suchen, und jetzt kommts, denn das wollte ich bei ttable, aber
dort hat es nicht funktioniert, ich möchte nach einen bestimmten wort, in der ganzen tabelle suchen ?

wie muß ich den code von sharky ändern ?
Delphi-Quellcode:
procedure TForm1.Button7Click(Sender: TObject);
begin
  Query1.Close;
  Query1.SQL.Text := 'SELECT * FROM tabelle WHERE name = :suche';
  Query1.ParamCheck := True;
  Query1.ParamByName('suche').AsString := Edit1.Text;
  Query1.Open
end;
mfg vader


Alle Zeitangaben in WEZ +1. Es ist jetzt 11:29 Uhr.
Seite 1 von 3  1 23      

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