Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > Varios
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Grupo de Teaming del ClubDelphi

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 06-01-2005
jaderl jaderl is offline
Miembro
 
Registrado: sep 2004
Posts: 12
Poder: 0
jaderl Va por buen camino
Unhappy Problemas con string de mas de 255 caracteres...

Hola amigos del foro.

Saludos desde Colombia.

Mi problema es el siguiente: tengo que pasarle una cadena de mas de 255 caracteres a un procedimiento en delphi 7.0, pero me sale un error que la cadena de caracteres es mayor de 255 caracteres...

entonces cambié el tipo de datos del parametro de string a ansistring y sigue pasando lo mismo, según la ayuda de delphi 7.0 este tipo de datos recibe mas de 255 caracteres, como se muestra en la tabla que copié de la ayuda:

String types
Type Maximum length Memory required Used for
*ShortString 255 characters 2 to 256 bytes backward compatibility

*AnsiString ~2^31 characters 4 bytes to 2GB 8-bit (ANSI) characters, DBCS ANSI, MBCS ANSI, etc.

*WideString ~2^30 characters 4 bytes to 2GB Unicode characters; multi-user servers and multi-language applications

Que tengo que hacer para que me funcione el procedimiento y el compilador no me bote ningún error...

Les agradezco me puedan ayudar y perdonen si la pregunta es un poco tonta...

GRACIAS....
Responder Con Cita
  #2  
Antiguo 06-01-2005
Avatar de marcoszorrilla
marcoszorrilla marcoszorrilla is offline
Capo
 
Registrado: may 2003
Ubicación: Cantabria - España
Posts: 11.221
Poder: 10
marcoszorrilla Va por buen camino
Por qué no pones el código que utilizas yo acabo de hacer la prueba con una String y le paso 367 caracteres y no me da error y el procedimiento los recibe y muestra todos.

Supongo que estás utilizando ShortSgring.

Porque si utilizas String, puedes pasarle el ancho que quieras, ya que su límite es la memoria del sistema.

Un Saludo.
__________________
Guía de Estilo de los Foros
Cita:
- Ça c'est la caisse. Le mouton que tu veux est dedans.

Última edición por marcoszorrilla fecha: 06-01-2005 a las 19:00:58.
Responder Con Cita
  #3  
Antiguo 06-01-2005
Avatar de Al González
[Al González] Al González is offline
In .pas since 1991
 
Registrado: may 2003
Posts: 5.604
Poder: 30
Al González Es un diamante en brutoAl González Es un diamante en brutoAl González Es un diamante en brutoAl González Es un diamante en bruto
Smile

¡Hola a todos!

Muy posiblemente, el problema se debe a que has especificado una expresión String literal contínua de más de 255 caracteres (lo cual es inválido). Para resolverlo, sepárala en varias partes concatenadas con el operador +.

En Delphi, encontrarás más información al respecto bajo la ayuda del error String literals may have at most 255 elements.

Espero esto sea de utilidad, seguimos en contacto.

Al González .
Sentido es aquel que llora por un amigo, sensible es aquel que comprende a un amigo.
Responder Con Cita
  #4  
Antiguo 06-01-2005
jaderl jaderl is offline
Miembro
 
Registrado: sep 2004
Posts: 12
Poder: 0
jaderl Va por buen camino
Unhappy Ejemplo del código fuente

La function que estoy utilizando es la siguiente:

Código:
function buscar(Titulo, Sql_Select, Sql_From, Sql_Where, Ord1, Ord2, Ord3, bsc1, bsc2, bsc3 : string; opc : byte = 0; temp : boolean = false; campo_temp : byte = 0) : string;
esta es la declaración de la function.

Código:
fbuscar_basica.buscar('Listado de Inscripciones - ' + Logica.anno_inscripciones,'SELECT INSC_NUM NUMERO, INSC_NUM_DOC IDENTIFICACION, INSC_PRIMER_NOMBRE PRIMER_NOMBRE, INSC_SEGUNDO_NOMBRE SEGUNDO_NOMBRE, INSC_PRIMER_APELLIDO PRIMER_APELLIDO, INSC_SEGUNDO_APELLIDO SEGUNDO_APELLIDO, NIV_ACAD_DESCRIPCION NIVEL_ACADEMICO, GRA_NOMBRE GRADO, JOR_DESCRIPCION JORNADA','FROM INSCRIPCIONES, GRADOS_ESPECIALIDAD GE, GRADOS G, NIVELES_ACADEMICOS, JORNADAS','WHERE (INSC_ESTAB_CODIGO_DANE = ' + copy(Logica.codane_establecimiento,1,12) + Logica.anno_inscripciones + ') AND (INSC_ANNO = ' + Logica.anno_inscripciones + ') AND (INSC_GRA_ESP_CODIGO = GE.GRA_ESP_CODIGO) AND (GE.GRA_CODIGO = G.GRA_CODIGO) AND (G.GRA_NIV_ACAD_CODIGO = NIV_ACAD_CODIGO) AND (INSC_JOR_CODIGO = JOR_CODIGO)','ORDER BY INSC_NUM','ORDER BY INSC_NUM_DOC','ORDER BY INSC_PRIMER_NOMBRE, INSC_SEGUNDO_NOMBRE, INSC_PRIMER_APELLIDO, INSC_SEGUNDO_APELLIDO','Número','Identificación','Nombres');
y de esta forma la estoy invocando...

Cuando la estoy invocando, mandandole el valor en el parametro Sql_Select, es que me sale el error....

Última edición por jaderl fecha: 06-01-2005 a las 21:07:47.
Responder Con Cita
  #5  
Antiguo 06-01-2005
Avatar de roman
roman roman is offline
Moderador
 
Registrado: may 2003
Ubicación: Ciudad de México
Posts: 20.269
Poder: 10
roman Es un diamante en brutoroman Es un diamante en brutoroman Es un diamante en bruto
El problema se debe a lo que te comentó Al y él ya te dijo como
solucionarlo.

// Saludos
Responder Con Cita
  #6  
Antiguo 06-01-2005
jaderl jaderl is offline
Miembro
 
Registrado: sep 2004
Posts: 12
Poder: 0
jaderl Va por buen camino
Talking Gracias por la atención prestada....

Gracias amigos del foro....

El que sabe, sabe y el que no es secretaria....

Ja, ja, ja, ja, ja

Se solucionó el problema...

Como regalo por haberme colaborado,

Aquí les mando la siguiente caricatura:
http://www.mundofred.com/caricaturas/condon36.html

Todas las caricaturas las encuentran aquí:
http://www.mundofred.com/caricaturas.html

Me parece un buen mensaje contra el virus del sida, divulgenlo...

Gracias...
Responder Con Cita
Respuesta



Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro


La franja horaria es GMT +2. Ahora son las 20:42:14.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi