Component stringgrid display ORCAL data in the database, specific how to operate the
A rookie, a great god guide,
The more detailed, the better! Specific for each operation, the concrete programming,!!!!!
Be very grateful!

CodePudding user response:

Something like this, you let me change

 procedure TForm27. FormCreate (Sender: TObject); 
Var 
The row, col: Integer; 
The begin 
Self. StringGrid1. RowCount:=self qry1. RecordCount; 
Qry1. First; 
Row:=0; 
While not qry1. Eof do 
The begin 
For col:=0 to qry1. Fields. Do the Count - 1 
StringGrid1. Cells [col, row] :=qry1. Fields. The Fields [col] Value; 
Row:=row + 1; 
end; 
end; 

CodePudding user response:

What need to add this component, have a comment, explain the meaning of each step, thank you!