caracteres extraños en mi dbgrid

[Casimiro Noteví]

Las zeos sí están actualizadas para usar utf8

[navbuoy]

En C++ Builder 6, para acceder a los campos de una fila específica en un DBGrid, puedes hacerlo a través del conjunto de datos (dataset) que está vinculado al DBGrid. El DBGrid está conectado a un TDataSource, el cual a su vez está vinculado a un TQuery, TTable, o cualquier otro componente de acceso a bases de datos. Los campos de los registros se gestionan mediante objetos TField.

Para acceder al valor de un campo desde el DBGrid, puedes seguir estos pasos:

1. Acceso directo a través de TQuery o TTable
Si sabes qué campo específico deseas acceder, puedes utilizar el método FieldByName() o Fields[] del componente TQuery o TTable.

AnsiString valorCampo = Query1->FieldByName("nombre_campo")->AsString;

2. Acceso desde el componente DBGrid
El componente DBGrid no tiene acceso directo a los datos; sin embargo, puedes obtener los campos a través del conjunto de datos (DataSet) que está vinculado al TDataSource del DBGrid.

Ejemplo Accediendo al Campo de la Fila Actual:

void __fastcall TForm1::AccederCampoDesdeDBGrid()
{
    // Obtener el conjunto de datos asociado al DBGrid
    TDataSet *dataset = DBGrid1->DataSource->DataSet;

    if (dataset->Active && !dataset->Eof)
    {
        // Obtener el valor del campo desde el dataset de la fila actual
        AnsiString valorCampo = dataset->FieldByName("nombre_campo")->AsString;
        ShowMessage("Valor del campo: " + valorCampo);
    }
}

3. Acceso mediante SelectedField y SelectedRows
Si deseas acceder al campo seleccionado en el DBGrid, puedes utilizar la propiedad SelectedField. Esto devuelve el campo de la columna actualmente seleccionada.

Ejemplo usando SelectedField:

void __fastcall TForm1::AccederCampoSeleccionado()
{
    TField *campoSeleccionado = DBGrid1->SelectedField;
    
    if (campoSeleccionado != NULL)
    {
        ShowMessage("Campo seleccionado: " + campoSeleccionado->FieldName + 
                    "\nValor: " + campoSeleccionado->AsString);
    }
    else
    {
        ShowMessage("No hay ningún campo seleccionado.");
    }
}

4. Acceso a un campo en una fila seleccionada usando SelectedRows
Si el DBGrid está en modo multiselección y deseas obtener datos de las filas seleccionadas, puedes iterar sobre las filas seleccionadas usando la propiedad SelectedRows.

Ejemplo accediendo a campos de varias filas seleccionadas:

void __fastcall TForm1::AccederCamposFilasSeleccionadas()
{
    TDataSet *dataset = DBGrid1->DataSource->DataSet;

    for (int i = 0; i < DBGrid1->SelectedRows->Count; i++)
    {
        // Ir a la fila seleccionada
        dataset->GotoBookmark(DBGrid1->SelectedRows->Items[i]);

        // Obtener el valor del campo en esa fila seleccionada
        AnsiString valorCampo = dataset->FieldByName("nombre_campo")->AsString;
        ShowMessage("Valor del campo en fila seleccionada: " + valorCampo);
    }
}

Resumen:
FieldByName(): Es la forma más común y directa de acceder a un campo por su nombre.
DBGrid1->SelectedField: Para acceder al campo seleccionado en la columna actual.
SelectedRows: Para acceder a campos de varias filas seleccionadas cuando el DBGrid está en modo multiselección.
Con estos métodos, puedes acceder a los campos de un registro en un DBGrid y manejar los datos según sea necesario.

[navbuoy]

En C++ Builder 6, el evento OnGetText sí existe para los objetos TField, pero no está disponible directamente en componentes como TQuery o TTable. Sin embargo, puedes usarlo a nivel de los campos individuales que forman parte del conjunto de datos.

El evento OnGetText se utiliza cuando necesitas personalizar la representación de un campo en un componente visual (por ejemplo, mostrar un formato especial o una conversión). Este evento es útil cuando necesitas modificar cómo se muestran los valores de un campo en controles como un DBGrid, sin modificar el valor subyacente en la base de datos.

Cómo utilizar el evento OnGetText en C++ Builder 6
Pasos para usar OnGetText:
Agrega los campos a tu conjunto de datos (ya sea un TQuery, TTable, o cualquier componente de acceso a datos). Esto puede hacerse de manera visual en tiempo de diseño o en código.

Asigna el evento OnGetText a los campos específicos.

Ejemplo paso a paso:
Crear los campos del conjunto de datos:

En el IDE de C++ Builder 6, selecciona tu componente TQuery o TTable.
Haz clic derecho en el componente y selecciona "Fields Editor".
En la ventana de Fields Editor, haz clic derecho y selecciona "Add all fields" para crear los campos asociados a las columnas de tu consulta.
Asignar el evento OnGetText:

Selecciona el campo en el Fields Editor.
En el inspector de objetos, localiza el evento OnGetText y haz doble clic para generar el manejador del evento.
Escribir el código en el manejador del evento OnGetText: En este manejador, puedes personalizar cómo se muestra el valor de este campo en los controles visuales.

Ejemplo de Código:
Imagina que tienes un campo numérico, pero quieres mostrarlo siempre con dos decimales en el DBGrid sin alterar su valor en la base de datos.

