grid dinamico
Buenas tardes
alguien me podría ayudar a pintar un stringgrid en tiempo de ejecución??
estoy trabajando en un pagControl en tiempo de ejecución
//aquí creo elo pagcontrol en tiempo de ejecucion
TabSheet := TTabSheet.Create(_verRporte.pgReportes);
TabSheet.PageControl := _verRporte.pgReportes;
TabSheet.Name := DM.Query1.Fields[0].Text;
TabSheet.Caption := TabSheet.Name;
//aquí le pongo el grid a cada pag creado
gridTmp := TStringGrid.Create(nil);
gridTmp.Align := alClient;
gridTmp.Parent := TabSheet;
gridTmp.Name := 'stgReportes';
gridTmp.RowHeights[0]:=250;
lo que no se como hacer es darle es efecto del drawcell a los gird creados
todos tienen que tener el mismo formato
espero haberme explicado bien
gracias
|