Einzelnen Beitrag anzeigen

Benutzerbild von MrSpock
MrSpock
(Co-Admin)

Registriert seit: 7. Jun 2002
Ort: Owingen
5.865 Beiträge
 
Delphi 2010 Professional
 
#25
  Alt 28. Apr 2003, 20:22
Hallo Flo,

ich habe mir einmal deine Dateien angeschaut und den Fehler gefunden.

Das dritte Feld "Nr" ist kein Zahlenfeld! Es ist definiert als A 5 (alphanumerisch 5 Zeichen lang). Es gibt jetzt 2 Möglichkeiten:

Entweder du änderst den Typ des Feldes z.B. mit der Datenbankoberfläche in ein Integerfeld (I) oder zu änderst den Code in:

Delphi-Quellcode:
procedure TForm1.Button2Click(Sender: TObject);
begin
   Query1.Close;
   with Query1.SQL do
  begin
     Clear;
     Add('SELECT * ');
      Add('FROM kosten');
      Add('WHERE abteilung = ' +QuotedStr(Edit1.Text));
      Add('AND reihe =' +QuotedStr(edit2.Text));
      Add('AND Nr <= ' + QuotedStr(edit3.text));
   end;
  Query1.Open;
end;
Bei der 2. Lösung musst du jedoch beachten, dass bei Vergleichen mit >= oder <= die Reihenfolge der Zeichen im ASCII Code entscheidend ist.
Albert
Live long and prosper


MrSpock
  Mit Zitat antworten Zitat