Hi ich nehme aus einer access 1.1 einen wert und kopiere in in eine Access 2000 tabelle, weiteres wandle ich den wert gleich in euro um und speichere den wert in eine andere spalte.
<pre> alte tabelle 2.923,20
neue Tabelle 292300
</pre>
den code den ich verwende:
<pre>
if length( q_btable.FieldByName('Preis').asstring)<>0 then
begin
FieldByName('Preis_ats').asinteger := q_btable.FieldByName('Preis').asinteger;
dummy:=strtofloat(q_btable.FieldByName('Preis').as string);
FieldByName('Preis_euro').asstring := (FloatToStr(Round(dummy/13.7603*100)/100));
end;
</pre>
<b>1)</b> Kann mir jemand sagen warum die werte soo unterschiedlich sind ??
<b>2)</b> Wie kann ich zum berechnen 4 kommastellen nehmen? er verliert pro berechnung zb 1 DM
BINE
<pre> alte tabelle 2.923,20
neue Tabelle 292300
</pre>
den code den ich verwende:
<pre>
if length( q_btable.FieldByName('Preis').asstring)<>0 then
begin
FieldByName('Preis_ats').asinteger := q_btable.FieldByName('Preis').asinteger;
dummy:=strtofloat(q_btable.FieldByName('Preis').as string);
FieldByName('Preis_euro').asstring := (FloatToStr(Round(dummy/13.7603*100)/100));
end;
</pre>
<b>1)</b> Kann mir jemand sagen warum die werte soo unterschiedlich sind ??
<b>2)</b> Wie kann ich zum berechnen 4 kommastellen nehmen? er verliert pro berechnung zb 1 DM
BINE
Comment