> Procedure grdBrowseTable.Init >* -------------- ---- > This.RecordSource = cTableAlias > > For I = 1 To This.ColumnCount > BindEvent (This.Columns(I).Text1, "DblClick" , ThisForm, "grdBrowseTable_DblClick" ) > EndFor > EndProc > > Procedure grdBrowseTable_DblClick >* -------------- -------- > Local cVar > > cVar = Thisform.grdBrowseTable.Columns(Thisform.grdBrowseTable.ActiveColumn).Text1.Value > > MessageBox (VarType (cVar)) > EndProc >>When double clicking over a memo field it returns "C", so I can't know if it is a memo field, Character, Varchar or Varchar (Binary).