TDBCtrlGrid + TDBText 如何自动调整行高？

[银点]

一共有四列固定宽度，其中一有一列是文本，长度不定，如果让其自动调整行高？

[缘中人]

要调整TDBText 的行高还是TDBCtrlGrid 的高度

[银点]

引用 1 楼 ksrsoft 的回复:

要调整TDBText 的行高还是TDBCtrlGrid 的高度

TDBText文本限过一行后，第二行字就就被截了一半，只是显示第二行字的上半边，想解决这个问题

[缘中人]

 int   FontHeigth,i;
  Canvas->Font->Assign(MemoCurJH->Font);

  FontHeigth  = self.Canvas.TextHeight('总共');
  MemoCurJH->Height  = FontHeigth * (MemoCurJH->Lines->Count + 3);

用memo，可以换行，高度 普通的edit好事不能改变高度

[银点]

引用 3 楼 ksrsoft 的回复:

 int   FontHeigth,i;
  Canvas->Font->Assign(MemoCurJH->Font);

  FontHeigth  = self.Canvas.TextHeight('总共');
  MemoCurJH->Height  = FontHeigth * (MemoCurJH->Lines->Count + 3);

用memo，可以换行，高度 普通的edit好事不能改变高度

我用的是DBText，它可以换行，但就是TCtrlGrid的PanelHeight不能自动调整以适应

[银点]

引用 3 楼 ksrsoft 的回复:

 int   FontHeigth,i;
  Canvas->Font->Assign(MemoCurJH->Font);

  FontHeigth  = self.Canvas.TextHeight('总共');
  MemoCurJH->Height  = FontHeigth * (MemoCurJH->Lines->Count + 3);

用memo，可以换行，高度 普通的edit好事不能改变高度

这个计算高度的方法对我有启发，谢谢