hallo zusammen,
in meinem programm importiere ich daten von einem text file in eine tabelle von einer sqlite
db...
nach dem import kann in dieser tabelle über mein programm nach bestimmten kritierien gesucht werden...
folgender fehler denn ich mir nicht erklären kann tritt bei mir jetzt gerade immer auf...
such ich das erste mal in meiner tabelle wird mit aus dem "Feld01" der korrekte Wert ("1") zurück gegeben...
starte ich die selbe abfrage danach noch einmal, dann wird mir der Wert "1 55" angezeigt... aber dieser wert existiert in der tabell in diesem feld nicht!
schließe ich das programm und such danach wieder nach dem gleichen wert wird mir wieder einmal der korrekte wert angezeigt und danach nur noch der falsche...
anbei der source code für die abfrage:
Delphi-Quellcode:
//Search EAN in EANDAT Table of SQLite DB
Try
With (SQLite_Query)
Do
Begin
Active := False;
SQL.Clear;
SQL.Add('
Select '
+'
Feld01 '
+'
From EANDAT '
+'
Where Feld02 = "'+ sValue +'
" '
Active := True;
End;
Except
On E:
Exception Do
Begin
fnDisplayMyActionBox(E.
Message);
End;
End;
SQLite_Query.First;
While Not SQLite_Query.EOF
Do
Begin
ShowMessage('
FELD01: ' + SQLite_Query.FieldByName('
FELD01').AsString);
SQLite_Query.Next;
End;