Поиск:

Ответ в темуСоздание новой темы Создание опроса
> съедает память! 
:(
    Опции темы
vikaz
Дата 11.4.2007, 07:19 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 869
Регистрация: 15.2.2006

Репутация: 10
Всего: 12



вот код программы, при каждом запуске функии почему-то съедается 4 кб. Подскажите в чем может быть дело?!

 TIniFile * users_dat;
 users_dat = new TIniFile(Show_Path() + "Users.dat");
                                                                                                                             
 Variant notesSession;
 Variant con, DB, View, doc, Nav, docCol, EntryCol, Entry, Item;
 Variant Values, NotesName;
 wchar_t *ID;
 wchar_t *Name, *Status, *User, *Inspection, *DocName;//, *Formula;
 wchar_t *Value, *CommonName;
 int Count;
    
 notesSession = CreateOleObject("Lotus.NotesSession");
 //Установим соединение с lotus
 Function funcInit("Initialize");
 con = notesSession.Exec(funcInit);

// Получим ссылку на Объект "База данных" БД "Принятие решений"
 Function CreateDB("GetDatabase");
 CreateDB << Path_Lotus;   //адрес сервера, на кот. находится БД
 CreateDB << "Referent\\br_portal.nsf";
 DB = notesSession.Exec(CreateDB);
        
 View = DB.Exec(Function("GetView") << "Ответственный исполнитель");

 EntryCol = View.OlePropertyGet("AllEntries");  //получаем выборку по результату запроса
 Count = EntryCol.OlePropertyGet("Count");
 

    
 for (int i = 1; i <= Count; i++) //обход выборки и вывод текущих задач для данного пользователя
    {
        Entry = EntryCol.Exec(Function("GetNthEntry") << i);
        doc = Entry.OlePropertyGet("Document");
        
        ID = doc.OlePropertyGet("UniversalID");
        
        Item = doc.Exec(Function("GetFirstItem") << "SendTo"); //Тема документа
        Values = Item.OlePropertyGet("Values");
        Name = Values.GetElement(0);

        NotesName = notesSession.Exec(Function("CreateName") << Name);
        CommonName = NotesName.OlePropertyGet("Common");

         for (int j=0; j<UIN_List->Count; j++)
    {
    
        //Nulling_Flag(UIN_List->Strings[j],true,1); // обнуляем флаги в файле lotus для пользователя UIN  
        if (AnsiString(CommonName) == users_dat->ReadString (UIN_List->Strings[j],"Lotus_Name",""))
            {
                Item = doc.Exec(Function("GetFirstItem") << "Subject"); //Тема документа
                Values = Item.OlePropertyGet("Values");
                DocName = Values.GetElement(0);
                Write_Lotus_Dat (UIN_List->Strings[j],ID, "None", FormatDateTime("dd.mm.yyyy hh:mm:ss", Now()),"Кабинет",DocName,"Кабинет");
            }
        
         }
         
    }
 delete users_dat;


--------------------
user posted image

Нет ничего настолько исправного, чтобы в нем не было ошибок. /Ф. Петрарка/ 
PM MAIL ICQ Skype   Вверх
vikaz
Дата 11.4.2007, 07:48 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 869
Регистрация: 15.2.2006

Репутация: 10
Всего: 12



У меня подозрение ложится на переменные типа wchar_t, потому что, когда я коментировал строки типа DocName = Values.GetElement(0), то память переставала съедаться! но почему так происходит не понятно! :(



--------------------
user posted image

Нет ничего настолько исправного, чтобы в нем не было ошибок. /Ф. Петрарка/ 
PM MAIL ICQ Skype   Вверх
_hunter
Дата 11.4.2007, 10:45 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Участник Клуба
Сообщений: 8564
Регистрация: 24.6.2003
Где: Europe::Ukraine:: Kiev

Репутация: 24
Всего: 98



а CodeGuard что говорит?


--------------------
Tempora mutantur, et nos mutamur in illis...
PM ICQ   Вверх
vikaz
Дата 11.4.2007, 14:34 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 869
Регистрация: 15.2.2006

Репутация: 10
Всего: 12



ничего, если честно даже не знаю, что это такое!!!! вот! А как можно при помощи него проверить?


--------------------
user posted image

Нет ничего настолько исправного, чтобы в нем не было ошибок. /Ф. Петрарка/ 
PM MAIL ICQ Skype   Вверх
_hunter
Дата 11.4.2007, 15:53 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Участник Клуба
Сообщений: 8564
Регистрация: 24.6.2003
Где: Europe::Ukraine:: Kiev

Репутация: 24
Всего: 98



в свойствах проекта есть одноименная закладка. поставь там все галки...


--------------------
Tempora mutantur, et nos mutamur in illis...
PM ICQ   Вверх
vikaz
Дата 16.4.2007, 10:52 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 869
Регистрация: 15.2.2006

Репутация: 10
Всего: 12



Поставил! а толку ни какого. захожу в Wiew->Debug Windows->CodeGuard Log, а там пусто! А описание нормалньного не нашел, как всем этим пользоватся!!! :(  Может кто направит на путь истиный!!! smile Заранее спасибо!


--------------------
user posted image

Нет ничего настолько исправного, чтобы в нем не было ошибок. /Ф. Петрарка/ 
PM MAIL ICQ Skype   Вверх
_hunter
Дата 16.4.2007, 11:26 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Участник Клуба
Сообщений: 8564
Регистрация: 24.6.2003
Где: Europe::Ukraine:: Kiev

Репутация: 24
Всего: 98



так проект после этого запустить нужно...
если проект запускался -- с большой долей вероятности нет там никаких утечек...


--------------------
Tempora mutantur, et nos mutamur in illis...
PM ICQ   Вверх
  
Ответ в темуСоздание новой темы Создание опроса
Правила форума "С++ Builder"
Rrader

Запрещается!

1. Публиковать ссылки на вскрытые компоненты

2. Обсуждать взлом компонентов и делиться вскрытыми компонентами

  • Литературу по С++ Builder обсуждаем здесь
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Настоятельно рекомендуем заглянуть в DRKB (Delphi Russian Knowledge Base) - крупнейший в рунете сборник материалов по Дельфи


Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Rrader.

 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | C++ Builder | Следующая тема »


 




[ Время генерации скрипта: 0.0471 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.