FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
Herramientas | Buscar en Tema | Desplegado |
#1
|
|||
|
|||
Llamar una fución(parametros)
Buenas, lo que pasa es que tengo un problema desde ayer, hice una función para buscar en un memo, esta bien y todo, pero no se como llamarla, hace muy poco empece en delphi y pues estoy buscando a ver....
Esta es la funcion: Cita:
Cita:
Cita:
Última edición por Stevenmn fecha: 07-08-2007 a las 22:11:32. |
#2
|
||||
|
||||
Pues estan mal declaradas las variables para comenzar, seria bueno si nos contaras que tipo de resultado debe devolver la funcion, booleano??
__________________
...Yo naci en esta ribera del arauca vibr@d0r Soy hermano de la espuma, de la garza, de la rosa y del sol... Viva Venezuela |
#4
|
|||
|
|||
Cita:
Cita:
No puede estar en cero o que ? 1 es para inicializarla ? |
#5
|
||||
|
||||
Te explico cuando trabajas con funciones y procedimientos debes separar los parametros de las variables, en tu caso tienes tres variables y ningun parametro por lo que deberia quedar algo asi
ahora te puedo ayudar a estructurar mejor tu funcion pero dime que esperas de resultado de ella, que te devuelva el string que consiguio o un simple verdadero en caso de haberlo encontrado, porq segun tu codigo no se devuelve nada, en ese caso te convendria un procedimiento pero todos son conjeturas hasta que nos explique mejor loq ue necesitas
__________________
...Yo naci en esta ribera del arauca vibr@d0r Soy hermano de la espuma, de la garza, de la rosa y del sol... Viva Venezuela |
#6
|
|||
|
|||
Bueno lo que quiero hacer es un tipo de busqueda estilo bloc de notas, osea la string que le de en el inputquery la busque en el memo, si la encuentra empiece desde el valor de posicion, obtenga la longitud de la cadena y luego le de el focus a ella, para asi quedar señalada la palabra encontrada.
Fuciona bien. Ahora estoy es tratando de hacer la "busqueda siguiente", pero como esto ya lo habia hecho en vb, pues ya se como podria, el problema en si era lo de los parametros dela funcion. ------ aaa y por lo de la funcion la hice asi por este documento del guille http://www.elguille.info/delphi/apun...ntesDelphi.htm Cita:
Última edición por Stevenmn fecha: 07-08-2007 a las 22:52:27. |
#7
|
|||
|
|||
Cita:
Salud OS
__________________
"La forma de empezar es dejar de hablar y empezar a hacerlo." - Walt Disney |
#8
|
||||
|
||||
Pues esta muy bien que te hayas documentado es bueno aprender las cosas por esfuerzo propio, pero lo que te decia es una forma mas adecuada de realizar las cosas, y te explicaba cosas que quizas no has visto, pues tienes las dos opciones tu escojes cual se adapte mas a tus necesidades
me alegra qe hayas podido resolver el problema
__________________
...Yo naci en esta ribera del arauca vibr@d0r Soy hermano de la espuma, de la garza, de la rosa y del sol... Viva Venezuela |
#9
|
|||
|
|||
a listo gracias,
lo que no he podido hacer la busqueda siguiente intento pornerle +1 al llamarla, pero nada. ------------------------------- Otra cosa en que evento se encargar de el texto seleccionado por ejemplo: Tengo en un mainmenu el boto copiar, pero cuando no este nada seleccionado quiero que dessactivado, al igual queel bloc de notas de win, en algun onmouse o el onchage o ke.... voy viendo.... Última edición por Stevenmn fecha: 08-08-2007 a las 00:22:40. |
#10
|
||||
|
||||
aclareme algo, la busqueda funciono o no??
si no funciona prueba esto:
__________________
...Yo naci en esta ribera del arauca vibr@d0r Soy hermano de la espuma, de la garza, de la rosa y del sol... Viva Venezuela |
#11
|
||||
|
||||
No habia visto bien lo que habias escrito,
Cita:
Para buscar
Para buscar el siguiente
Cabe destacar que debes tener esta variables en las globales
cualquier duda avisas
__________________
...Yo naci en esta ribera del arauca vibr@d0r Soy hermano de la espuma, de la garza, de la rosa y del sol... Viva Venezuela |
#12
|
|||
|
|||
muchas gracias por el code, sino consigo hacerla como quiero pues usare esa forma, lo que pasa es que lo quiero hacer de esta forma
http://www.recursosvisualbasic.com.a...ico5.htm#instr Código:
Option Explicit Private m_Pos As Integer Sub buscar_cadena(ByVal Posicion As Integer) Dim p As Integer, Frase As String Frase = txt_Buscar p = InStr(Posicion, Text1, Frase) If p > 0 Then m_Pos = p With Text1 .SelStart = m_Pos - 1 .SelLength = Len(Frase) .SetFocus End With Else MsgBox "No se encontró la frase", vbInformation Text1.SetFocus End If End Sub Private Sub Command1_Click() Call buscar_cadena(1) End Sub Private Sub Command2_Click() Call buscar_cadena(m_Pos + 1) End Sub El problema que creo que es, es que la funcion POS de delphi no requiere una posicion, en cambio la instr si, no habra otra ?? ^^ Última edición por Stevenmn fecha: 08-08-2007 a las 19:07:24. |
|
|
Temas Similares | ||||
Tema | Autor | Foro | Respuestas | Último mensaje |
Llamar a un .exe msdos con parametros | lroblesco | Varios | 5 | 29-05-2011 05:53:27 |
Parametros Opcionales no Parametros por defecto | Velia | Varios | 7 | 19-08-2006 15:18:42 |
Llamar exe de fox | kvtm | Varios | 2 | 14-08-2006 01:34:08 |
Llamar Dll | mcarazas | Varios | 0 | 06-07-2006 01:18:28 |
Llamar un flash con parámetros | Alexander | Varios | 0 | 13-06-2005 22:44:10 |
|