[luffi]

Доброй поры времени. Как этот код переделать для TStringGrid

Код:

 if (Key='.')and(Pos('.',TEdit(Sender).Text)<>0) then
       Key:=#0;

он у меня для TEdit есть и пашет норм. пробоваал сам сделать но незнаю что дописать. Error-ры выкидывает. Всё работает в OnKeyPress

Код:

if (Key='.')and(Pos('.',TStringGrid(Sender).Cells)<>0) then
       Key:=#0;

[Pyro]

Код:

with TStringGrid(Sender) do
  if (Key='.')and(Pos('.',Cells[col,row])<>0) then
    Key:=#0;

[luffi]

Сообщение от Pyro

Код:

with TStringGrid(Sender) do
  if (Key='.')and(Pos('.',Cells[col,row])<>0) then
    Key:=#0;

спасибо, а сам затупил