Corretti cast funzionali

git-svn-id: svn://10.65.10.50/trunk@378 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
alex 1994-10-14 18:13:00 +00:00
parent 1d6ada42a6
commit bebf0abe29

View File

@ -302,6 +302,7 @@ bool BA3700_application::sheet_action(int r, KEY k)
case K_SPACE: case K_SPACE:
break; break;
case K_ENTER: case K_ENTER:
{
ns = shf->row(r); ns = shf->row(r);
ts = (TToken_string&)(*rws)[r]; ts = (TToken_string&)(*rws)[r];
@ -314,7 +315,10 @@ bool BA3700_application::sheet_action(int r, KEY k)
{ {
mod = m_scad = TRUE; mod = m_scad = TRUE;
} }
if (real(ts.get(1)) != real(newp)) // modificata percentuale const real p0(ts.get(1));
const real p1(newp);
if (p0 != p1) // modificata percentuale
{ {
mod = m_perc = TRUE; mod = m_perc = TRUE;
} }
@ -322,6 +326,7 @@ bool BA3700_application::sheet_action(int r, KEY k)
{ {
mod = m_tipo = TRUE; mod = m_tipo = TRUE;
} }
}
break; break;
case K_DEL: case K_DEL:
case K_INS: case K_INS: