| Ver tema anterior :: Ver tema siguiente |
| Autor |
Mensaje |
SumSum
Lt JG
Registrado: 06 Oct 2002Mensajes: 52
|
 Publicado: Dom 20 Mar, 2011 1:30 pm Asunto: Error con TComponent y propiedad Items |
 |
|
Os pido ayuda con esta instruccion que me da error en compilacion diciendo
"Items is not a member of TComponent"
for (int i = 0; i < FPedido->ComponentCount; i++)
{
TComponent* componente = static_cast<TControl*>(Components[i]);
if (IsPublishedProp(componente, "Items"))
{
for (int j=0; j<componente->Items->Count;j++)
{
FILTRO="ORIGINAL ='"+componente->Items->Strings[j]+"'";
Datos->QIDIOMA->Filter="";
Datos->QIDIOMA->Filter=FILTRO;
if (Datos->QIDIOMA->FindFirst())
componente->Items->Strings[j]=Datos->QIDIOMA->FieldByName("BG")->AsString;
}
}
}
_________________
Asun |
|
| Volver arriba |
|
 |
_Leo
Site Admin
Registrado: 11 Ago 2002Mensajes: 1875Ubicación: Lanzarote - Islas Canarias (España)
|
| Publicado: Dom 20 Mar, 2011 4:22 pm Asunto: |
|
|
Hola, prueba con lo siguiente:
| Código: | for (int i = 0; i < FPedido->ComponentCount; i++)
{
TComponent* componente = Components[i];
if (IsPublishedProp(componente, "Items"))
{
TStrings* s = dynamic_cast<TStrings*>(GetObjectProp(componente, "Items"));
for (int j = 0; s && j < s->Count; j++)
{
String FILTRO = "ORIGINAL ='" + s->Strings[j] + "'";
Datos->QIDIOMA->Filter = FILTRO;
if (Datos->QIDIOMA->FindFirst())
s->Strings[j] = Datos->QIDIOMA->FieldByName("BG")->AsString;
}
}
} |
|
|
| Volver arriba |
|
|
SumSum
Lt JG
Registrado: 06 Oct 2002Mensajes: 52
|
| Publicado: Dom 20 Mar, 2011 10:34 pm Asunto: |
|
|
Funciona perfectamente. Muchas gracias Leo.
_________________
Asun |
|
| Volver arriba |
|
|
|
FAQ
Buscar
Miembros
Grupos de Usuarios
Registrarse
Perfil
Entra para ver tus mensajes privados
Entrar
