| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

Программа начинает есть память

Pcrepair ©   (2012-07-30 15:10:00) 

Добрый день. Есть код:

unit Unit1;
interface
uses
 ShellAPI;

type
 TForm1 = class(TForm)
   Button3: TButton;
   procedure FormCreate(Sender: TObject);
   procedure FormDestroy(Sender: TObject);
   function PageAssemble(T:TStringList):string;
   procedure Button3Click(Sender: TObject);

 private
   { Private declarations }
   Buffer:TStringList;
 public
   { Public declarations }
 end;

var
 Form1: TForm1;

implementation

{$R *.dfm}
(*=============================================*)
(*  30 июля 2012г. Сборка ХТМЛ-страницы запись ссылок в файл.
   запуск файла в браузере*)
procedure TForm1.Button3Click(Sender: TObject);
var T:TstringList;
begin
 T:=TStringList.Create;
 T.Text:=PageAssemble(Buffer); (*ввод ХТМЛ-страницы*)
 T.SaveToFile('RatingPage.html');  (*сохранить в файл*)
   (*=====Если использовать код то расход ОЗУ возрастает с 6 до 12 мб==*)
   ShellExecute(Self.Handle, 'open', PChar('RatingPage.html'), nil,
     nil, SW_SHOWNORMAL); (*открыть файл в системном браузере*)
   (*===============================*)
 T.Free;
end;

procedure TForm1.FormCreate(Sender: TObject);
begin
  Buffer:=TStringList.Create;
end;

procedure TForm1.FormDestroy(Sender: TObject);
begin
  Buffer.Free;
end;

end.

Этот код создает ХТМЛ-страницу, записывает ее на ЖД и открывает в системном браузере
в общем все работает. но при открытии страницы браузером из файла с ЖД потребление памяти увеличивается с 6 до 12 мб.
Вопросы: это нормально при применении ShellExecute? может сделать ДЛЛ из этого кода и после открытия файла браузером отключать ДЛЛ(как это советуется в букварях)? может есть еще способы(кроме тех что из букваря), что то новенькое?

---

память   (2012-07-30 20:47:00) [1]

Удалено модератором

---

Dennis I. Komarov   (2012-07-30 20:43:00) [2]

Удалено модератором

---

Pcrepair   (2012-07-30 20:03:00) [3]

по существу вопроса кто что знает?

---

Медвежонок Пятачок   (2012-07-30 17:52:00) [4]

но при открытии страницы браузером из файла с ЖД потребление памяти увеличивается с 6 до 12 мб.
Вопросы: это нормально

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

---

Ega23   (2012-07-30 15:44:00) [5]

Удалено модератором

---

Ega23   (2012-07-30 15:22:00) [6]

Удалено модератором

---

QAZ   (2012-07-30 15:17:00) [7]

> потребление памяти увеличивается с 6 до 12 мб

кем?

---

Наверх