|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
Опции темы | Поиск в этой теме | Опции просмотра |
|
#1
|
|||
|
|||
Цитата:
Код:
type TDima = class end; procedure TForm1.Button1Click(Sender: TObject); var Dima: TDima; begin Dima:= TDima.Create; ComboBox1.OnChange(Dima); FreeAndNil(Dima); end; |