Portal    Foro    Buscar    FAQ    Registrarse    Conectarse


Publicar nuevo tema  Responder al tema 
Página 1 de 1
 
 
Busqueda Simple Un Textbox Dentro De Un Textarea Actualizado Mejoras
Autor Mensaje
Responder citando   Descargar mensaje  
Mensaje Busqueda Simple Un Textbox Dentro De Un Textarea Actualizado Mejoras 
 
buenas noche amigos gamberos le traigo mas codigo util creo jajaja

bueno esta ves le traigo algo simple que es
buscar un textbox dentro de un textarea es fácil
lo hice por si alguien no sabe como se hace

bueno como norma
Ubuntu 9.10
gambas 2.13
Gnome
por defectos

bueno creo que todo me puede correguir

aja lo que interesa "codigo"

PUBLIC a AS Integer

PUBLIC SUB Button1_Click()

bus

END

PUBLIC SUB Button2_Click()

  bus(a + 1)

END

PUBLIC SUB bus(OPTIONAL bs AS Integer)

DIM b AS String
DIM p AS Integer
b = TextBox1.Text
  IF Len(b) THEN
    a = 0
    a = InStr(TextArea1.Text, b, bs + 1)
    IF a > 0 THEN
      TextArea1.Select(a - 1, Len(b))
      TextArea1.SetFocus
    ELSE
      Message.Info("No hay mas")
    ENDIF
  ENDIF
  
END


puede comentar con confianza

******* mejora creo    ******
buscar mientas escribes tipo firefox

'
gambas class file
PUBLIC a AS Integer

PUBLIC SUB Button1_Click()

bus

END

PUBLIC SUB Button2_Click()

  bus(a + 1)

END

PUBLIC SUB bus(OPTIONAL bs AS Integer)

DIM b AS String
DIM p AS Integer
b = TextBox1.Text
  IF Len(b) THEN
    a = 0
    a = InStr(TextArea1.Text, b, bs + 1)
    IF a > 0 THEN
      TextArea1.Select(a - 1, Len(b))
    ELSE
      Message.Info("No hay mas")
    ENDIF
  ENDIF
  
END

PUBLIC SUB TextBox1_Change()

  bus

END

 



 
última edición por alexprox el Sabado, 06 Marzo 2010, 06:15; editado 2 veces 
alexprox - Ver perfil del usuarioEnviar mensaje privadoVisitar sitio web del usuario 
Volver arribaPágina inferior
Responder citando   Descargar mensaje  
Mensaje Re: Busqueda Simple Un Textbox Dentro De Un Textarea 
 
Me sirvió mucho, sobre todo para mi pequeño editor hecho para "lo que yo quiero"
Saludos!
 



 
 
Volver arribaPágina inferior
Mostrar mensajes anteriores:    
 
Ocultar¡Este tema fue útil?

 

Elegir valoración:                       

Media de valoración Valoración mínima Valoración máxima Número de valoraciones
0.00 0 0 0
 

Publicar nuevo tema  Responder al tema  Página 1 de 1
 

Usuarios navegando en este tema: 0 registrados, 0 ocultos y 1 invitado
Usuarios registrados conectados: Ninguno


 
Lista de permisos
No puede crear mensajes
No puede responder temas
No puede editar sus mensajes
No puede borrar sus mensajes
No puede votar en encuestas
No puede adjuntar archivos
No puede descargar archivos
No puede publicar eventos en el calendario