[scroyler]

Здравствуйте.
Подскажите пожалуйста как кликнуть на пункт.
Именно кликнуть а не выделить.

Код:

listbox1.ItemIndex:=1;

пробовал так но это только выделяет,а мне надо чтобы именно кликало)
Подскажите пожалуйста

[AlexSku]

Что вы понимаете под "кликнуть"? Ведь это не команда программы, а механическое нажатие кнопки. Или имеется ввиду вызов обработчика? Тогда это и есть вызов: listbox1.OnClick(nil);

[angvelem]

Скорее всего ТС нужно ListBox.ItemAtPos.

Код:

procedure TForm1.ListBox1MouseDown(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X,Y: integer);
var
  Index: integer;
begin
  Index := ListBox1.ItemAtPos(Point(X, Y), True);
...
end;

[scroyler]

Нет это не то.

listbox1.OnClick(nil)
как сделать так что бы он кликал на первый пункт например?

У меня так. Когда нажимаешь на пункт заполняются эдиты например,и мне надо так что бы на листбокс кликало программно

[Pyro]

PHP код:

ListBox1.ItemIndex := 0;
ListBox1.OnClick(nil) 


[scroyler]

Да так спасибо)