dephi 10 lite grid

[juaarias]

como veras soy muy novato en delphi, se me habia ocurrido algo asi pero completaba las celdas e igual me slataba el showmessage.
//CONTROLO QUE ESTEN LOS DATOS EN EL GRID//
b:=false;
for i := 1 to stgDatos.rowCount do
if (stgDatos.Cells[1,i]='')or((stgDatos.Cells[2,i]='')or ((stgDatos.Cells[3,i]=''))) then
b:=true;
if b=true then
showmessage('FALTAN IGRESAR DATOS');