internal TRichString GetText()
{
if (Dwg == null)
{
return(new TRichString());
}
else
{
TEscherRecord R = Dwg.FindRoot();
if (R == null)
{
return(new TRichString());
}
else
{
R = R.FindRec <TEscherClientTextBoxRecord>();
if (R == null)
{
return(new TRichString());
}
else
{
return(((TEscherClientTextBoxRecord)R).GetValue());
}
}
}
}
internal void SetText(TRichString value)
{
if (Dwg == null)
{
return;
}
else
{
TEscherRecord R = Dwg.FindRoot();
if (R == null)
{
return;
}
else
{
R = R.FindRec <TEscherClientTextBoxRecord>();
if (R == null)
{
return;
}
else
{
((TEscherClientTextBoxRecord)R).SetValue(value);
}
}
}
}
private TEscherImageAnchorRecord GetImageRecord()
{
if (Dwg == null)
{
return(null);
}
else
{
TEscherRecord R = Dwg.FindRoot();
if (R == null)
{
return(null);
}
else
{
R = R.FindRec <TEscherImageAnchorRecord>();
if (R == null)
{
return(null);
}
else
{
TEscherImageAnchorRecord Anchor = ((TEscherImageAnchorRecord)R);
return(Anchor);
}
}
}
}
internal void Delete(int Index)
{
TEscherRecord Obj = FList[Index];
FList.RemoveAt(Index);
Obj.Destroy();
}
internal void Swap(int Index1, int Index2)
{
TEscherRecord tmp = FList[Index1];
FList[Index1] = FList[Index2];
FList[Index2] = tmp;
FSorted = false;
}
protected void SetThis(TEscherRecord value, int index)
{
if (FList[index] != null)
{
FList[index].Destroy();
}
FList[index] = value;
FSorted = false; //When we add the list gets unsorted
}
internal bool Find(TEscherRecord aRecord, ref int Index)
{
if (!FSorted)
{
Sort();
}
Index = FList.BinarySearch(0, FList.Count, aRecord, null); //Only BinarySearch compatible with CF.
bool Result = Index >= 0;
if (Index < 0)
{
Index = ~Index;
}
return(Result);
}
internal void CopyFrom(int RowOfs, int ColOfs, TEscherRecordList aEscherRecordList, TEscherDwgCache NewDwgCache, TEscherDwgGroupCache NewDwgGroupCache, TSheetInfo SheetInfo)
{
if (aEscherRecordList == null)
{
return;
}
if (aEscherRecordList.FList == FList)
{
XlsMessages.ThrowException(XlsErr.ErrInternal); //Should be different objects
}
for (int i = 0; i < aEscherRecordList.Count; i++)
{
Add(TEscherRecord.Clone(aEscherRecordList[i], RowOfs, ColOfs, NewDwgCache, NewDwgGroupCache, SheetInfo));
}
}
internal TEscherOPTRecord GetOpt()
{
if (Dwg == null)
{
return(null);
}
else
{
TEscherRecord R = Dwg.FindRoot();
if (R == null)
{
return(null);
}
else
{
R = R.FindRec <TEscherOPTRecord>();
return((TEscherOPTRecord)R);
}
}
}
internal TEscherClientTextBoxRecord GetClientTextBox()
{
if (Dwg == null)
{
return(null);
}
else
{
TEscherRecord R = Dwg.FindRoot();
if (R == null)
{
return(null);
}
else
{
R = R.FindRec <TEscherClientTextBoxRecord>();
return((TEscherClientTextBoxRecord)R);
}
}
}
internal void Insert(int index, TEscherRecord a)
{
// We assume that when we insert, we respect the order, so we dont set Sorted=false
FList.Insert(index, a);
}
internal void Add(TEscherRecord a)
{
FList.Add(a);
FSorted = false; //When we add the list gets unsorted
}
internal int IndexOf(TEscherRecord Obj)
{
return(FList.IndexOf(Obj));
}
internal void Remove(TEscherRecord Obj)
{
FList.Remove(Obj);
Obj.Destroy();
}
