Ver Mensaje Individual
  #5  
Antiguo 10-11-2008
[coso] coso is offline
Miembro Premium
 
Registrado: may 2008
Ubicación: Girona
Posts: 1.678
Reputación: 0
coso Va por buen camino
Cita:
function PrimeraPalabra(o : string) : string;

entiendo que PrimeraPalabra es el nombre de la funcion, a continuacion
(o:string) querra decir que se va a usar esa variable de tipo Sting
y :String que el resultado de la funcion de PrimeraPalabra será del
tipo String

¿eso seria igual que decir lo siguiente?

Funcion PrimeraPalabra:string;
var
o:String;
Begin
...
no es lo mismo, puesto que de la primera manera se envia un parametro (o) a la funcion.

Cita:
...comprobamos si hay alguna posicion en la haya un ' ' pero eso ya se ha hecho en la primera funcion ¿no?
no, puesto que las funciones son 'trozos' de codigo autonomos, los cuales tu les envias ciertos parametros y te devuelven un resultado. Luego, en el bucle principal (que deberas colocar en un evento OnClick, por ejemplo) se 'llaman' a estas funciones con el parametro que nos interesa (en ese caso, s) y se recoge su resultado tambien donde nos interesa.

Cita:
por otro lado en la ultima expresion usamos copy(o,Pos(' ',o)+1,1000) pero al hacer eso suponemos que hay 1000 caracteres en el String entonces no se copiaran todos los signos raros esos que veo cuando uso el depurador #$D
ese es el numero de caracteres que se copiaran desde la posicion origen dada (resultado string = Copy(string origen, posicion_origen, longitud a copiar)) solo que si te pasas de la longitud de cadena, se copia hasta el final (para hacerlo correctamente se tendria que restar la longitud inicial de la posicion origen). Vamos, que el mil esta para que copie hasta el final.


Cita:
entonces no se copiaran todos los signos raros esos que veo cuando uso el depurador #$D ¿?
si, se copia todo. Ese por eso es el caracter #10, que con el stringreplace ya queda descartado.

Cita:
Asias por tu paciencia y siento hacer unas preguntas tan simples.
tranquilo, asi aprendemos todos, que nadie nace enseñado. saludos.
Responder Con Cita