今天查了几个小时的错误,硬是没有找到
最后跟踪发现是数据字典设置弹窗选择的原因造成的。
跟踪情况:
错误信息如下:
Shoeserpp
---------------------------
Access violation at address 54FECAE5 in module 'ABFrameworkG.bpl'. Read of address 00000014.
---------------------------
确定
还是大神厉害,加了个判断搞定了,AB的框架太厉害了!
if (AnsiCompareText(aControlType,trim('TABcxDBPopupForm '))=0) then
begin
if tempProperties is TcxExtLookupComboBoxProperties then
begin
if TcxExtLookupComboBoxProperties(tempProperties).Buttons.count=1 then
begin
TcxExtLookupComboBoxProperties(tempProperties).Buttons[0].width:=1;
tempButton:=TcxExtLookupComboBoxProperties(tempProperties).Buttons.Add;
tempButton.Kind:=bkEllipsis;
end;
end;
end
else if (AnsiCompareText(aControlType,trim('TABcxDBLookUpAndPopupForm '))=0) then
begin
if tempProperties is TcxExtLookupComboBoxProperties then
begin
if TcxExtLookupComboBoxProperties(tempProperties).Buttons.count=1 then
begin
tempButton:=TcxExtLookupComboBoxProperties(tempProperties).Buttons.Add;
tempButton.Kind:=bkEllipsis;
end;
end;
end