Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / Delphi [игнор отключен] [закрыт для гостей] / не понятно как экспортировать даты в Excel / 25 сообщений из 38, страница 1 из 2
  1  все
07.12.2010, 15:58:46
    #36999813
vgorshkov
vgorshkov
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
не понятно как экспортировать даты в Excel
Уважаемые Форумчане!

Экспортирую таблицу из SQL Server'a через Delphi в Excel 2007. Все экспортируется как положенно, но вот постоянная проблема с датами. Экспортирую я помассивно. Все элементы массива типа Variant. Но есть одна проблема, при экспорте формат ячейки в которую экспортируется дата меняется неизвестно от чего, то она текстовая, то числовая. Но вот отображение её всегда в числовом виде.

Проблему удалось решить преобразуя все даты в строки, все отображается корректно, но опять же не хочу это так оставлять, т.к. возможно пользователю понадобится сделать фильтр по месяцу, или же использовать дату в ячейке для вычислений каких нибудь, а там текст - а это не есть хорошо.

Надеюсь что кто нибудь сталкивался с подобной проблемой и поможет мне разобраться в данной ситуации
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
08.12.2010, 15:20:07
    #37002301
Johnmen
Johnmen
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
не понятно как экспортировать даты в Excel
Для "русского" Экселя:
Код: plaintext
1.
Range.NumberFormat:='ДД.ММ.ГГГГ';
Range.Value:=<переменная типа TDate/TDateTime>;
А вообще, гуги на тему NumberFormat.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
08.12.2010, 17:09:49
    #37002735
vgorshkov
vgorshkov
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
не понятно как экспортировать даты в Excel
Johnmen,

нет, не катит, я как только не пробовал, не проканало
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
08.12.2010, 17:48:44
    #37002858
Соколинский Борис
Соколинский Борис
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
не понятно как экспортировать даты в Excel
vgorshkovНо есть одна проблема, при экспорте формат ячейки в которую экспортируется дата меняется неизвестно от чего, то она текстовая, то числовая. Но вот отображение её всегда в числовом виде. Слабо верится. Пример можешь выложить?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
08.12.2010, 20:37:38
    #37003160
Xordal
Xordal
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
не понятно как экспортировать даты в Excel
данные также передавать как строка, просто формат ячейки в самом excel устанавливать не "общий", а "дата"
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
08.12.2010, 20:56:17
    #37003181
Соколинский Борис
Соколинский Борис
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
не понятно как экспортировать даты в Excel
Данные нужно передавать как даты, в том числе принудительно задавать VarType.
Не исключено, что в этом и суть проблемы: после каких-то манипуляций данные становятся типа Double.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
08.12.2010, 21:12:55
    #37003207
Gator
Gator
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
не понятно как экспортировать даты в Excel
Соколинский БорисДанные нужно передавать как даты, в том числе принудительно задавать VarType.
Не исключено, что в этом и суть проблемы: после каких-то манипуляций данные становятся типа Double.А это в Экселе установлен "стандартный" формат ячеек
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
08.12.2010, 22:37:07
    #37003315
