![]() |
|
|
![]()
|
|
| vikaz |
|
|||
![]() Опытный ![]() ![]() Профиль Группа: Участник Сообщений: 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; -------------------- ![]() Нет ничего настолько исправного, чтобы в нем не было ошибок. /Ф. Петрарка/ |
|||
|
||||
| vikaz |
|
|||
![]() Опытный ![]() ![]() Профиль Группа: Участник Сообщений: 869 Регистрация: 15.2.2006 Репутация: 10 Всего: 12 |
У меня подозрение ложится на переменные типа wchar_t, потому что, когда я коментировал строки типа DocName = Values.GetElement(0), то память переставала съедаться! но почему так происходит не понятно! :(
-------------------- ![]() Нет ничего настолько исправного, чтобы в нем не было ошибок. /Ф. Петрарка/ |
|||
|
||||
| _hunter |
|
|||
![]() Эксперт ![]() ![]() ![]() ![]() Профиль Группа: Участник Клуба Сообщений: 8564 Регистрация: 24.6.2003 Где: Europe::Ukraine:: Kiev Репутация: 24 Всего: 98 |
а CodeGuard что говорит?
-------------------- Tempora mutantur, et nos mutamur in illis... |
|||
|
||||
| vikaz |
|
|||
![]() Опытный ![]() ![]() Профиль Группа: Участник Сообщений: 869 Регистрация: 15.2.2006 Репутация: 10 Всего: 12 |
ничего, если честно даже не знаю, что это такое!!!! вот! А как можно при помощи него проверить?
-------------------- ![]() Нет ничего настолько исправного, чтобы в нем не было ошибок. /Ф. Петрарка/ |
|||
|
||||
| _hunter |
|
|||
![]() Эксперт ![]() ![]() ![]() ![]() Профиль Группа: Участник Клуба Сообщений: 8564 Регистрация: 24.6.2003 Где: Europe::Ukraine:: Kiev Репутация: 24 Всего: 98 |
в свойствах проекта есть одноименная закладка. поставь там все галки...
-------------------- Tempora mutantur, et nos mutamur in illis... |
|||
|
||||
| vikaz |
|
|||
![]() Опытный ![]() ![]() Профиль Группа: Участник Сообщений: 869 Регистрация: 15.2.2006 Репутация: 10 Всего: 12 |
Поставил! а толку ни какого. захожу в Wiew->Debug Windows->CodeGuard Log, а там пусто! А описание нормалньного не нашел, как всем этим пользоватся!!! :( Может кто направит на путь истиный!!!
-------------------- ![]() Нет ничего настолько исправного, чтобы в нем не было ошибок. /Ф. Петрарка/ |
|||
|
||||
| _hunter |
|
|||
![]() Эксперт ![]() ![]() ![]() ![]() Профиль Группа: Участник Клуба Сообщений: 8564 Регистрация: 24.6.2003 Где: Europe::Ukraine:: Kiev Репутация: 24 Всего: 98 |
так проект после этого запустить нужно...
если проект запускался -- с большой долей вероятности нет там никаких утечек... -------------------- Tempora mutantur, et nos mutamur in illis... |
|||
|
||||
![]()
|
| Правила форума "С++ Builder" | |
|
|
Запрещается! 1. Публиковать ссылки на вскрытые компоненты 2. Обсуждать взлом компонентов и делиться вскрытыми компонентами
Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Rrader. |
| 0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей) | |
| 0 Пользователей: | |
| « Предыдущая тема | C++ Builder | Следующая тема » |
|
|
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности Powered by Invision Power Board(R) 1.3 © 2003 IPS, Inc. |