画面の幅は、一部のテキストフィールドを表示するのに十分ではありません。自動ラップする方法がわからないので、簡単にできるとは思えません。
だから、私は次のようなことをするだろうと思いました
procedure TForm1.FormMouseMove(Sender: TObject;
Shift: TShiftState; X,Y: Integer);
var column, row : Integer;
begin
myDbGrid.MouseToCell(X, Y, column, row);
myDbGrid.Hinst := myDbGrid.Cells(column, row); // <==== ooops
end;
または、それを実行しOnShowHint
てマウス座標を取得し、それらを列と行に変換します(より効率的)
しかし、もちろん、TDbGridにはがありませんCells
。ユーザーがグリッドの「セル」の上にマウスを移動したときに、コントロールのヒントを設定する方法はありますか?