Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Datenbanken (https://www.delphipraxis.net/15-datenbanken/)
-   -   Delphi SQL: select * from ... = "integer-wert" (https://www.delphipraxis.net/11122-sql-select-%2A-%3D-integer-wert.html)

markon 31. Okt 2003 13:54


SQL: select * from ... = "integer-wert"
 
hallo.
und zwar, in meiner datenbank ist eine spalte vom typ string, auf die ich folgendermaßen zugreifen kann:
Delphi-Quellcode:
adoquery1.sql.text := 'select * from tabelle1 where name like "%'+ed_such.text+'%"'
ed_such.text ist ein normales edit-feld.

der rest der datenbank ist jedoch vom typ integer.
nun mein problem.
wie muss der sql-befehl für einen integer-wert da aussehen?

habe folgendes probiert, funzt aber nicht:
Delphi-Quellcode:
adoquery1.sql.text := 'select * from tabelle1 where tordiff like :such';
such ist eine variable vom typ integer.

danke für hilfe.
marcus

Garby 31. Okt 2003 14:27

Re: SQL: select * from ... = "integer-wert"
 
Hallo,

like kannst du nur in Verbindung mit Varchars verwenden.
Manche DB´s lassen jedoch folgende Anweisung zu:
SQL-Code:
adoquery1.sql.text := 'select * from tabelle1 where tordiff like ''%:such%'''
Oder du lässt es einfach so wie oben mit dem Varchar.

Alfons_G 31. Okt 2003 14:40

Re: SQL: select * from ... = "integer-wert"
 
Integer-Werte kann man NICHT mit "LIKE" vergleichen, sondern nur mit den Vergleichsoperatoren "=", ">", "<", ">=", "<=" und "<>". Die Lösung lautet also:
Delphi-Quellcode:
adoquery1.sql.text := 'select * from tabelle1 where tordiff like :such';
Damit findest Du alle Datensätze, welche die gleiche Tordifferenz, wie eingegeben, haben. Genauso kannst Du nach größeren oder kleineren Werten suchen - du musst lediglich das Gleichheitszeichen durch den entsprechenden Operator ersetzen.

:coder:

Garby 31. Okt 2003 14:46

Re: SQL: select * from ... = "integer-wert"
 
@Alfons_G: dann solls ja wohl so heissen:
Delphi-Quellcode:
adoquery1.sql.text := 'select * from tabelle1 where tordiff = :such';
:lol:
z.B. in Oracle würde das aber auch so funktionieren:
Delphi-Quellcode:
adoquery1.sql.text := 'select * from tabelle1 where To_Char(tordiff) like ''%:such%''';
Wobei das To_Char auch weggelassen werden kann.

Alfons_G 31. Okt 2003 22:14

Re: SQL: select * from ... = "integer-wert"
 
Upps, das kommt davon, wenn man im Büro schnell die Antwort tippt und dabei den Code aus dem vorherigen Porting reinkopiert :oops:

Das to_char in Oracle kenne ich nur zu gut. Allerdings wird man in diesem Fall, wo es anscheinend um eine Liga-Verwaltung und die Suche nach einer Tordifferenz geht, eher nach einem Zahlenwert, als nach einem Teilstring suchen.

:coder:

markon 1. Nov 2003 18:06

Re: SQL: select * from ... = "integer-wert"
 
habt dank jungs :thuimb: werde ich dann gleich mal ausprobieren
Delphi-Quellcode:
adoquery1.sql.text := 'select * from tabelle1 where tordiff = :such';

markon 3. Nov 2003 09:45

Re: SQL: select * from ... = "integer-wert"
 
so.. nun hab ich das mal ausprobiert:
Delphi-Quellcode:
adoquery1.sql.text := 'select * from tabelle1 where tordiff = :such';
aber leider liefert diese abfrage kein ergebniss zurück. fehlermeldung kommt auch keine)
wenn ich den "RecordCount" ausgebe so zeigt dieser immer 0 an.
weiß keinen rat mehr, da "such" als integer deklariert ist.
wo ist der haken?

r_kerber 3. Nov 2003 10:47

Re: SQL: select * from ... = "integer-wert"
 
Hallo markon,

das SQL-Select sieht eigentlich korrekt aus. Hast Du es schon mit mehreren Werten für tordiff versucht. Falls Du gar nicht weiterkommst, dann poste doch mal das Stück Code.

markon 3. Nov 2003 10:59

Re: SQL: select * from ... = "integer-wert"
 
hier der code:
Delphi-Quellcode:
procedure Tfrm_spiele.bt_suchClick(Sender: TObject);
var such :integer;
begin
 adoquery1.Close;
 adoquery1.sql.Clear;

 such := strtoint(ed_such.text);
 
 adoquery1.sql.Add ('select * from tabelle1 where TorDiff = :such');

 adoquery1.Open; // oder muss adoquery1.ExecSQL; hier stehen?

  // adoquery1.Active;

end;
wie gesagt, es kommt keine fehlermeldung, aber auch kein ergebnis :wall:
die spalte TorDiff ist wie gesagt "integer".
schreibe ich
Delphi-Quellcode:
 adoquery1.sql.Add ('select * from tabelle1 where TorDiff = 9');
dann funzts...

r_kerber 3. Nov 2003 11:14

Re: SQL: select * from ... = "integer-wert"
 
Versuche es mal so:
Delphi-Quellcode:
procedure Tfrm_spiele.bt_suchClick(Sender: TObject);
var such :integer;
begin
adoquery1.Close;
adoquery1.sql.Clear;

such := strtoint(ed_such.text);

adoquery1.sql.Add ('select * from tabelle1 where TorDiff = ' + such);

adoquery1.Open;
 
end;

markon 3. Nov 2003 11:36

Re: SQL: select * from ... = "integer-wert"
 
@ r_kerber: danke dir, dein vorschlag...
Delphi-Quellcode:
adoquery1.sql.Add ('select * from tabelle1 where TorDiff = ' + such;
...brachte folgende fehlermeldung: "Inkompatible Typen: String und Integer"
...dann hab ich die zeile folgendermasen´geändert:
Delphi-Quellcode:
adoquery1.sql.Add ('select * from tabelle1 where TorDiff = ' + inttostr(such));
... und siehe da, es funzt!! :thuimb:

r_kerber 3. Nov 2003 11:50

Re: SQL: select * from ... = "integer-wert"
 
Uuups. :oops:

Man sollte lesen was da steht.
Delphi-Quellcode:
adoquery1.sql.Add ('select * from tabelle1 where TorDiff = ' + ed_such.text);
So wäre es richtig gewesen.

markon 3. Nov 2003 13:23

Re: SQL: select * from ... = "integer-wert"
 
jo, stimmt!
Delphi-Quellcode:
adoquery1.sql.Add ('select * from tabelle1 where tordiff = ' + inttostr(such));
ist letztlich doppelt gemoppelt, erst den string in integer und dann wieder zurückwndeln.
Delphi-Quellcode:
adoquery1.sql.Add ('select * from tabelle1 where tordiff = ' + ed_such.text)
einfach das edit-feld angeben. fertig.
danke für deine hilfe
:cheers:

Wormid 3. Nov 2003 13:42

Re: SQL: select * from ... = "integer-wert"
 
Ich würde aber immer davon abraten, Benutzereingaben ungeprüft in SQL-Statements einzubauen.
Ich weiss jetzt nicht, ob Deine DB und die ADO-Schnittstelle mehrere Statements in einer SQL-Anweisung akzeptieren, aber wenn ja, dann hättest Du ein ziemliches Problem, wenn der User in das Edit ed_such folgenden Text eingibt:

Code:
1; drop table 'tabelle1';
Das setzt natürlich voraus, das der User gewillt ist, die Datenbank zu zerschiessen. Aber sowas soll ja leider mal vorkommen... :?

Gruß

Wormid

r_kerber 3. Nov 2003 13:42

Re: SQL: select * from ... = "integer-wert"
 
Zitat:

Zitat von markon
ist letztlich doppelt gemoppelt, erst den string in integer und dann wieder zurückwndeln.

Aber Du hast wenigstens vorher überprüft, ob in dem TEdit eine gültige Integerzahl eingegeben wurde.

Garby 3. Nov 2003 15:00

Re: SQL: select * from ... = "integer-wert"
 
Hallo, ich klink mich auch wieder ein :-D
Generell würde ich jedem abraten eine SQL-Anweisung ohne Parameter zu verwenden. Bei Access Datenbanken mag das ja keine Auswirkungen haben, aber hat man einen SQL Server dann muss eine Anweisung dieser Art
SQL-Code:
adoquery1.sql.Add ('select * from tabelle1 where tordiff = ' + ed_such.text)
vom Server jedesmal beim Ausführen neu geparst, und der jeweilige Ausfürungsplan neu erstellt werden.
Hat man hier eine Multiuserumgebung (z.Bsp. einen Internetserver) wird diese Datenbank früher oder später den Geist aufgeben.
Werden stattdessen Parameter verwendet kann sich der Server auf die zuletzt geparste Anweisung verlassen und braucht nur noch die Parameterwerte auszutauschen.
Bsp.:
Delphi-Quellcode:
procedure Tfrm_spiele.bt_suchClick(Sender: TObject);
var such :integer;
begin
adoquery1.Close;
adoquery1.sql.Clear;

such := strtoint(ed_such.text);

adoquery1.sql.Text := 'select * from tabelle1 where TorDiff = :such';
adoquery1.Parameters.ParamByName('such').Value := such;

adoquery1.Open;

end;
Auch wenn man keinen Datenbankserver zur Verfügung hat würde ich trotzdem vorschlagen gleich auf diese Technik zu setzten, weil die Anwendung auch besser skalierbar wird.

r_kerber 3. Nov 2003 15:06

Re: SQL: select * from ... = "integer-wert"
 
Hallo Garby,

ich kann mich dem nur anschließen. Ich wollte allerdings eine einfache Lösung anbieten. Dann sollte man auch darüber nachdenken, ob man diese Abfrage dann nicht fest in die ADOQuery einträgt und für jede Tabelle ein eigenes ADOQuery-Objekt nutzt.

Gruß in's schöne Tirol, wo ich immer wieder gern Urlaub mache. :bounce1: :bouncing4:

Garby 3. Nov 2003 15:38

Re: SQL: select * from ... = "integer-wert"
 
Das würde der Übersichtlichkeit des Projekts sicher guttun. Ausserdem hat man dann auch den Vorteil alle Parameter und zugehörigen Einstellungen bequem im OI zu tätigen.

Aber genug davon, ich glaub wir sollten an dieser Stelle keinen Datenbank-Crashkurs veranstalten :warn:

markon 3. Nov 2003 16:04

Re: SQL: select * from ... = "integer-wert"
 
@ garby

danke für dein posting. :thuimb: ist gut zu wissen was man besser machen kann. bei sehr vielen zugriffen lohnt sich das schon.


Alle Zeitangaben in WEZ +1. Es ist jetzt 23:50 Uhr.

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