void __fastcall TForm1::Query1NUMEROGetText(TField *Sender, AnsiString &Text, bool DisplayText)
{
    if (!Sender->IsNull)
    {
        // Formatear el número con dos decimales
        Text = FormatFloat("0.00", Sender->AsFloat);
    }
    else
    {
        // Si el campo es NULL, mostramos un texto vacío
        Text = "";
    }

En este ejemplo, el evento OnGetText del campo NUMERO se encarga de formatear el valor del campo para que siempre se muestre con dos decimales, independientemente de cómo esté almacenado en la base de datos.

El nombre de la función generada para el evento OnGetText no necesariamente tiene que seguir el nombre del campo o consulta. De hecho, puedes usar cualquier nombre válido para el manejador del evento, como OnGetText, o puedes seguir la convención de nombrarlo más específicamente para saber a qué campo corresponde (por ejemplo, Query1NUMEROGetText).

El nombre TForm1::Query1NUMEROGetText en mi primer ejemplo fue solo una convención que hace referencia al campo NUMERO de la consulta Query1. Sin embargo, puedes cambiarlo por un nombre más general como TForm1::OnGetText, o cualquier otro nombre descriptivo.

Ejemplo corregido:
Si prefieres usar OnGetText como nombre del manejador, aquí tienes el código:

void __fastcall TForm1::OnGetText(TField *Sender, AnsiString &Text, bool DisplayText)
{
    if (!Sender->IsNull)
    {
        // Formatear el número con dos decimales
        Text = FormatFloat("0.00", Sender->AsFloat);
    }
    else
    {
        // Si el campo es NULL, mostramos un texto vacío
        Text = "";
    }
}

Luego, asignas este manejador al evento OnGetText del campo correspondiente:

En tiempo de diseño (usando el Fields Editor):

Haz doble clic en el evento OnGetText del campo deseado en el Inspector de Objetos, y selecciona OnGetText (o el nombre que hayas definido).
En tiempo de ejecución (si decides asignarlo manualmente):

void __fastcall TForm1::FormCreate(TObject *Sender)
{
    TFloatField *field = dynamic_cast<TFloatField*>(Query1->FieldByName("NUMERO"));
    
    if (field != NULL)
    {
        field->OnGetText = OnGetText;  // Asignando el manejador del evento
    }
}

Resumen:
El evento OnGetText está disponible a nivel de los campos individuales de un conjunto de datos.
Puedes usarlo para personalizar la manera en que se muestra el valor de un campo en un control visual sin alterar el valor real en la base de datos.
Necesitas definir los campos en el Fields Editor o en tiempo de ejecución para acceder a este evento.

[michal]

Problema solucionado!!!

Muchas gracias a todos por sus aportes

Un fuerte abrazo desde Cuba

[Casimiro Noteví]

Empezado por michal

Problema solucionado!!!
Muchas gracias a todos por sus aportes
Un fuerte abrazo desde Cuba

Pues estaría bien saber lo que has hecho

Nuestra guía de estilo alternativa (jocosa)

GUÍA ALTERNATIVA

1. No te preocupes por dónde colocar tus preguntas. A nosotros nos encanta abrir todos los mensajes sin importar en qué foro estén.
2. Ni pienses qué título ponerle a tu mensaje. "Tengo una duda" es suficiente para que nosostros entendamos que estás en problemas.
3. Cuando te aparezca un mensaje de error, no te molestes en decirnos cuál es. Nos encanta tratar de adivinar.
4. Cuando publiques código no te preocupes porque quede bien presentado. Nosotros distinguimos perfectamente los bloques sin necesidad de ninguna indentación.
5. Si tienes un problema con bases de datos no es necesario que nos digas qué motor usas, nosotros sabemos la respuesta para cualquiera de ellos.
6. Si no se entiende lo que preguntas, ni te molestes en aclarar. Nos fascinan los misterios.
7. No te esfuerces en oprimir F1. Nosotros ya lo hemos hecho y podemos darte la respuesta más rápido.
8. La opción de búsqueda en los foros sólo está para adornar la página. Es divertidísimo contestar una y otra vez lo mismo.
9. ¿Google? Eso es para nerds como nosotros.
10. Ante un problema, no te molestes en tratar de entenderlo. Nosotros ya nos hemos quemado las pestañas por ti y estamos felices de escribirte el código.
11. Si te plase, eskribe con kas y faltas de hortografia. Komo nosotros no entramos a los chats nos hencanta pensar ke estamos en 1.
12. Si en cinco minutos nadie te ha contestado, siéntete en libertad de abrir cuantos hilos puedas para preguntar lo mismo. Tú no mereces ese trato.
13. Nunca des las gracias. Nos encanta responder sin más aliciente que ver nuestro nombre escrito.
14. Cuando escribas un mensaje, siéntete en libertad de no volver en tres semanas. Nosotros estaremos aquí resolviendo tu problema.
15. Si eres nuevo, acláralo desde el principio. Con eso basta para que nosotros resolvamos tu problema. Tú aún no puedes consultar la ayuda.
16. Si alguien te remite a la guía de estilo, no te molestes en leerla. Tú tienes cosas más importantes que hacer y a fin de cuentas, nadie la lee.
17. Si encuentras la solución tú mismo, no te molestes en explicarla. Bastará con un "Ya lo resolví, gracias". Nos emociona ver gente autosuficiente.
18. No dudes en pedir que te envíen la solución a tu correo. El foro está sólo para los ociosos y tú no tienes tiempo que perder.

[michal]

Hola otra vez.

Disculpen pero tuve problemas de conexión estos dias.
Pronto subiré lo que he hecho.

Quisiera saber si es posible acceder al evento OnGetText de un campo de una tabla o consulta de manera dinámica, es que mi base de datos SQlite3 debe cambiar cada año.

Ya había dicho que logré decodificar los textos UTF8 accediendo al evento OnGetText de esta manera

Código Delphi [-]
Text= UTF8Decode(Sender->AsString); y funcionó ok,  para todos mis data-awares(DBGrids, etc..)

Saludos