[roman]

Podrías hacer esto:

Colocas un Edit arriba o junto al ListBox. En el evento OnClick del ListBox pones:

Código Delphi [-]
procedure TForm1.ListBox1Click(Sender: TObject);
begin
  with ListBox1 do
    if ItemIndex <> -1 then
      Edit1.Text := Items[ItemIndex];
end;

Con eso colocas en el Edit lo que haya en el ítem seleccionado del ListBox. En el botón guardar pones esto:

Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
begin
  with ListBox1 do
    if ItemIndex <> -1 then
      Items[ItemIndex] := Edit1.Text;
end;

En resumen, el usuario usa el Edit para cambiar el contenido del elemento seleccionado del ListBox.

// Saludos