Speed of Table degrades with long lines of text.

ColinRule

The speed of the edit table control seems to degrade with lengthy items in the table.

I have checked the event calls to the OLE event, and nothing here causes any extra events.
I have also turned ON the SuppressMouseMoveEvent, even though on as a default

The general moving the mouse around seems to take a second or two.
Removing various lines from the table eventually speeds things up, but it seems to be most improved once the long lines with ellipses on the end are removed.

There are only 70 lines in the data.

Example screen


Code:
Qualifier=1:@FM:"2*ICEPAC*OLE*INCL_EXCL.TABLE" Call Send_Message(OLE_CONTROL,"QUALIFY_EVENT","ALL_OLES",Qualifier) Call Send_Message(OLE_CONTROL,"OLE.DeleteColumns",1,1) Call Send_Message(OLE_CONTROL,"OLE.InsertColumns",1,5) Call Set_Property(OLE_CONTROL,"OLE.AllowDeletions",1) Call Set_Property(OLE_CONTROL,"OLE.AllowInserts",1) Call Set_Property(OLE_CONTROL,"OLE.ResetSelPos",0) Call Set_Property(OLE_CONTROL,"OLE.AutoNumbers","I":@VM:1) Call Set_Property(OLE_CONTROL,"OLE.SuppressMouseMoveEvent",1) Call Set_Property(OLE_CONTROL,"OLE.BlankRowManagement",0:@FM:1) Call Set_Property(OLE_CONTROL,"OLE.ScrollBarsVisible","Y":@FM:"N") Call Set_Property(OLE_CONTROL,"OLE.ScrollStep",1:@FM:4) Call Set_Property(OLE_CONTROL,"OLE.FunctionKey[F2]","EDIT") Call Set_Property(OLE_CONTROL,"OLE.FunctionKey[F4]","N") Call Set_Property(OLE_CONTROL,"OLE.HeaderColors[All;All]",@FM:@FM:"ST":@FM:"S":@FM:1) Call Set_Property(OLE_CONTROL,"OLE.SelectionStyle",@VM:14680062:@FM:@FM:@FM:"255":@FM:@FM:@FM:"Both":@FM:1) Call Set_Property(OLE_CONTROL,"OLE.DataRow[All]",20:@FM:1:@FM:1:@FM:0:@FM:0) Call Set_Property(OLE_CONTROL,"OLE.DataColumn[1]",50:@FM:1:@FM:0:@FM:0:@FM:0) Call Set_Property(OLE_CONTROL,"OLE.DataColumn[2]",50:@FM:1:@FM:0:@FM:0:@FM:0) Call Set_Property(OLE_CONTROL,"OLE.DataColumn[3]",50:@FM:1:@FM:0:@FM:0:@FM:0) Call Set_Property(OLE_CONTROL,"OLE.DataColumn[4]",250:@FM:1:@FM:1:@FM:1:@FM:0) Call Set_Property(OLE_CONTROL,"OLE.DataColumn[5]",0:@FM:0:@FM:0:@FM:0:@FM:0) Call Set_Property(OLE_CONTROL,"OLE.HeaderText[1;1]","Row") Call Set_Property(OLE_CONTROL,"OLE.HeaderText[2;1]","Level") Call Set_Property(OLE_CONTROL,"OLE.HeaderText[3;1]","Code") Call Set_Property(OLE_CONTROL,"OLE.HeaderText[4;1]","Point") Call Set_Property(OLE_CONTROL,"OLE.HeaderText[5;1]","Description") Call Set_Property(OLE_CONTROL,"OLE.HeaderText[6;1]","Properties") Call Set_Property(OLE_CONTROL,"OLE.CellProtection[All;All]","NONE") Call Set_Property(OLE_CONTROL,"OLE.CellAlignment[1;All]","T":@FM:"C":@FM:"L") Call Set_Property(OLE_CONTROL,"OLE.CellAlignment[2;All]","T":@FM:"C":@FM:"L") Call Set_Property(OLE_CONTROL,"OLE.CellAlignment[3;All]","T":@FM:"L":@FM:"L") Call Set_Property(OLE_CONTROL,"OLE.CellAlignment[4;All]","T":@FM:"L":@FM:"L") CALL Set_Property(OLE_CONTROL,"OLE.CellMultilined[4;All]",1) CALL Set_Property(OLE_CONTROL,"OLE.CellConv[2;All]","MD0") CALL Set_Property(OLE_CONTROL,"OLE.CellGridLines[All;All]","3DFace":@FM:"None":@FM:"3DFace":@FM:"None")