Casa
Top.Mail.Ru Yandeks.Metrika
Foro: "Principal";
Archivo actual: 2002.01.08;
Descargar: [xml.tar.bz2];

abajo

AYUDA !!! Encontrar ramas similares


Alligator   (2001-12-17 11:46) [0]

función SelectChars (s: ShortString; a: Integer; b: Integer): ShortString;
var
i: Integer;
ts: ShortString;
tp: PChar;
comenzar
ts: = "";
StrPCopy (tp, s);
para i: = aa a + b do ts: = ts + tp [i];
Resultado: = ts;
fin;

Esta función no puede digerir oraciones muy largas. (Función) inmediatamente a la vista de oraciones largas mata mi prog.
¿Cómo puedo solucionar esto?
por temprano GRACIAS !!!



gek   (2001-12-17 11:51) [1]

Bueno, ¿por qué usar ShortString?
utilizar cadena



Alligator   (2001-12-17 12:26) [2]

Con el String prog también muere, claramente no intento nada más, ¿puede haber otra función u opción de cómo extraer lo que necesita del texto?



McSimm   (2001-12-17 12:38) [3]

1. La memoria para PChar no está asignada.
2. ¿Por qué está PChar aquí?
3. ¿Por qué molestarse con esta característica en absoluto? Si está copiando una subcadena, entonces
función Copia (S; Índice, Cuenta: Integer): cadena;



Alligator   (2001-12-17 12:57) [4]

Ah ... me has malinterpretado!



gek   (2001-12-17 13:01) [5]

¿Y qué no entendieron? ¿Por qué todo este negocio es necesario, explicar?



Alligator   (2001-12-17 13:34) [6]

Bueno, digamos que tengo un trozo de texto largo y necesito verificar o pegar solo las dos primeras letras.
-memo1.lines.add (SelectChars ("fragmento de texto largo", 0,1))
Es decir, como lo entiendes, solo se deben ingresar dos letras en la nota, comenzando con 0 y terminando con 1, y esta función funciona bien, pero no con un texto largo, el límite está en algún lugar de los caracteres 255, pero no puedo entender qué límites.



Digitman   (2001-12-17 13:37) [7]

memo1.lines.add (Copia ("un trozo de texto largo", 1,1)) - bueno, ¿qué no le resulta tan cómodo? haciendo lo que necesita, y sin ningún tipo de "adornos" adicionales



Mbo   (2001-12-17 13:41) [8]


sobre la función de copia ya dicho.
y en su, además de los errores especificados en 5, se describe el acortamiento de retorno,
y Resultado - PChar



Alligator   (2001-12-17 18:38) [9]

MUCHAS GRACIAS POR LA AYUDA !!! Ahora todo funciona como debería.



Páginas: 1 rama entera

Foro: "Principal";
Archivo actual: 2002.01.08;
Descargar: [xml.tar.bz2];

arriba





Memoria: 0.56 MB
Tiempo: 0.021 c
6-22283
Yuraz
2001-10-08 11:05
2002.01.08
¿Cómo puedo conectar una impresora de red, además del método estándar?


1-22125
Dimass
2001-12-19 23:34
2002.01.08
Por favor ayúdame .....


6-22299
leviatán
2001-10-11 21:58
2002.01.08
Manejo de errores TClientSocket


1-22200
Sergei_B
2001-12-15 09:57
2002.01.08
Intxnumx y tamaño de archivo


3-21928
encanto
2001-12-04 17:42
2002.01.08
Desbordamiento aritmético o truncamiento de cadena con Restaurar





africaans albanés Arabic armenio Azerbaiyán vasco Bielorruso Bulgarian Catalán Chino (simplificado) Chino (tradicional) Croata Checo Danés Dutch Inglés Estonia filipina Finnish French
gallego georgiano Alemán Griego criollo haitiano Hebreo hindi Húngaro islandés Indonesian irlandés Italiana Japonés Korean letón lituano macedonio Malay maltés Noruego
persa polaco Portuguese Rumano Ruso Serbio Slovak Esloveno Español swahili Sueco Thai turco ucranio Urdu vietnamita galés yídish bengalí bosnio
cebuano esperanto gujarati hausa hmong igbo javanés kannada khmer lao latín maorí marathi mongol nepali punjabi somalí Tamil telugu yoruba
zulú
Английский Francés Alemán Italiano portugués Русский Español