Replace_Slice

Explicación

Replace_Slice reemplaza una subristra de Source. Para utilizarla hay que incluir la librería Ada.Strings.Unbounded.

Sintaxis

function Replace_Slice (Source : in Unbounded_String;
                        Low    : in Positive;
                        High   : in Natural;
                        By     : in String)
  return Unbounded_String;

procedure Replace_Slice (Source  : in out Unbounded_String;
                         Low     : in Positive;
                         High    : in Natural;
                         By      : in String);

Ejemplo

with Ada.Strings.Unbounded; use Ada.Strings.Unbounded;
...
Din1 : Unbounded_String;
...
Din1 := To_Bounded_String ("Pedro corre");
Din1 := Replace_Slice (Din1 , 1, 5, "Jesús");  --  Din1 = "Jesús corre"
Replace_Slice (Din1 , 1, 5, "Santiago");       --  Din1 = "Santiago corre"
Créditos