Код

	ТекстЗапроса = "
	|SELECT
	|	ID as ИД,
	|	Descr as Наименование
	|FROM
	|	$Справочник.Таймеры as СпрТайм
	|";

	ТекФорма = СоздатьОбъект("Форма");
	ТекФорма.УстановитьФорму(Форма);
	ТабличноеПоле = ТекФорма.СоздатьЭлементУправления("ТабличноеПоле","ТабличноеПоле");
	Исто
чник = СоздатьОбъект("ODBCDataProvider.MSSQL");
	ТабличноеПоле.ПоставщикДанных = Источник;
	База = СоздатьОбъект("ODBCDatabase");
	Источник.БазаДанных = База;
	Колонки = ТабличноеПоле.Колонки;
    Колонки.Добавить("ИД").Данные = "ИД";
    Колонки.Добавить("Наименование").Данные = "Наименование";
	Источник.УстТекстЗапроса(ТекстЗапроса);
	Источник.УстИДПоле("ИД");