Corretto errore nella creazione righe array_sheet per items forms

(uack uack, zakaput gnorck kiot)


git-svn-id: svn://10.65.10.50/trunk@1438 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
villa 1995-06-05 08:58:11 +00:00
parent 1f26d8477a
commit 19da1c20c5

View File

@ -630,8 +630,9 @@ bool TForm_item::update()
void TForm_item::print_on(TToken_string& row) const void TForm_item::print_on(TToken_string& row) const
{ {
row = "";
row.add(id()); row.add(id());
row = class_name(); row.add(class_name());
row.add(_y); row.add(_y);
row.add(_x); row.add(_x);
@ -666,6 +667,7 @@ void TForm_item::read_from(const TMask& m)
_prompt = m.get(F_PROMPT); _prompt = m.get(F_PROMPT);
_width = atoi(m.get(F_WIDTH)); _width = atoi(m.get(F_WIDTH));
_height = atoi(m.get(F_HEIGHT)); _height = atoi(m.get(F_HEIGHT));
_id = atoi(m.get(F_ID));
_flag.read_from(m); _flag.read_from(m);
@ -680,12 +682,24 @@ bool TForm_item::edit(TMask& m)
m.enable(F_CLASS, m.insert_mode()); m.enable(F_CLASS, m.insert_mode());
m.reset(); m.reset();
if (!m.insert_mode())
print_on(m); if (m.insert_mode())
{
short id = 0;
for (word i = 0; i < section().fields(); i++)
{
const TForm_item& f = section().field(i);
if (f.id() > id) id = f.id();
}
_id = id+1;
}
print_on(m);
const bool godmode = form().edit_level() > 1; const bool godmode = form().edit_level() > 1;
m.enable_page(1, godmode); m.enable_page(1, godmode);
m.enable(-7, godmode); m.enable(-7, godmode);
m.enable(F_ID, godmode);
const bool dirty = m.run() == K_ENTER && m.dirty(); const bool dirty = m.run() == K_ENTER && m.dirty();
if (dirty) if (dirty)