Форум программистов [Powered by Invision Power Board]

Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате

Форум программистов > Delphi: ActiveX/СОМ/CORBA > Навигация по ячейкам

Автор: AHgpeu 7.6.2007, 12:15

Delphi6, FireBird1.5
Делаю экспорт из БД В Excel
Есть поля типа TimeStamp
Нужно в соответствующие столбцы выставить соответствующий формат
Делаю проверку на тип поля

Код


for t := 0 to Count -1 do //перебор полей
begin
  if FieldDefs[t].DataType = ftDateTime then
    E.ActiveWorkBook.WorkSheets[1].Range[XXXRange].NumberFormat := ShortDateFormat;
end;

//XXXRange-столбец, в который необходимо установить формат "ДАТА"
//Как это сделать. А если конкретней-как доступиться к номеру столбца..или его буквенному обозначению

Автор: AHgpeu 7.6.2007, 14:41

Спасибо, уже не надо)))))))

Код


E.ActiveWorkBook.WorkSheets[1].Columns[t+1].NumberFormat := ShortDateFormat;