• Viernes 8 de Noviembre de 2024, 04:55

Autor Tema:  Showmessage  (Leído 1438 veces)

saulillo

  • Miembro activo
  • **
  • Mensajes: 32
    • Ver Perfil
Showmessage
« en: Jueves 17 de Enero de 2008, 17:15 »
0
Hola amigos, en mi programa he puesto varios ShowMessage para asegurarme de q va bien. Tengo el siguiente codigo:

Código: Text
  1.  
  2.    int aux1, premio;
  3.    AnsiString recoran, nuval;
  4.    float min, max;
  5.    recoran = Form3->recoran;
  6.    min = Form3->min;
  7.    max = Form3->max;
  8.    nuval = Form3->nuval;
  9.  
  10.    for(aux1=0; aux1<ncolum; aux1++)
  11.    {
  12.         ShowMessage ("StringGrid[aux1][0]: " +StringGrid1->Cells[aux1][0]);
  13.         if(StringGrid1->Cells[aux1][0] == recoran)
  14.         {
  15.            ShowMessage ("recoran: " +recoran);
  16.            ShowMessage ("aux1: " +aux1);
  17.            //aux1++;
  18.            premio = aux1;
  19.         }
  20.    }
  21.    ShowMessage("Premio: " +premio);
  22.  
  23.  

El problema esta aqui
ShowMessage ("aux1: " +aux1);  este solo muestra 1: nada mas, ni aux1:, ni el valor de aux1. elimina los 3 primeros caracteres.

ShowMessage("Premio: " +premio); este solo muestra mio: igual q antes, lo q está entre "" menos los 3 primeros caracteres.

No se si tiene algo que ver o no, pero el valor de aux1 sé que es 3, y si descomento la linea comentada (incrementar el valor de aux1), en el showmessage del premio solo muestra io:, es decir elimina los 4 primeros caracteres.

Un saludo y Gracias de antemano.

weps84

  • Miembro MUY activo
  • ***
  • Mensajes: 138
    • Ver Perfil
Re: Showmessage
« Respuesta #1 en: Viernes 18 de Enero de 2008, 23:37 »
0
ShowMessage ("recoran: " +recoran);
ShowMessage ("aux1: " +aux1);

Cambialo por esto

ShowMessage ("recoran: " +AnsiString(recoran));
ShowMessage ("aux1: " +AnsiString(aux1));

espero te sirva

saulillo

  • Miembro activo
  • **
  • Mensajes: 32
    • Ver Perfil
Re: Showmessage
« Respuesta #2 en: Domingo 20 de Enero de 2008, 19:54 »
0
Desconozco el motivo, el caso es q funciona.

Muchas Gracias.