FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
Herramientas | Buscar en Tema | Desplegado |
#1
|
|||
|
|||
Pregunta sobrelistbox
Tengo en un listbox un item mixto es decir por ejmplo JUAN 45, y quiero sumar un numero cualquiera con el numero 45 que puse de ejemplo, como se haria para extraer el numero 45 en un edit o algo por el estilo...????
|
#2
|
|||
|
|||
mas conciso: como haria para extraer de un item mixto de un listbox el numero, por ejemplo teniendo en el item juan 45, extraerlo en un edit o cualquier cosa???
|
#3
|
||||
|
||||
Hola moise094 y bienvenido a Club Delphi
Como a todos los que se inician te invitamos a que leas nuestra guía de estilo. Una opción puede ser:
Ejemplo de uso:
Saludos.
__________________
Daniel Didriksen Guía de estilo - Uso de las etiquetas - La otra guía de estilo .... Última edición por ecfisa fecha: 23-04-2012 a las 21:17:27. |
#4
|
||||
|
||||
Hola moise094, otra opción, si el número va a estar siempre al final separado por un espacio, podemos utilizar las funciones Pos y Copy.
en el caso de que haya mas espacios, primero encontramos el ultimo espacio para hacer el copy. Saluditos
__________________
Disfruten cada minuto de su vida a lado de sus seres queridos como si fuese el ultimo, uno nunca sabe lo que puede pasar. |
#5
|
|||
|
|||
esa function de extraer numero la pongo en la parte private o public de la unidad del form???
|
#6
|
|||
|
|||
El caso es el siguiente, voy a abrir un documento .txt en un listbox y este tiene:
JUAN 45 JOSE 56 y quiero que al abrir el archivo, me aparezca en un edit cualquiera el numero 45 es decir el listbox va siempre a tener varios items... |
#7
|
||||
|
||||
Cita:
Cualquiera de las funciones (la de Caro o la que te puse) van a realizar la tarea. Pero si el número siempre está al final y existe al menos un espacio entre nombre y número, es mejor que utilices la que te propuso Caro. Saludos.
__________________
Daniel Didriksen Guía de estilo - Uso de las etiquetas - La otra guía de estilo .... Última edición por ecfisa fecha: 23-04-2012 a las 21:45:55. |
#8
|
||||
|
||||
Cita:
O dependiendo de lo que desees, también podrías hacer: Siendo el código de la función ExtraerNum el que elijas. Saludos.
__________________
Daniel Didriksen Guía de estilo - Uso de las etiquetas - La otra guía de estilo .... |
#9
|
||||
|
||||
Cita:
Saluditos
__________________
Disfruten cada minuto de su vida a lado de sus seres queridos como si fuese el ultimo, uno nunca sabe lo que puede pasar. |
#10
|
|||
|
|||
Muchas gracias ya pude extraer el numero,
AHORA LO QUE PASA ES ESTO se extrajo el numero pero al sumarlo con el numero que voy a meter no me suma sino que hace esto: 1+45=145 |
#11
|
||||
|
||||
Cita:
Saluditos
__________________
Disfruten cada minuto de su vida a lado de sus seres queridos como si fuese el ultimo, uno nunca sabe lo que puede pasar. |
#12
|
|||
|
|||
Me sigue pasando lo mismo, sigue sumando 1+45=145
|
#13
|
||||
|
||||
Muestranos el codigo que estas utilizando, porque lo que estas haciendo es concatenar los dos numeros.
Saluditos
__________________
Disfruten cada minuto de su vida a lado de sus seres queridos como si fuese el ultimo, uno nunca sabe lo que puede pasar. |
#14
|
|||
|
|||
primero que todo puse el codigo de ecfisa
function TForm3.ExtraerNum(cad:string): string; var i: Integer; begin i:=0; while not (cad[i] in ['0'..'9']) do Inc(i); repeat Result:= Result + cad[i]; Inc(i); until not (cad[i] in ['0'..'9']); end; Luego pongo var Numero : Integer; begin Numero:=StrToInt(ExtraerNum(Listbox1.Items[1])); Edit1.text:=IntToStr(Numero); end; Despues como quiero que lo sume con un numero que meto en un edit, y pongo Listbox1.Items.add('Ventas: '+(Intttostr(va.sumaing))+(Edit6.Text)); |
#15
|
|||
|
|||
puse el codigo de ecfisa por que fue el que me dejo apenas el numero, que es lo que queria
|
#16
|
||||
|
||||
Recuerda poner los tags al código fuente, ejemplo:
__________________
La otra guía de estilo | Búsquedas avanzadas | Etiquetas para código | Colabora mediante Paypal |
#17
|
||||
|
||||
Hola, es lo que te decía estas concatenando, prueba así:
Saluditos
__________________
Disfruten cada minuto de su vida a lado de sus seres queridos como si fuese el ultimo, uno nunca sabe lo que puede pasar. |
#18
|
||||
|
||||
Cita:
La función te devuelve una cadena de caracteres, como por ejemplo '32', que de ningún modo es lo mismo que el número 32. Por ejemplo: No esperes ver en el edit el número 95, lo que verás es '1580' que resulta de concatenar '15' y '80'. Para poder obtener el número 95 tenes que realizar las conversiones correspondientes tál como te indica Caro. Retomando el ejemplo que te puse arriba, para obtener 15+80 sería:
Saludos. Edito: Si no le gustan los nombres... Escucho sugerencias
__________________
Daniel Didriksen Guía de estilo - Uso de las etiquetas - La otra guía de estilo .... Última edición por ecfisa fecha: 24-04-2012 a las 00:03:31. |
#19
|
|||
|
|||
Muchas gracias a todos, Dios me los bendiga, cualquier otra pregunta del tema, se las estare informando...
|
#20
|
||||
|
||||
Hola ecfisa, el de Robustiana me gusta , el otro podría ser Saturnino o también Casimiro .
Saluditos
__________________
Disfruten cada minuto de su vida a lado de sus seres queridos como si fuese el ultimo, uno nunca sabe lo que puede pasar. |
|
|
Temas Similares | ||||
Tema | Autor | Foro | Respuestas | Último mensaje |
La pregunta | jcarteagaf | Humor | 2 | 09-02-2010 22:23:34 |
Una pregunta de msn | Arcioneo | Windows | 4 | 13-07-2006 17:11:16 |
Pregunta | Isaac | JAVA | 1 | 23-09-2004 13:28:02 |
Pregunta | Jesus Armando | DB2 | 4 | 30-12-2003 04:27:23 |
Pregunta | edwin1 | OOP | 0 | 23-07-2003 15:26:54 |
|