Einzelnen Beitrag anzeigen

tom_po

Registriert seit: 5. Feb 2006
137 Beiträge
 
Delphi 7 Enterprise
 
#1

edit-Wert als float in Tabelle speichern

  Alt 28. Feb 2006, 15:17
Ich habe eine DBisam-Tabelle mit einem field "in" vom Data-Typ "float"

ich möchte mit dem folgenden query einen Wert (z.B. 50,22)von edit1 darin abspeichern, bekomme aber schon beim Compilieren die Fehlermeldung:
[Fehler] movestockunit.pas(57): Inkompatible Typen: 'String' und 'Extended'

Delphi-Quellcode:
procedure Tmovestock.Button1Click(Sender: TObject);
var Date:TDate;
Timesetting:TFormatSettings;
begin
TimeSetting.LongDateFormat:='yyyy-MM-dd';
TimeSetting.ShortDateFormat:='yyy-MM-dd';
date:=DateTimePicker1.Date;
dbisamquery1.SQL.Clear;
dbisamquery1.SQL.add('insert into stockfabric (code,in,date) values ('+quotedstr(combobox1.Text)+','+strtofloat(edit1.Text)+','+quotedstr(datetostr(date,Timesetting))+')');
dbisamquery1.ExecSQL;
edit1.Text:='';
combobox1.Text:='';
end;
habe schon das strtofloat ganz weggelassen, es speichert dann ab, aber nur ganze Zahlen!
die anderen beiden Felder (aus Combobox und Datum werden einwandfrei abgespeichert!
  Mit Zitat antworten Zitat