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:
break;
case K_ENTER:
{
ns = shf->row(r);
ts = (TToken_string&)(*rws)[r];
@ -314,7 +315,10 @@ bool BA3700_application::sheet_action(int r, KEY k)
{
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;
}
@ -322,6 +326,7 @@ bool BA3700_application::sheet_action(int r, KEY k)
{
mod = m_tipo = TRUE;
}
}
break;
case K_DEL:
case K_INS: