Título: obtener longitud de una cadena sin LEN Publicado por: x64core en 5 Septiembre 2011, 03:44 am buenas tengo una duda señores
tengo este codigo: Código
bien todo eso esta bien no ;D mi duda es como puedo saber la longitud de una X cadena sin usar la funcion len? es posible eso? :P ya que si uno no sabe cual es la longitud de una cadena ( el utlimo caracter ) no puedo saber hasta donde es el final de los caracteres de la cadena :P bueno se le agradece ;D Título: Re: obtener longitud de una cadena sin LEN Publicado por: BlackZeroX en 5 Septiembre 2011, 08:14 am los strings en vb6 guardar antes del 1er caracter su longitud... es decir:
len() es equivale a leer la direccion en strptr(VariableString) - &H4 Dulces Lunas!¡. Título: Re: obtener longitud de una cadena sin LEN Publicado por: x64core en 5 Septiembre 2011, 17:36 pm si lo ce tio el strptr me devuelve el puntero al primer caracter por eso tengo esa duda
si digamos en un bucle quiero obtener todos los caracteres Código bien con ese codigo creo que recorro cada uno de los caracteres pero como puedes ver necesito la longitud de la cadena porque sino el bucle se ejecutaria infinitamente o se saliera de la longitud de la cadena :P es por eso que necesito saber la longitud, yo ce que puedo obtenerla con LEN pero existe otra forma? :P gracias ;D Título: Re: obtener longitud de una cadena sin LEN Publicado por: raul338 en 5 Septiembre 2011, 19:08 pm Si, hasta que el carcater sea 0, o usa strLenA o strLenW :P
Título: Re: obtener longitud de una cadena sin LEN Publicado por: BlackZeroX en 5 Septiembre 2011, 19:22 pm mmm aqui te dejo el codigo que mas o menos te daba a entender anteriormente... igual puedes usar strLenW hay una variante llamada strLenA esa no te va a servir de mucho...
Código
Y espero no equivocarme pero tambien se puede con readProcessMemory o igual RTLCopyMemory debes buscar 2 bytes nulos... esos indican el final de la cadena casi = que el Ansi donde es solo 1 Bytes Nulo el que indica el final... Dulces Lunas!¡. Título: Re: obtener longitud de una cadena sin LEN Publicado por: x64core en 6 Septiembre 2011, 04:27 am sale gracias no se me habia ocurrido eso de si es NULL ;D
@BlackZeroX hey tio me puedes explicar la primera alternativa :P casi noentiendo :P bueno mi logica me dice esto: :xD en la llamada a ala rtlmovememory, en el segundo parametro usas la funcion varptr() con esa funcion se obtiene la direccion del cadena de bufer completa no? a diferencia de la strptr que devuelve la direccion del primer caracter a la cadena no? :P en tonces si obtienes la direccion del bufer veo que pasas la direccion a la direccion de una variable :P mi logica me dice que haces una asignacion de direccion :P , no entiendo :P es como esto: A* = B* ( en C++ quiza me se explicar mejor :P ) y pues arriba escribes simulacion de strptr :P Título: Re: obtener longitud de una cadena sin LEN Publicado por: BlackZeroX en 6 Septiembre 2011, 08:11 am .
Me ire un poco a algo mas interno en vb6, esperando no confundir a nadie... para que comprendan un poco mas la estructra de las variables en VB6 y por ende comprener algunos aspecto y entender unos trucos avanzados con respecto a velocidad en vb6. Definicion Basica Fundamental. Puntero o Apuntador: Es una variable que contiene la dirrecion de otra variable. Guiandome en esta DEFINICION que es irrefutable puedo AFIRMAR y SUSTENTAR LO SIGUIENTE. Cuando declaras una variable tipo String, Array del tipo que sea y ademas NO TIENE UNA LONGITUD FIJA, se pueden y deben considerarse como APUNTADORES, en vb6 NO HAY PUNTEROS DE MANEJO LIBRE es decir que no podemos declarar y modificar a gusto los punteros de manera deliberada como en C/C++ PERO SE PUEDEN SIMULAR asiendo algunas cosillas, aun asi no le quitara el hecho de que es CUTRE pero FUNCIONAL y es mas puede acercarse un poco a la velocidad de C/C++ pero no la igualara ni superara en ningun momento. En el caso de C/C++ con respecto a los APUNTADORES que solo le pones el "*" y obtienes el contenido de donde apunte, en VB6 DEBES usar RtlMoveMemory para SIMULAR LA RUTINA DE C/C++ (*) respecto a un APUNTADOR. En C seria... algo asi no llendo a mas lios... Código
En VB6 se hace asi para SIMULAR lo anterior para saltarnos la restriccion que nos pone vb6. Código
Caso omiso cuando se declara. Código
La variable "a" no apunta a ningun lugar, ya que su memoria ya esta asignada y es CONSTANTE (Su longitud) En resumen en C/C++ para obtener la longitud de una cadena en VB6 debes hacer esto: Código
Ejemplo y codigo en C (dll) + vb6 <click aquí> (http://infrangelux.sytes.net/filex/index.php?dir=/BlackZeroX/Programacion/vb6/Retos/isnumeric), Recomendacion Comilador Codeblocks. En vb6 SIN USAR LEN, LENB, Apis o similares... Código
Nota: Duando se declara una variable tipo Array sea cual sea en lugar de apuntar a su primer indice, realmente apunta a su Estructura SafeArray y en esta su miembro pvData apunta a su primer elemento... cabe destacar que si es un array String quiere decir que su elemento al que apunta pvData seran apuntadores ya que no tienen una longitud Definida. Temibles Lunas!¡. Título: Re: obtener longitud de una cadena sin LEN Publicado por: x64core en 6 Septiembre 2011, 19:17 pm buenas ;D bueno primeramente tio gracias por tomarte el tiempo por explicar ya estoy estudiando bien detallado tu expicacion ahora tengo una duda :P noce si te falto escribir el "byval" en el uso de la API :P
aparte que teste los codigos y no me paso lo que habia en las variables :P o me equivoco y RtlMoveMemory pasa ya con Byval? :P a diferencia de CopyMemory como te escribi en MP no encontre la declaracion de RtlMemory :P o es la misma con CopyMemory y en la declaracion escribes RtlMoveMemory... :P Título: Re: obtener longitud de una cadena sin LEN Publicado por: BlackZeroX en 6 Septiembre 2011, 19:37 pm @Raul100
Para que la buscas en google si ya te la deje aqui dicha declaracion API unos post mas arribita, y si es la misma solo que el alias o nombre de la funcion REAL es RtlMoveMemory pero se conoce mas comunmente como CopyMemory... El byval si se pone en los parametros de la declaracion API entonces PUDE no escribirse en las llamadas, de lo contrario si no esta el byval en algun parametro de la declaracion API tendria que declararse byval si no se quiere pasar una variable por referencia, ten en cienta que si no se escribe byval se toma como referencia cada parametro. Un ejemplo MUY ENTENDIBLE y aplicable a las APIS... Código
Nota: Cuando es una funcion/proceso hecho en vb6 como los del ejemplo anterior no se deberia poner byval en las llamadas, solo es valido para APIS. Dulces Lunas!¡. Título: Re: obtener longitud de una cadena sin LEN Publicado por: x64core en 7 Septiembre 2011, 00:59 am :D ya entendi todo :D gracias tio (Y)
perdon por casi explicarlo con manzanas :xD Título: Re: obtener longitud de una cadena sin LEN Publicado por: LeandroA en 7 Septiembre 2011, 11:37 am Hola otra opcion con apis
Código: Option Explicit EDIT: ahora que recuerdo si dentro de la cadena tenes un Nullchar chr(0) solo te cuenta hasta esa posición Título: Re: obtener longitud de una cadena sin LEN Publicado por: Psyke1 en 10 Septiembre 2011, 02:24 am La forma más rápida que sé de hacerlo es esta:
Código
La función LenB() te devuelve la longitud en Bytes de una cadena, después dividimos entre dos y ya está. :rolleyes: Los test que hice cuando programaba me dieron esta conclusión en cuanto a rapidez se refiere: Código: Lenb\2 > Len() > lstrlenW() @BlackZeroX▓▓▒▒░░: Dios mío, había olvidado la dedicación que pones en tus explicaciones. :D DoEvents! :P |