uses Grids;
procedure TfrmEvent.FormCreate(Sender: TObject);
var
rect:TGridRect;
begin
//24为stringgrid1中不存在的范围
rect.Left:=24;
rect.Right :=24;
rect.Top :=24;
rect.Bottom:=24;
StringGrid1.selection :=rect;
end;
这样做了之后stringgrid在加载时就取消兰色选中颜色