單擊時出現DateTimePicker1控件.

解决方案 »

  1.   

    用第三方控件:Info Power 3000 or Ehlib
      

  2.   

    if column.Field.DataType=字段类型 then 
       if (GDFocused in state) then  //焦点
          begin
            if Column.Field.FieldName='字段名称' then
                 do  something...
      

  3.   

    dbgrideh的静态列的buttonstyle设为cbsEllipsis在dbgrideh的oneditbuttonclick
    procedure TForm1.DBGridEh1EditButtonClick(Sender: TObject);
    begin
      让含有datetimepicker的窗体show出来
    end;
      

  4.   

    用第三方控件:Info Power 3000 or Ehlib
      

  5.   

    如何判斷當有焦點是在日期型字段上?
    procedure TForm1.DBGrid1CellClick(Column: TColumn);
    var
      i : integer;
    begin  if dbgrid1.SelectedField =    adoquery1.FieldByName(‘日期型字段名’) then
      begin
        MonthCalendar1.Visible := true;  end;