Undo/Redo设计(三)

本贴转自http://www.drgraph.com/viewthread.php?tid=109&extra=page%3D1

2.4        创建导线类型
经过创建类型的处理，可以看出，针对某一类型的操作，仅需考虑Undo/Redo该操作时都需要些什么样的信息。
对于创建导线而言，若希望撤销该操作，就是删除该导线；而若要重做时，还有一些额外事宜要做，如：
1.        创建导线时，会设置该导线的连接元件，这是最简单的情况
2.        创建导线时，如果起止点在已有导线上，则会与已有导线合并，这其实应该算是两个子操作，即：创建新导线，合并两条导线
因此，创建导线时，还需要一些额外信息，这些信息应包括：
1.        所连接的元件
2.        所连接的母线
3.        相关的导线
每次创建导线时，最多可首尾连接一个元件，因此可添加成员FBeginUnit, FEndUnit表示起始元件
而母线，只能在结束时连接，可添加成员FConnectedBus表示
对导线而言，可添加成员FWireInfoList以记录相关的导线。

// 导线相关 TStringList * FWireInfoList; // 导线信息列表 TCbwUnit * FBeginUnit; // 起始元件 TCbwUnit * FEndUnit; // 结束元件 TCbwBus * FConnectedBus; // 连接母线

为编程方便，置
下标为0的导线为创建导线的起始导线
下标为1的导线为创建导线的结束导线
下标为2的导线为结果导线，即有0+1=2
为便于阅读，可定义以下三个常量

const int CBW_WIRE_BEGIN = 0; // 被创建的导线的出发导线 const int CBW_WIRE_END = 1; // 与创建导线相关的导线 const int CBW_WIRE_DESTINATION = 2; // 合并处理后的导线

当然，以上添加了如此之多的成员，对于维护工作有一定的要求，因此，可将连接关系信息全部加入到导线信息中，以省去连接对象数据成员。
有了数据成员后，再来处理需求
创建导线操作，可从元件管脚开始，也可从已有导线的拐点处开始，但开始后，均会创建出一个临时的两线类TTwoWireLine，设置其起始点后，可开始记录导线操作