Соколинский Борис
Соколинский Борис
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
не понятно как экспортировать даты в Excel
[quot GatorА это в Экселе установлен "стандартный" формат ячеек[/quot]
Нет, я имел в виду что-то типа этого
Код: plaintext
1.
2.
3.
 var  X: variant;
X:=now;  // VarType(X)=varDate 
X:=now+ 1 ;  //VarType(X)=varDouble
Не исключено, что у автора что-то подобное происходит.
Стандартный формат отображает даты как даты.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
09.12.2010, 00:19:13
    #37003425
Gator
Gator
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
не понятно как экспортировать даты в Excel
Соколинский БорисGatorА это в Экселе установлен "стандартный" формат ячеек
Нет, я имел в виду что-то типа этого
Код: plaintext
1.
2.
3.
 var  X: variant;
X:=now;  // VarType(X)=varDate 
X:=now+ 1 ;  //VarType(X)=varDouble
Не исключено, что у автора что-то подобное происходит.
Стандартный формат отображает даты как даты.IMHO ну их. Даже без Delphi при копировании/импорте в Excel бывало, что среди дат вдруг лезут "DateTime as Double" или "Integer as Date".
Так что у меня рефлекс: хочешь дату - установи формат
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
09.12.2010, 06:36:08
    #37003532
MMM_Corp
MMM_Corp
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
не понятно как экспортировать даты в Excel
возможно оно вам и не надо, но напишу:

1. выборку данных с MSSQL сервака в езель можно делать напрямую - Данные, с сервера SQL...
2. можно сам екзель использовать как СУБД (г.. конечно, но можно,), при этом не надо думать над форматами данных ячеек
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
09.12.2010, 10:09:00
    #37003713
vgorshkov
vgorshkov
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
не понятно как экспортировать даты в Excel
Соколинский Борис,

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
23.
24.
25.
26.
27.
28.
29.
30.
31.
32.
33.
34.
35.
36.
37.
38.
39.
40.
41.
42.
43.
44.
45.
46.
47.
48.
49.
50.
51.
52.
53.
54.
55.
56.
57.
58.
59.
60.
61.
62.
63.
64.
65.
66.
67.
68.
69.
70.
71.
72.
73.
74.
75.
76.
77.
78.
79.
80.
81.
82.
83.
84.
85.
86.
87.
88.
89.
90.
91.
92.
93.
94.
95.
    RowCount:=frmMultTrans.ReportBase.RecordCount+ 7 ;
    ColCount:=frmMultTrans.ReportHeader.RecordCount+ 1 ;
    row_count_all:=row_count_all+frmMultTrans.ReportBase.RecordCount;

     if  max_col_count<ColCount  then  max_col_count:=ColCount;

    frmMultTrans.ReportHeader.First;
     while   not  frmMultTrans.ReportHeader.Eof  do   begin 
      Workbook.ActiveSheet.Range[chr(frmMultTrans.ReportHeader.RecNo+ 1 + 64 )+inttostr(pos+ 3 )+':'+chr(frmMultTrans.ReportHeader.RecNo+ 1 + 64 )+inttostr(pos+rowcount)].Select;
       if  frmMultTrans.ReportHeader.FieldByName('align').AsString='L'  then 
        Excel.Selection.HorizontalAlignment :=  1 ;
       if  frmMultTrans.ReportHeader.FieldByName('align').AsString='C'  then 
        Excel.Selection.HorizontalAlignment :=  3 ;
       if  frmMultTrans.ReportHeader.FieldByName('align').AsString='R'  then 
        Excel.Selection.HorizontalAlignment :=  4 ;

       if  frmMultTrans.ReportHeader.FieldByName('type').AsString='S'  then 
        Excel.Selection.NumberFormat := '@';
       if  frmMultTrans.ReportHeader.FieldByName('type').AsString='I'  then 
        Excel.Selection.NumberFormat := '# ##0';
       if  frmMultTrans.ReportHeader.FieldByName('type').AsString='F'  then 
        Excel.Selection.NumberFormat := '# ##0'+SysUtils.DecimalSeparator+'00';
       if  frmMultTrans.ReportHeader.FieldByName('type').AsString='A'  then 
        Excel.Selection.NumberFormat := '# ##0'+SysUtils.DecimalSeparator+'000';

      frmMultTrans.ReportHeader.Next;
     end ;

    sum_kl2:= 0 ;

    ArrayData := VarArrayCreate([ 1 , RowCount,  1 , ColCount], varVariant);
    frmMultTrans.ReportHeader.First;
     while   not  frmMultTrans.ReportHeader.Eof  do   begin 
      ArrayData[ 6 ,frmMultTrans.ReportHeader.RecNo+ 1 ]:=frmMultTrans.ReportHeader.FieldByName('new_header').AsString;
      frmMultTrans.ReportHeader.Next;
     end ;

    frmMultTrans.ReportHeader.First;
     for  j:= 2   to  ColCount  do   begin 
      frmMultTrans.ReportBase.First;
      sum_kl:= 0 ;
       for  i:= 7   to  RowCount- 1   do   begin 

         if  frmMultTrans.ReportHeader.FieldByName('type').AsString='I'
           then  ArrayData[i, j]:=frmMultTrans.ReportBase.FieldByName(frmMultTrans.ReportHeader.FieldByName('header').AsString).AsInteger
         else 
         if  frmMultTrans.ReportHeader.FieldByName('type').AsString='F'
           then  ArrayData[i, j]:=frmMultTrans.ReportBase.FieldByName(frmMultTrans.ReportHeader.FieldByName('header').AsString).AsFloat
         else 
         if  frmMultTrans.ReportHeader.FieldByName('type').AsString='A'
           then  ArrayData[i, j]:=frmMultTrans.ReportBase.FieldByName(frmMultTrans.ReportHeader.FieldByName('header').AsString).AsFloat
         else 
         if  frmMultTrans.ReportHeader.FieldByName('type').AsString='D'
           then  ArrayData[i, j]:=frmMultTrans.ReportBase.FieldByName(frmMultTrans.ReportHeader.FieldByName('header').AsString).AsDateTime
         else 
          ArrayData[i, j]:=frmMultTrans.ReportBase.FieldByName(frmMultTrans.ReportHeader.FieldByName('header').AsString).AsString;

         if  frmMultTrans.ReportHeader.FieldByName('can_sum').AsBoolean
           then  sum_kl:=sum_kl+frmMultTrans.ReportBase.FieldByName(frmMultTrans.ReportHeader.FieldByName('header').AsString).AsVariant;
        frmMultTrans.ReportBase.Next;
       end ;
       if  frmMultTrans.ReportHeader.FieldByName('can_sum').AsBoolean
         then  ArrayData[RowCount, j]:=sum_kl;
       if  frmMultTrans.ReportHeader.FieldByName('can_sum_avr').AsBoolean  then   begin 
        sum_kl_all:=sum_kl_all+sum_kl;
        sum_kl2:=sum_kl;
       end ;
      frmMultTrans.ReportHeader.Next;
     end ;
     for  i:= 7   to  RowCount- 1   do   begin 
      ArrayData[i,  1 ]:=i- 6 ;
     end ;

    ArrayData[ 1 , 1 ]:=ColCount;
    ArrayData[ 2 , 1 ]:=RowCount- 7 ;
    ArrayData[ 3 , 1 ]:=sum_kl2;
     if  BlanksBase.FieldByName('lang_id').AsInteger= 1   then   begin 
      ArrayData[ 4 , 1 ]:=ansiuppercase(RoubleUnit.RealToRouble(sum_kl2,
        ValyutaBase.FieldByName('valyuta_text_rus').AsString, ValyutaBase.FieldByName('valyuta_end').AsBoolean,
        ValyutaBase.FieldByName('cent_text_rus').AsString, ValyutaBase.FieldByName('cent_end').AsBoolean, ValyutaBase.FieldByName('dop').AsString));
      ArrayData[ 5 , 1 ]:=frmMultTrans.AnyQuery.FieldByName('inv_text').AsString;
      ArrayData[ 6 , 1 ]:='¹';
     end   else 
     if  BlanksBase.FieldByName('lang_id').AsInteger= 2   then   begin 
      ArrayData[ 4 , 1 ]:=ansiuppercase(RoubleUnit.RealToDollars(sum_kl2,
        ValyutaBase.FieldByName('valyuta_text_eng').AsString,
        ValyutaBase.FieldByName('cent_text_eng').AsString))+' ONLY';
      ArrayData[ 5 , 1 ]:=frmMultTrans.AnyQuery.FieldByName('inv_text').AsString;
      ArrayData[ 6 , 1 ]:='#';
     end ;

    Cell1 := WorkBook.WorkSheets[ 1 ].Cells[pos+ 1 ,  1 ];
    Cell2 := WorkBook.WorkSheets[ 1 ].Cells[pos+RowCount, ColCount];
    Range := WorkBook.WorkSheets[ 1 ].Range[Cell1, Cell2];
    Range.Value := ArrayData;
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
09.12.2010, 10:15:30
    #37003722
Gator
Gator
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
не понятно как экспортировать даты в Excel
vgorshkov, многа букаф Без намека на даты
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
09.12.2010, 10:45:14
    #37003791
vgorshkov
vgorshkov
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
не понятно как экспортировать даты в Excel
Gator,

Код: plaintext
1.
2.
     if  ReportHeader.FieldByName('type').AsString='D'  then 
      Excel.Selection.NumberFormat := 'ДД.ММ.ГГГГ';

вот если так сделать, то все работает как положено, но...если у пользователя Excel английский или еще какой нибудь? как определить какой именно формат здесь приемлемо использовать?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
09.12.2010, 10:53:22
    #37003807
Gator
Gator
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
не понятно как экспортировать даты в Excel
vgorshkov, http://www.delphikingdom.com/asp/viewitem.asp?catalogid=920
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
09.12.2010, 11:04:51
    #37003831
Anatoly Podgoretsky
Anatoly Podgoretsky
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
не понятно как экспортировать даты в Excel
vgorshkovGator,

Код: plaintext
1.
2.
     if  ReportHeader.FieldByName('type').AsString='D'  then 
      Excel.Selection.NumberFormat := 'ДД.ММ.ГГГГ';

вот если так сделать, то все работает как положено, но...если у пользователя Excel английский или еще какой нибудь? как определить какой именно формат здесь приемлемо использовать?
Для локализованых Экселей положено использовать NumberFormatLocal
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
09.12.2010, 11:31:06
    #37003910
vgorshkov
vgorshkov
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
не понятно как экспортировать даты в Excel
Gator,

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
 function  XL_GetShortDateFormat(XLApp: ExcelApplication):  String ;
 var  d, m, y: Integer;
 begin 
   if  XLApp.International[xlDayLeadingZero, lcid]
     then  d :=  2   else  d :=  1 ;
   if  XLApp.International[xlMonthLeadingZero, lcid]
     then  m :=  2   else  m :=  1 ;
   if  XLApp.International[xl4DigitYears, lcid]
     then  y :=  4   else  y :=  2 ;
  Result := Format('%1:s%0:s%2:s%0:s%3:s', [
    DateSeparator,
    StringOfChar(VarToStr(XLApp.International[xlDayCode, lcid])[ 1 ], d),
    StringOfChar(VarToStr(XLApp.International[xlMonthCode, lcid])[ 1 ], m),
    StringOfChar(VarToStr(XLApp.International[xlYearCode, lcid])[ 1 ], y)
  ]);
 end ;

пытался использовать функцию указанную в этой статье, дает ошибку:
'(' expected but '[' found

а что за ошибка, я не могу понять...не учили нас такому в Туркмении :(
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
09.12.2010, 11:35:37
    #37003931
vgorshkov
vgorshkov
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
не понятно как экспортировать даты в Excel
Anatoly Podgoretsky,

просвятите пожалуйста, что значит локализованная эксель? это значит что настройки региональные отличаются от глобальных? или как? я пробовал гуглить на эту тему, ничего не нашел
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
09.12.2010, 11:55:03
    #37003993
Gator
Gator
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
не понятно как экспортировать даты в Excel
vgorshkov, А ты не используй TExcelApplication, а используй нормальную COM/OLE
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
09.12.2010, 12:17:59
    #37004081
Соколинский Борис
Соколинский Борис
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
не понятно как экспортировать даты в Excel
vgorshkov,
В твоем коде слишком много мест, где может быть ошибка.
Давай так: берешь простой пример, который работает:
 
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
23.
24.
25.
26.
27.
28.
29.
30.
31.
32.
33.
34.
35.
36.
37.
38.
39.
40.
41.
42.
 program  Project1;

 {$APPTYPE CONSOLE} 

 uses 
  SysUtils, ComObj, Variants, ActiveX;

 Const 
  CellCount= 100 ;

 var 
  XL, WB, Data: OleVariant;
  i: integer;

 begin 
  CoInitialize( nil );

  XL:=CreateOleObject('Excel.Application');
   try 
     try 
      XL.DisplayAlerts:=False;

      WB:=XL.WorkBooks.Add;

      data:=varArrayCreate([ 0 ,CellCount- 1 , 0 , 0 ], varVariant);

       for  I:= 0   to  cellCount- 1   do 
        Data[i, 0 ]:=VarAsType( Random( 37000 ) {дата}  + Random  {время} , varDate);

      WB.ActiveSheet.Cells[ 1 , 1 ].Resize[CellCount, 1 ].Value:=Data;

      XL.Visible:=true;

     except 
      XL.Quit;
       Raise ;

     end ;
   finally 
    XL:=null;
   end ;
 end .
пошагово добавляешь свои примамбасы и выясняешь в какой момент работать перестанет.
Так быстрее ошибку найдем
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
09.12.2010, 13:52:52
    #37004411
Anatoly Podgoretsky
Anatoly Podgoretsky
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
не понятно как экспортировать даты в Excel
vgorshkovAnatoly Podgoretsky,

просвятите пожалуйста, что значит локализованная эксель? это значит что настройки региональные отличаются от глобальных? или как? я пробовал гуглить на эту тему, ничего не нашел
Зачем же используешь не локализованую версию. Она же только для английского.
авторReturns or sets the format code for the object as a string in the language of the user.
Почему ты вводишь локализированый формат для английских пользователей
авторесли у пользователя Excel английский или еще какой нибудь?
Думаешь оно понимает ДД.ММ.ГГГГ
Для ДД.ММ.ГГГГ существует NumberFormatLocal, а не NumberFormat
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
09.12.2010, 16:17:24
    #37004894
vgorshkov
vgorshkov
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
не понятно как экспортировать даты в Excel
уважаемые, я наверное не совсем понимаю что нужно делать, я поставил проверку такого типа:

Код: plaintext
1.
2.
     if  ReportHeader.FieldByName('type').AsString='D'  then 
      Excel.Selection.NumberFormatLocal := 'ДД.ММ.ГГГГ';

т.е. если тип Дата, то преобразовать в дату, все работает прекрасно, но как сделать чтобы это работало независимо от версии Excel?

Статьи которые Вы предлогали я прочел, пробовал использовать функции которые там описаны, но они ничего хорошего мне непринесли, дают ошибки непонятного для меня характера. Может кто знает где можно про все это дело почитать в подробностях?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
09.12.2010, 16:42:50
    #37004967
Соколинский Борис
Соколинский Борис
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
не понятно как экспортировать даты в Excel
vgorshkovт.е. если тип Дата, то преобразовать в дату, все работает прекрасно, но как сделать чтобы это работало независимо от версии Excel? Из дельфей не сделаешь, поскольку мелкомягкие не доделали это место для Automation и неизвестно когда доделают. Только макросом.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
09.12.2010, 17:04:00
    #37005055
Anatoly Podgoretsky
Anatoly Podgoretsky
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
не понятно как экспортировать даты в Excel
vgorshkovуважаемые, я наверное не совсем понимаю что нужно делать, я поставил проверку такого типа:

Код: plaintext
1.
2.
     if  ReportHeader.FieldByName('type').AsString='D'  then 
      Excel.Selection.NumberFormatLocal := 'ДД.ММ.ГГГГ';

т.е. если тип Дата, то преобразовать в дату, все работает прекрасно, но как сделать чтобы это работало независимо от версии Excel?

Статьи которые Вы предлогали я прочел, пробовал использовать функции которые там описаны, но они ничего хорошего мне непринесли, дают ошибки непонятного для меня характера. Может кто знает где можно про все это дело почитать в подробностях?
Попробуй в NumberFormat указать 'dd.mm.yyyy' и проверить на русской локализации.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
09.12.2010, 17:05:28
    #37005060
vgorshkov
vgorshkov
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
не понятно как экспортировать даты в Excel
Anatoly Podgoretsky,

попробовал, вместо всех дат пишет dd.mm.yyyy
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
09.12.2010, 17:50:13
    #37005196
Соколинский Борис
Соколинский Борис
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
не понятно как экспортировать даты в Excel
В Excel-e есть древний баг: когда через Automation задаешь Range.NumberFormat на самом деле отрабатывает Range.NumberFormatLocal. Лечится либо макросом, либо шаблоном с форматированием (условным форматированием).
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
  1  все
Форумы / Delphi [игнор отключен] [закрыт для гостей] / не понятно как экспортировать даты в Excel / 25 сообщений из 38, страница 1 из 2
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение  
Полит. конфиден.  
созд. / загр.: 537ms
Закрыть
start [/forum/topic.php?fid=58&tablet=1&tid=2041479]:
 0ms
get settings:
 9ms
get forum list:
 16ms
check forum access:
 4ms
check topic access:
 4ms
track hit:
 194ms
get topic data:
 10ms
get forum data:
 2ms
get page messages:
 62ms
get tp. blocked users:
 1ms
others: 235ms
total:  537ms
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]