[roamer]

Вот этот код работает :

Код:

procedure TForm1.Button1Click(Sender: TObject);
begin
 ComboBox1.Items.SaveToFile('C:\!_MyFile_999.txt');
end;

Но это МЕТОД, а не событие ...