Mensajes: 474
Temas: 112
Gracias Recibidas: 19 en 18 posts
Gracias Dadas: 108
Registro en: Jul 2020
(01-11-2020, 17:02)guizans escribió: Esto es válido. El problema que encontré es precisamente con los caracteres especiales como las tildes, las eñes, etcétera, que no las imprime. No se el motivo.
Creo que tu duda la he resuelto en:
https://gambas-es.org/showthread.php?tid=167
Mensajes: 278
Temas: 27
Gracias Recibidas: 42 en 33 posts
Gracias Dadas: 8
Registro en: Jul 2020
(01-11-2020, 15:44)gambafeliz escribió: vuott, siento decirte que tu código fallaría en cuanto pase algún ascii basado en un carácter no especificado por mi regla expuesta que es ("á", "é", "í", "ó", "ú", " ") supongo que te habrás dado cuenta ya.
Puedes hacer un ejemplo ?
"Los horizontes perdidos nunca regresan. " (F. Battiato, La stagione dell'amore, 1983)
"Las ondas nunca regresan. " (Genesis: Ripples - A trick of the tail, 1976)
Mensajes: 474
Temas: 112
Gracias Recibidas: 19 en 18 posts
Gracias Dadas: 108
Registro en: Jul 2020
02-11-2020, 10:51
(Última modificación: 02-11-2020, 21:39 por
gambafeliz.)
(02-11-2020, 00:20)vuott escribió: (01-11-2020, 15:44)gambafeliz escribió: vuott, siento decirte que tu código fallaría en cuanto pase algún ascii basado en un carácter no especificado por mi regla expuesta que es ("á", "é", "í", "ó", "ú", " ") supongo que te habrás dado cuenta ya.
Puedes hacer un ejemplo ?
vuott, tienes razón, tu código funciona de las mil maravillas. Por favor, te pido humildemente disculpas. Osado de mi
Un amigo
Mensajes: 474
Temas: 112
Gracias Recibidas: 19 en 18 posts
Gracias Dadas: 108
Registro en: Jul 2020
02-11-2020, 21:33
(Última modificación: 02-11-2020, 21:34 por
gambafeliz.)
Esto es lo máximo que he podido compactar el código para hacer lo que pido:
GAMBAS
For Each sCadena
As String In ["Fecha de compras",
"Descripción",
"Año de Investigación",
"Fecha creación"]
Mensajes: 278
Temas: 27
Gracias Recibidas: 42 en 33 posts
Gracias Dadas: 8
Registro en: Jul 2020
Mi código tiene en cuenta el modo de composición de los caracteres extra-alfabeto anglosajón.
"Los horizontes perdidos nunca regresan. " (F. Battiato, La stagione dell'amore, 1983)
"Las ondas nunca regresan. " (Genesis: Ripples - A trick of the tail, 1976)
Mensajes: 474
Temas: 112
Gracias Recibidas: 19 en 18 posts
Gracias Dadas: 108
Registro en: Jul 2020
02-11-2020, 21:37
(Última modificación: 02-11-2020, 21:38 por
gambafeliz.)
Tu código vuott es la leche, me gusta, lo que pasa es que yo quería compactar el número de líneas en código.
Mensajes: 278
Temas: 27
Gracias Recibidas: 42 en 33 posts
Gracias Dadas: 8
Registro en: Jul 2020
02-11-2020, 23:12
(Última modificación: 02-11-2020, 23:14 por
vuott.)
(02-11-2020, 21:37)gambafeliz escribió: yo quería compactar el número de líneas en código
...esperemos que no se convierta en una obsesión.
De todas formas una otra idea la dio tincho:
https://gambas-es.org/showthread.php?tid=171
"Los horizontes perdidos nunca regresan. " (F. Battiato, La stagione dell'amore, 1983)
"Las ondas nunca regresan. " (Genesis: Ripples - A trick of the tail, 1976)
Mensajes: 474
Temas: 112
Gracias Recibidas: 19 en 18 posts
Gracias Dadas: 108
Registro en: Jul 2020
03-11-2020, 15:23
(Última modificación: 03-11-2020, 15:25 por
gambafeliz.)
Primero un ¡¡¡ Bravisimo !!! para tincho por que es exactamente lo que yo buscaba pero no sabia si existía, Genial
Por lo tanto así queda el código que para mi es extremadamente compacto.
GAMBAS
For Each sCadena
As String In ["Fecha de compras",
"Descripción",
"Año de Investigación",
"Fecha creación"] aConComillasoNo.
Add(IIf(sCadena
Like "*[ áéíóú]*",
" '" & sCadena
& "'", sCadena
))
Cita:vuott:
...esperemos que no se convierta en una obsesión.
Pues sí, empezó como un entretenimiento, un juego, y me parece que a mutado a una obsesión. Me encanta llegar al limite en todo lo que hago. Rayos y centellas.
Gracias vuott me has dado un enlace buenísimo algo que quería como el comer.