编辑dbgrid的某一列是，如何在编辑的单元格下面弹出一个Form？

[dxgxk]

编辑form1中的dbgrid的某一列是，如何在编辑的单元格下面弹出一个Form？

有点类似picklist的东西，不过需要显示多字段，所以在一个from2上放一个dgbrid
显示一个表的一些字段以便选择，只是如何才能让他现在在正编辑的单元格的正下方，
该怎么设置form2的top和left,Form1上的dbgrid放在一个groupbox上面，能不能用屏幕的绝对坐标来设置form2的位置？

[i_love_pc]

能不能用屏幕的绝对坐标来设置form2的位置？
========================================

可以！

[sharkxie]

可以在Form2->ShowForm()中设置左上角的位置

[MPTD_Fire]

Form2->ShowForm()
修改属性

[dxhh99]

我想知道怎么样得到当前控件的绝对坐标（相对与屏幕），比如form上有一个GroupBox,GroupBox上有一个DBGrid,想得到DBGrid中某个单元格的绝对坐标，然后设置 Form2的Top和Left属性在此单元格的下面弹出Form2。

[dxgxk]

能详细的说一下么？

[laowang2]

void __fastcall TXSfrm::DBGrid1DrawDataCell(TObject *Sender,
const TRect &Rect, TField *Field, TGridDrawState State)
{
if(State.Contains(gdSelected)) //gdSelected代表选中单元格
{
XSfrm->gridx=Rect.Left+DBGrid1->Left;
XSfrm->gridy=Rect.Top+DBGrid1->Top;
}
}
//---------------------------------------------------------------------------

void __fastcall TXSfrm::Button1Click(TObject *Sender)
{
ShowMessage(AnsiString("X=")+gridx+AnsiString(" Y=")+gridy);
}
//---------------------------------------------------------------------------