FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
Herramientas | Buscar en Tema | Desplegado |
#1
|
|||
|
|||
Seleccionar parte de una cadena
Hola a todos.
Necesito selecionar parte de una cadena de texto proveniente de un edit. Se trata de un codigo de 8 digitos, y necesito seleccionar los dos primeros y los que hacen 3y4 es decir: 12345678 y necesito sacar por un lado 12 y por otro 34 Os agradeceria que me ayudarais Muchas gracias por anticipado. |
#2
|
|||
|
|||
Pues una posible idea sería meter todos los digitos que introduzcas en un array; es decir, cada vez k metes uno lo copias en el array y vas sumando 1 al indice(para asi pasar al siguiente registro).....y lo podrías hacer desde el metodo OnKeyPress del edit.
|
#3
|
|||
|
|||
No existe un método??
Muchas gracias yomis, pero me suena que existe un método que selecciona parte de una cadena, que selecciona o por la derecha o por la izquierda, pero es que ahora mismo no recuerdo. A ver si alguien lo sabe.
Muchas gracias otra vez, sino es una buena opción. Un saludo |
#4
|
|||
|
|||
Pues ahora no caigo en si hay o no esa funcion :S asi que te digo otra forma.xDD
A ver, copias la cadena edit en una variable de tipo String y como sabes que quieres los 4 primeros caracteres de dicha cadena podrias poner algo asi: Código:
//declaras digitos y contador como globales procedure TForm1.Button1Click(Sender: TObject); var dos, tres: string; begin digitos := edit1.Text; dos := digitos[1] + digitos[2]; //2 primeros caracteres ShowMessage(dos); tres := digitos[3] + digitos[4]; //3º y 4º ShowMessage(tres); end; procedure TForm1.Edit1Change(Sender: TObject); begin contador := contador + 1; if (contador = 8) then button1.Enabled := true; end; procedure TForm1.FormActivate(Sender: TObject); begin contador := 0; end; No se si es lo k kerias :P pero es lo k entendi.xDDD Última edición por Yomis fecha: 28-04-2005 a las 11:32:16. |
#5
|
||||
|
||||
Cita:
deberías hacer alguna comprobación con la longitud del string por ejemplo, para evitar sorpresas...
__________________
Germán Estévez => Web/Blog Guía de estilo, Guía alternativa Utiliza TAG's en tus mensajes. Contactar con el Clubdelphi P.D: Más tiempo dedicado a la pregunta=Mejores respuestas. |
#6
|
|||
|
|||
Cita:
|
|
|
|