Re: Split cells/unmerge Cells

Return to index

Author

Message

Sergey Tkachenko

Posted: 11/06/2002 20:36:12

All is correct, but rve->BeginItemModify(ItemNo, Data) should be before

switch,

and rve->EndItemModify(ItemNo, Data); rve->Change(); after

>

> switch (operation){

> case 0: //Merge

>   rve->BeginItemModify(ItemNo, Data);

>    rve->BeginUndoGroup(rvutModifyItem);

>    rve->SetUndoGroupMode(true);

>    table->MergeSelectedCells(true);

>    table->DeleteEmptyRows();

>    table->DeleteEmptyCols();

>    rve->SetUndoGroupMode(false);

>     break;

> case 1:  //split

>    AnsiString s = "2";

>    if (InputQuery("Número de columnas por celda","Indique número",s))

>       table->SplitSelectedCellsVertically(StrToIntDef(s,0));

>    rve->EndItemModify(ItemNo, Data);

>    rve->Change();

> }

>

> bye.

>

>