FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
Herramientas | Buscar en Tema | Desplegado |
|
#1
|
|||
|
|||
¿Una función en Delphi, puede devolver varios parámetros?
Hasta ahora cuando he usado una función sólo he devuelto un parámetro, cuando he tenido que devolver varios por ejemplo he declarado variables públicas y luego las he leido desde otras partes del módulo en el que estoy desarrollando.
Por ejemplo una función podría que uso muy a menudo es algo parecido a esto function TModuloPrograma.Comprobar_Algo : ShortString; var Mensaje_Error : ShortString begin Mensaje_Error := ''; try // Cuerpo de lo que quiero hacer Except // Si se produce un error que quiero controlar Mensaje_Error := 'se ha producido un error'; End; Result := Mensaje_Error; end; Lo que no se es si una función puede devolver varias variables. ¿Podría amáblemente decirme alguien esto ó como lo solucionais?. Gracias de antemano. |
#2
|
|||
|
|||
Funcion
UTILIZACION
Espero que te sirva. Saludos. |
#3
|
|||
|
|||
Por cierto, al igual que lo he hecho con una función, también puedo hacerlo con un procedimiento. En el ejemplo que te he puesto, despues de llamar a la funcion las tres variables (sms,sms1 y sms2) tiene el valor que le pasa la función.
|
#5
|
||||
|
||||
Hola,
Otra opción puede user utilizar "records", de modo que podríamos declarar una como este:
Que podríamos emplear como tipo de resultado para la siguiente función:
Que a su vez podríamos utilizar de este modo:
Para obtener, en este caso, el mensaje "The sum of 1 and 2 is 3". |
#6
|
||||
|
||||
Hola, otra opción sería utilizar Out, que define un parametro de salida y supuestamente no necesita inicialización.
Saluditos
__________________
Disfruten cada minuto de su vida a lado de sus seres queridos como si fuese el ultimo, uno nunca sabe lo que puede pasar. |
|
|
Temas Similares | ||||
Tema | Autor | Foro | Respuestas | Último mensaje |
¿Se puede instalar Delphi 7 profesional en varios PCs? | rrf | Varios | 3 | 21-10-2008 17:24:33 |
función date para devolver Nº dia de la semana | lucasarts_18 | PHP | 2 | 27-03-2007 14:27:03 |
Devolver varios registro desde SP | lucasarts_18 | Oracle | 2 | 27-12-2005 15:16:57 |
problema para devolver 2 valores en una funcion | tiagor64 | OOP | 4 | 06-05-2005 15:38:59 |
IBSQL puede devolver un valor haciendo INSERT? | altp | SQL | 2 | 04-10-2003 22:09:49 |
|