Where-Bedingung klappt nicht (SQL) in Kombination....

[Tobi]

Mein Problem ist eigentlich schnell erklärt. In einer ComboBox (name: Combo_Schulvorraussetzung) wird ein Schulabschluß ausgewählt (Hauptschule, Realschule, Fachabi, Abi), und bei einem Klick auf den Button2 soll dann über das AdoDataSet "DB_verbindung" ein SQL Befehl ausgeführt werden, damit in dem DBGrid (spielt hier keine Rolle) auch wirklich nur die Berufe angezeigt werden, die dem gewählten Abschluß entsprechen.
Sobald ich jedoch auf diesen Button klicke fliege ich aus dem Programm.

schul_vorraussetzung ist eine globale Variable vom Typ Integer.

Code:

procedure TForm1.Button2Click(Sender: TObject); 
begin 
  case Combo_Schulvorraussetzung.ItemIndex of 
  0: schul_vorraussetzung := 1; 
  1: schul_vorraussetzung := 2; 
  2: schul_vorraussetzung := 3; 
  3: schul_vorraussetzung := 4; 
  end; 
DB_verbindung.CommandText :=  'select * from Berufe where Berufs_SchulVorraussetzung=' + IntToStr(schul_vorraussetzung) + ';'; 
end;

Nachtrag:
Ich habs gerade mal ausprobiert ganz ohne die where-Bedingung oder auch mal nur mit Berufs_SchulVorraussetzung=1 probiert. Wenn die where-Bedingung ganz raus ist, klappt es. Aber warum mit nicht?

[Hansa]

Zitat:

DB_verbindung

wo kommt die denn her?

[MrSpock]

Hallo Tobi,

mögliche Fehlerquellen wären:

1. Der Name des Feldes in der where Klausel (Berufs_SchulVorraussetzung) ist nicht korrekt geschrieben
2. Combo_Schulvorraussetzung.ItemIndex liegt nicht zwischen 0 und 3 (du solltest case immer nur mit else benutzen)
3. Es liegt an ADO (dazu gibt es schon einige Tips hier im Forum, zu Versionnummern, etc.)

Wenn alle 3 Fehlerquellen ausscheiden, beschreib doch mal genauer was denn nicht funktioniert? Werden keine Datensätze gefunden? Wird eine Fehlermeldung ausgegeben?