delphi stringgrid显示数据库记录

1、stringgrid控件默认的第一列和第一行是用来给你做备注的，所以会有不同的颜色显示，要去除这个显示需要改动属性fixedrows和fixedcols，分别是锁定的函数和列数，改为0就没有锁定的了。

2、stringgrid要实现选定了后一整行都变色，需要在option里面选择gorowselect属性。

3、adorequest实现insert、update、delete可以加入到SQL语句中去，然后执行ExecSQL方法，但是如果是查询值，即用select的话就用open方法打开，之后是ado一个record，可以用RecordCount属性判断有多少条记录，用next方法逐条读取，下面是一段代码：

procedure TForm1.FormCreate(Sender: TObject);
var
i:integer;
adoquery1:tadoquery;
begin
adoquery1:=tadoquery.Create(nil);
adoquery1.ConnectionString:='Provider=Microsoft.Jet.OLEDB.4.0;Data Source=' + getAppPath()+'db\sperm.mdb';
adoquery1.SQL.Clear;
adoquery1.SQL.Add('select * from report where getdate>#2012-02-28# order by getdate desc');
adoquery1.Open;
stringgrid1.RowCount:=adoquery1.RecordCount;
for i := 1 to adoquery1.RecordCount do
begin
stringgrid1.Cells[0,i]:=adoquery1.FieldByName('medicalno').AsString;
stringgrid1.Cells[1,i]:=adoquery1.FieldByName('name').AsString;
stringgrid1.Cells[2,i]:=adoquery1.FieldByName('age').AsString;

adoquery1.Next;
end;
adoquery1.Destroy;

end;