[Winny]

Код:

procedure TForm1.Button1Click(Sender: TObject);
begin
if StringGrid1.Cells[1,1]='' then
ShowMessage('Пожалуйста заполните обязатльное поле!')
end;

end.