void __fastcall TForm1::traer(String tobjetivo, String g, String grueso, String inv)
{
int i,j, piezas, k=0;
String dato,x;
AnsiString sql="", campo;
for(i=1;i<=5;i++)
{
for(j=1;j<=7;j++)
{
k++;
x=k;
campo=g+x;
sql="SELECT "+campo+" FROM '"+tobjetivo+"'";
Query1->SQL->Clear();
Query1->SQL->Add(sql);
Query1->Open();
dato=Query1->FieldByName(campo)->AsInteger;
StringGrid1->Cells[j][i]=dato;
sql="";
Query1->Close();
}
}
Label1->Caption="Mostrando grueso "+grueso+" de Inventario\nde "+inv;
}