sobre listbox y acceso a un item en particular

[joHn je@N]

Segun lo que lei..creo que esto necesitas:

Código Delphi [-]
procedure TForm1.ListBox1Click(Sender: TObject);
var c : String;
begin
   c := ListBox1.Items.Strings[ListBox1.ItemIndex];
   c [Length (c)] := '1';
   ListBox1.Items.Strings[ListBox1.ItemIndex] := c;
end;

Espero te sirva.
SALUDOS