if DataGrid1.FocusedNode.Count > 0 then
begin
DataGrid1.FullExpand;
end;
if (DataSetTemp.Active=True) and (DataSetTemp.IsEmpty=False) then
begin
vOutGLBH:=Trim(DataSetTemp.FieldByName('GLBH_AJ').AsString);
self.Close;
end;
procedure TSJWG1.DataGridDblClick(Sender: TObject);
begin
if datagrid.FocusedNode.Count>0 then //判断不是分组的节点
begin
datagrid.FocusedNode.Items[0].Focused:=true;
dialogs.ShowMessage(DataSetBrokerBZSJJ1.dataset.fields[0].asstring);
end;
end;