problema con funciones

[[egostar]]

Yo creo que no es necesario inicializar el valor de retorno, la regla es que no haya ningún "vacio" en el retorno de la función.

Código Delphi [-]
function TForm1.algo(dato:String):Bool;
begin
  If dato = 'e32er433432e' then
     Result := True
  else Result := False; // Else
end;

Código Delphi [-]
function TForm1.algo(dato:word):integer;
begin
  case dato of
     0 : Result := 1;
     1 : Result := 0;
     else Result := -1; // Else
  end;
end;

De esta manera no hay ningún "vacio" para el retorno de la función de cualquier tipo.

Salud OS.