index de item en listbox

[rogger]

hola soy nuevo en el foro, me gustaría saber cómo puedo saber el index de un elemento que se selecciona con el mouse. Muchas gracias por su ayuda.

[marcoszorrilla]

Código Delphi [-]
procedure TForm1.ListBox1Click(Sender: TObject);
begin
ShowMessage('Seleccionó el número:'+IntToStr(ListBox1.ItemIndex + 1));
end;

Un Saludo.

[rogger]

Muchas gracias por la respuesta, y por la rapidez.

Saludos