public void Write(ArchiveWriter ar)
{
Debug.Assert(Version == 6200);
ar.WriteStringL(SERIALISEHEADER, true);
ar.Write(Version);
ar.Write(DesktopSize);
ar.WriteRaw(MainWindowBounds);
ar.WriteStringL(PromptID < 0 ? "" : PromptID.ToString());
ar.Write(NextControlID);
}
public void Write(ArchiveWriter ar)
{
ar.WriteStringL(GenerateScript(true), true);
Visit.Write(ar);
if (RunDefault && CommandList.Any())
{
Globals.NonFatalOperationalError("[SAW_FILE_SAW6_CannotMixedScript]");
}
// in SAW 6 there were separate lists
// non-SAW6 commands are filtered. They should generally give an Globals.NonFatalOperationalError during the script generation (above)
ar.WriteFiltered(CommandList, x => x.ExecutionTime == Command.ExecutionTimes.Immediate && x.CommandListEntry.SAW6);
ar.WriteFiltered(CommandList, x => x.ExecutionTime == Command.ExecutionTimes.Deferred && x.CommandListEntry.SAW6); // not sure what happened to any device up???
}
public void Write(ArchiveWriter ar)
{ // this resets the item types of the special items as the item type is not really set in SAW7
NotifyArchiveTypes(ar);
ar.PageHeight = m_Header.MainWindowBounds.Height;
m_Header.Write(ar);
if (m_Header.Version == 5005 || m_Header.Version > 5009)
{
m_ItemDefault.Main.ItemType = Item.ItemTypes.IT_Default;
m_ItemEscapeDefault.Main.ItemType = Item.ItemTypes.IT_Default;
m_ItemGroupDefault.Main.ItemType = Item.ItemTypes.IT_Default;
m_ItemDefault.Write(ar);
m_ItemEscapeDefault.Write(ar);
m_ItemGroupDefault.Write(ar);
}
m_ItemStartup.Main.ItemType = Item.ItemTypes.IT_StartUp;
m_ItemStartup.Write(ar);
m_itemTop.Main.ItemType = Item.ItemTypes.IT_TopItem;
m_itemTop.Main.SetBounds(new RectangleF(0, 0, m_Header.MainWindowBounds.Width, m_Header.MainWindowBounds.Height));
m_itemTop.AddContents();
m_itemTop.Write(ar);
}
public void Write(ArchiveWriter ar)
{
ar.Write((int)VisitType);
ar.Write(ItemID);
}
protected void BaseWrite(ArchiveWriter ar)
{
base.Write(ar);
}
/// <summary>Default implementation assumes low word of SingleParam stored first, then high word</summary>
public override void Write(ArchiveWriter ar)
{
base.Write(ar);
ar.Write((ushort)(SingleParam & 0xffff));
ar.Write((ushort)(SingleParam >> 16));
}
public virtual void Write(ArchiveWriter ar)
{
ar.WriteList(m_ParamList);
}