TCbwGraphBaseForm:aintBoxMouseDown(…) { … case cotDraw: TTwoWireLine * twoWireLine = dynamic_cast<TTwoWireLine *>(cCurrentMeta); if(twoWireLine) { twoWireLine->InitialConnectPoint = cCurrentConnectPoint; BeginExecuteItem(cetCreateWire); TWire * wire = NULL; if(cCurrentConnectPoint) { TPad * pad = cCurrentConnectPoint->ad; if(pad) wire = pad->ConnectedWire; } GlobalExecuteItem->SetWire(CBW_WIRE_BEGIN, wire); // 记录起始导线 twoWireLine->FatherWire = wire; cCurrentConnectPoint = NULL; } }

下来就该考虑结束的事了。结束的逻辑代码如下：

bool __fastcall TCbwGraphBaseForm::CanEndDrawWire() { bool result = false; TTwoWireLine * twoWireLine = dynamic_cast<TTwoWireLine *>(cCurrentMeta); cBeginPoint.x *= Ratio; cBeginPoint.y *= Ratio; CbwEndInType endType = AutoPick(cBeginPoint, twoWireLine); // 此处只是为了保证AutoPick中实参为界面点 cBeginPoint.x /= Ratio; cBeginPoint.y /= Ratio; TWireLine * exceptWireLine = twoWireLine->SecondLine; cCurrentMeta = ToWire(twoWireLine, (endType != cetBus)); TWire * wire = dynamic_cast<TWire *>(cCurrentMeta); if(endType == cetBus) { DealTwoWireLineInBus(twoWireLine); wire->Adjust(); AddThisObject(wire); // DoExecuteItem result = true; if(!wire->ConnectedBus) // lineTooShort -> 您画的导线太短了!!!/n/n为避免误操作,请您按Ctrl+Z撤消本次操作,然后重画本导线 CbwMessageBox(GetResourceString("lineTooShort", this), false); if(GlobalExecuteItem) { GlobalExecuteItem->SetWire(CBW_WIRE_END, NULL); GlobalExecuteItem->SetWire(CBW_WIRE_DESTINATION, wire); } } else if(CanConnect(TPoint(cBeginPoint.x * Ratio, cBeginPoint.y * Ratio), wire, exceptWireLine)) result = true; if(result) { EndExecuteItem(true); EditType = cotSelect; FOldEditType = EditType; } if(result) ShowAutoDestPin(cBeginPoint, true); return result; }

这些代码仅处理了在母线上结束创建导线的逻辑，即设置相连母线、结束导线为空，而目标导线为原导线。而其它情况在CanConnect中处理

bool __fastcall TCbwGraphBaseForm::CanConnect(TPoint p, TWire *& cWire, TWireLine * exceptWireLine) { bool result = false; if(cCurrentConnectPoint) { TPad * pad = cCurrentConnectPoint->ad; if(pad && GlobalExecuteItem) GlobalExecuteItem->EndUnit = pad->ConnectedUnit; if(pad && pad->ConnectedPointList->Count > 1) { // 如果cCurrentConnectPoint连接到焊点，且焊点连接到现有导线，则取出该导线 TWire * wire = pad->ConnectedWire; if(wire) { if(wire != cWire) { // 若两导线不为同一对象，则将当前导线合并入该导线中，并删除当前导线 if(GlobalExecuteItem) GlobalExecuteItem->SetWire(CBW_WIRE_END, wire); wire->AddWire(cWire); DeleteObject(cWire, true); } else // 若两导线为同一对象，则当前导线进行后续处理 { if(GlobalExecuteItem) GlobalExecuteItem->SetWire(CBW_WIRE_END, NULL); wire->Adjust(); } if(GlobalExecuteItem) GlobalExecuteItem->SetWire(CBW_WIRE_DESTINATION, wire); cCurrentMeta = wire; // 置处理后的导线为当前对象 result = true; } } else { // 将cCurrentConnectPoint连接到当前导线 cWire->ConnectPointTo(cCurrentConnectPoint); cWire->Adjust(); // 对当前导线进行后续处理 AddThisObject(cWire); // 添加当前导线 // DoExecuteItem if(GlobalExecuteItem) { GlobalExecuteItem->SetWire(CBW_WIRE_END, NULL); GlobalExecuteItem->SetWire(CBW_WIRE_DESTINATION, cWire); } result = true; cCurrentConnectPoint = NULL; } } else { CBW_ITERATOR(CbwObjects, FObjects) { TCbwObject * object = *it; TWire * wire = dynamic_cast<TWire *>(object); if(wire && wire->ObjectAtPos(p)) //wire->WireLineUnder(p)) { if(wire != cWire) // 此if-else为陈斌文 6_26 删除 { if(GlobalExecuteItem) GlobalExecuteItem->SetWire(CBW_WIRE_END, wire); wire->AddWire(cWire); DeleteObject(cWire, true); } else if(!wire->NoPadOverLapWith(p, exceptWireLine)) { if(GlobalExecuteItem) GlobalExecuteItem->SetWire(CBW_WIRE_END, NULL); wire->Adjust(); } else return false; cCurrentMeta = wire; AddThisObject(wire); // DoExecuteItem if(GlobalExecuteItem) GlobalExecuteItem->SetWire(CBW_WIRE_DESTINATION, wire); result = true; } } } return result; }

上面代码较长，但逻辑很简单，即首先判断连接控点所连导线情况，若有且与当前导线不同，则分别设置；若相同，则可设结束导线为空，而目标导线为结束导线；若无导线，则直接加入控点，并设结束导线为空，而目标导线为当前导线。当然，若无控点，则查找目标导线，找到后再处理。
模型对象构造完毕后，下一件事情就是持久化，即输出为文本。
突然发现，无需进行输出了，因为所谓的输出也就是转化为XmlNode对象，但现在已经是文本列表对象，完全能满足Undo/Redo的需要。
最后的事情就是Redo/Undo了。
对于Undo逻辑，需取出目标导线，将之删除，然后再恢复起始与结束导线。
而Redo呢，反之，需取出起始与结束导线，将之删除，然后再恢复目标导线。
从上述逻辑中可以提取出两个函数：CreateWireByInfo与DeleteWireByInfo

void __fastcall TCbwGraphBaseForm::CreateWireByInfo(AnsiString info) { // 根据导线信息创建导线 if(SameText(info, "NULL")) return; TStrings * list = String2List(info, "/n"); AnsiString n = list->Strings[0]; delete list; TWire * wire = new TWire; cCurrentMeta = wire; AssignUItoObject(cCurrentMeta); cCurrentMeta->Layer = CurrentLayer; cCurrentMeta->Name = n; AddThisObject(cCurrentMeta); // Needn't DoExecuteItem wire->RefreshFromPositionInfo(info, FFindConnectPointByName); wire->Selected = true; cSelectedObjects->AddObject(wire); } void __fastcall TCbwGraphBaseForm:eleteWireByInfo(AnsiString wirePositionInfo) { // 根据导线信息删除导线 cSelectedObjects->Selected = false; AnsiString n = CbwGetStringAt(wirePositionInfo, "/n", 0); // 取得导线名称 TCbwObject * destinationWire = FindObjectByName(n); if(destinationWire) { cSelectedObjects->AddObject(destinationWire); destinationWire->Selected = true; DeleteSelectedObjects(); } }

最终发现，创建导线操作的撤销/重做代码是如此的简单：
Undo代码:

if(item->ExecuteType == cetCreateWire) { if(item->WireInfoList && item->WireInfoList->Count > 2) { DeleteWireByInfo(item->WireInfoList->Strings[2]); CreateWireByInfo(item->WireInfoList->Strings[0]); CreateWireByInfo(item->WireInfoList->Strings[1]); } }

Redo代码:

if(item->ExecuteType == cetCreateWire) { if(item->WireInfoList && item->WireInfoList->Count > 2) { DeleteWireByInfo(item->WireInfoList->Strings[0]); DeleteWireByInfo(item->WireInfoList->Strings[1]); CreateWireByInfo(item->WireInfoList->Strings[2]); } }

最后的事情就是测试(A + B表示从A开始画导线，到B结束，NULL表示强制结束)：

序号	测试内容	Undo	Redo
1.	元件 + NULL	OK	OK
2.	元件 + NULL，多次	OK	OK
3.	元件 + 元件	OK	OK
4.	元件 + 元件，多次	OK	OK
5.	元件 + 导线	OK	OK
6.	元件 + 导线，多次	OK	OK
7.	元件 + 母线	OK	OK
8.	元件 + 母线，多次	OK	OK
9.	导线 + NULL	OK	OK
10.	导线 + NULL，多次	OK	OK
11.	导线 + 元件	OK	OK
12.	导线 + 元件，多次	OK	OK
13.	导线 + 母线	OK	OK
14.	导线 + 母线，多次	OK	OK

一次性全部成功， OK 。