void DataSetToStringGrid(TDataSet *DataSet, TStringGrid *StringGrid)
{
  if (DataSet == NULL || StringGrid == NULL) return;
  if (!DataSet->Active) DataSet->Open();

void DBGridEhToStringGrid(TDBGridEh *DBGridEh, TStringGrid *StringGrid)
{
  if (DBGridEh == NULL || StringGrid == NULL) return;
  if (DBGridEh->DataSource == NULL || DBGridEh->DataSource->DataSet

void DBGridToStringGrid(TDBGrid *DBGrid, TStringGrid *StringGrid)
{
  if (DBGrid == NULL || StringGrid