Need to edge out the competition for your dream job? Train for certifications today.
StringGrid.Font.Size := 20;
Open in new window
Experts Exchange Solution brought to you by
"The solutions and answers provided on Experts Exchange have been extremely helpful to me over the last few years. I wear a lot of hats - Developer, Database Administrator, Help Desk, etc., so I know a lot of things but not a lot about one thing. Experts Exchange gives me answers from people who do know a lot about one thing, in a easy to use platform." -Todd S.
aCol, aRow: Integer;
for aCol := 0 to StringGrid1.ColumnCount - 1 do begin
for aRow := 0 to StringGrid1.RowCount - 1 do begin
aCellCtrl := TColumnAccess( StringGrid1.Columns[ aCol ] ).CellControlByRow( aRow );
if ( aCellCtrl is TTextCell ) then begin
TTextCell( aCellCtrl ).StyledSettings := ;
TTextCell( aCellCtrl ).FontColor := claBlue;
TTextCell( aCellCtrl ).Font.Family := 'Times New Roman';
TTextCell( aCellCtrl ).Font.Style := [ TFontStyle.fsBold ];
TTextCell( aCellCtrl ).Font.Size := 12;
Open in new window
TColumnAccess = class( TColumn )
sgNewWords.RowCount := 6;
for I := 0 to 5 do
for j := 0 to sgNewWords.ColumnCount-1 do
CellCtrl := TColumnAccess(sgNewWords.Columns[j]).CellControlByRow(i);
if (CellCtrl is TTextCell) then
TTextCell(CellCtrl).StyledSettings := ;
TTextCell(CellCtrl).Font.Family := 'Times New Roman';
TTextCell(CellCtrl).Font.Style := [ TFontStyle.fsBold ];
TTextCell(CellCtrl).Font.Size := 20;
Facing a tech roadblock? Get the help and guidance you need from experienced professionals who care. Ask your question anytime, anywhere, with no hassle.
This introductory course to Windows 7 environment will teach you about working with the Windows operating system. You will learn about basic functions including start menu; the desktop; managing files, folders, and libraries.
From novice to tech pro — start learning today.
Premium members can enroll in this course at no extra cost.
Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.
Have a better answer? Share it in a comment.
Please enter a first name
Please enter a last name
Must be at least 4 characters long.
Join and Comment