Buenas a todos...
para los que les pueda interesar acabo de solucionar mi problema...
pero casi que no
bueno lo unico que hice fue coger el TAdoDataSet el cual lo consulte algo asi para hacer una especie de matriz...
consulta es el Name del TADODataSet
x=consulta->FieldsCount;
for(i=1;i<=x;i++)
{
consulta->First();
j=2;
while(!consulta->Eof)
{
Temp=consulta->FieldByName(consulta->Fields->Fields[i-1]->FieldName)->AsString;
Mihoja.OlePropertyGet("Cells").OlePropertyGet("Item",j,i).OlePropertyGet("Font").OlePropertySet("Italic",true);
Mihoja.OlePropertyGet("Cells").OlePropertyGet("Item",j,i).OlePropertyGet("Font").OlePropertySet("Size",12);
Mihoja.OlePropertyGet("Cells").OlePropertyGet("Item",j,i).OlePropertyGet("Font").OlePropertySet("Color",clBlue);
Mihoja.OlePropertyGet("Cells").OlePropertyGet("Item",j,i).OlePropertySet("Value",Temp.c_str());
j++;
consulta->Next();
}
}
gracias por la atencion prestada
