如何在TStringGrid中显示行号？

Question

如何在显示行号的FireMonkey中的TStringGrid中创建列？

如果是通过使用LiveBinding，我无法弄清楚如何。

Answer 1

您的表单/网格OnGetValue事件处理程序将作为其参数之一传递该行。只需验证该列是否是您想要的并返回行号。

function Form1.Grid1GetValue(const Row, Col: Integer): TValue; 
begin 
    if Col = 0 then 
    Result := TValue.From<Integer>(Row); 
end;