Cita:
Empezado por Delphius
¿Y... a todo esto, como ha quedado? Parece que ha JXJ le cortaron las manos porque se lo ha visto por aquí y no ha comentado al respecto.
Saludos,
|
pues no entendi muy bien.. pero me gusta como se ve la funcion de
Ñuño Martínez
http://www.clubdelphi.com/foros/show...cion+resultado
Código Delphi
[-]
FUNCTION Funcion (CONST Entrada: STRING; OUT Salida: STRING): BOOLEAN;
BEGIN
Salida := '';
RESULT := FALSE;
IF Entrada <> '' THEN Salida := 'Hay entrada';
RESULT := Length (Entrada) > 5;
END;
namas no entiendo como la llamo o como recibo el result mas el otro valor de
retorno.
procedure recibe2valores;
begin
if Funcion ('valor de entrada', ) = True
then
begin
end
else
begin
end
end