Ver Mensaje Individual
  #1  
Antiguo 27-06-2004
Avatar de Reyhert
Reyhert Reyhert is offline
Registrado
 
Registrado: jun 2004
Posts: 1
Reputación: 0
Reyhert Va por buen camino
Question Pasar valores a una variable tipo const

Hola a todos los programadores Delphi del Foro...

Les tengo una pregunta:

Como puedo hacer para darle un valor a una variable y no modificarlo mas en todo el programa, seria como una constante pero sin saber cual es el valor inicial en un primer momento.

Código:
En un RichEdit, cuando se ingresa un caracter determinado, quiero almacenar su valor de posicion en el texto.

Yo hice una cosa como esta...

var 
   Valor: Integer;    // Posicion en el texto
   Longitud: Integer; // Cantidad total de caracteres
   Caracter: String;  // El caracter

Begin
   
   Valor := 0; // Inicializo la variable

   Caracter := RichEdit1.Text[Longitud]; // Ultimo caracter introducido

   // Ahora comparo el caracter introducido, con el que estoy buscando, 
   // para poder guardar su posicion en el texto.
   
   If Caracter = '{' Then
      Valor := Longitud; // Guardo la posicion

   ...
El codigo funciona bien, guarda el valor de la posicion, pero cuando ingreso otra letra, el valor buelve a 0.
Cual puede ser el error que estoy cometiendo, y como podria hacer para dar el valor a una variable y no modificarlo despues.

De antemano muchas gracias a todos.

Salu2.
Responder Con Cita