<HTML><BODY>
<p>Hello, I want to change certain cells in StringGrid. Here is an example, but it changes all cells. Any idea where is wrong? </p><p>procedure TForm1.StringGrid1Click(Sender: TObject);<br>var<br> i, j: integer;<br>begin<br> for i := 1 to 4 do<br> for j := 1 to 4 do Begin<br> if i=j<br> then StringGrid1.Font.Style := [fsBold]<br> else StringGrid1.Font.Style := [];<br> StringGrid1.Cells[i,j] := 'StrTest';<br> end;<br>end; <br></p><p> </p>
</BODY></HTML>