------解决方案--------------------
GetEditorTyp事件是你每次点击单元格就触发一次,你怎么在外面赋值那,就算你赋值成功应该也没有吧
------解决方案--------------------
procedure TForm1.AdvStringGrid1GetEditorType(Sender: TObject;
ACol, ARow: Integer; var AEditor: TEditorType);
begin
if ACol =2 then
begin
aEditor := edComboList;
AdvStringGrid1.ClearComboString;
AdvStringGrid1.AddComboString('10CM');
AdvStringGrid1.AddComboString('20CM');
end;
end;