Вверх ↑
Разработчик
Ответов: 26113
Рейтинг: 2126
#1: 2022-05-01 21:38:03 ЛС | профиль | цитата
ric писал(а):
посмотри ошибку

Убери XP-стиль, и ошибка исчезнет.

--- Добавлено в 2022-05-01 22:01:00

Можно еще попытаться добавлять нужную ширину при добавлении столбца, но обязательно отличную от дефолтной
Схема

Add(MainForm,5412717,434,154)
{
Height=386
Name="form"
Position=1
Point(Handle)
Point(Width)
link(onCreate,8279789:doTimer,[(473,174)(473,202)(263,202)(263,216)])
}
Add(MST_ColAction,935753,385,210)
{
MSTControl="tab"
}
Add(DoData,5286389,336,210)
{
Data=String(col;110)
link(onEventData,935753:doColAction,[])
}
Add(MTStrTbl,2452207,371,154)
{
Top=32
Width=384
Height=315
Align=5
Font=[MS Sans Serif,8,1,0,204]
TabOrder=-1
Name="tab"
ColorSp=12639424
ColDelimiter=";"
ColumnWidth=120
ColorItems=0
HeaderDragDrop=0
TextAlign=2
Grid=0
InfoTip=1
SmallIconsManager="ico2"
DrawManager="userE"
Point(Handle)
Point(ItemAtPos)
Point(onDblClick)
Point(doFont)
}
Add(Timer,8279789,273,210)
{
Interval=500
Enable=1
AutoStop=6
link(onTimer,5286389:doData,[])
}
Add(StyleXP,1464817,273,154)
{
}

Я пока не вижу решения на уровне компонента.
карма: 22

0
Редактировалось 2 раз(а), последний 2022-05-01 22:01:18