Programación General > Delphi

 leer TEdit

(1/1)

zany_666:
tengo un TEdit al que he llamado edit1 (que poco original XD). En el solo escribo un numero que quiero que lea. Lo he hecho de esta forma:

numero:=edit1.Text; {Para que me guarde en la variable numero lo que he puesto en edit1}

es correcto?¿?

Y una cosa mas, hay algun equivalente en delphi (o algo parecido) al writeln de Pascal?¿?

Saludetes!  :hola:

DriverOp:

--- Cita de: "zany_666" ---tengo un TEdit al que he llamado edit1 (que poco original XD). En el solo escribo un numero que quiero que lea. Lo he hecho de esta forma:

numero:=edit1.Text; {Para que me guarde en la variable numero lo que he puesto en edit1}

es correcto?¿?
--- Fin de la cita ---
Todo bien pero ¿de qué tipo es "numero"?, porque si es string, está bien, pero si es integer entonces no, tienes que hacer una conversión de tipo pero antes debes asegurarte que Edti1.Text contiene un string que pueda ser convertido a integer:


--- Código: Delphi --- var  numero: integer;begin...trynumero:=StrToInt(Edit1.Text);except  ShowMessage(Edit1.Text+" no es un número.");end; // try...end;  
Alternativamente en vez de usar un TEdit común puedes usar un Edit "especializado" que solo acepte números. Una de las ventajas de Delphi es que puedes hacer tus propios componentes (o agregar hechos por otros) derivados de los ya existentes, si es que sabes programación orientada a objetos eso se llama "derivar una clase de otra". De hecho en mi página personal tengo un derivado de TEdit, el TEditReal, que hace exactamente eso, solo acepta números (enteros o reales) que puedes descargar y agregar a la paleta de componentes de Delphi.


--- Citar ---Y una cosa mas, hay algun equivalente en delphi (o algo parecido) al writeln de Pascal?¿?
--- Fin de la cita ---
Sí y no.
Sí porque existe ese procedimiento en Delphi, no porque solo sirve para escribir en archivos de texto (tipos TextFile). Si quieres mostrar un mensaje rápido usa ShowMessage() como en el código de ejemplo que puse más arriba.

Saludos.

Navegación

[0] Índice de Mensajes