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

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

Нужно ли освобождать память (GlobalFree) при копировании в Б/О

vidiv ©   (2006-09-27 19:25:00) 

Б/О - буфер обмена.

Вот код:

   CB2 :=  GlobalAlloc(GMEM_MOVEABLE and GMEM_DDESHARE, length(FText) + 1);
   Buff := GlobalLock(CB2);
   FillMemory(Buff, length(FText) + 1, 0);
   CopyMemory(Buff, PChar(FText), length(FText));
   GlobalUnlock(CB2);

   WND := Handle;
   if OpenClipboard(WND) then begin
       try
           EmptyClipboard;
           SetClipboardData(CF_TEXT, CB2);
       finally
           CloseClipboard;
       end;
   end;
    GlobalFree(CB2);

Нужна ли последняя строка кода?

---

GrayFace   (2006-09-28 17:20:00) [1]

Посмотри, как это делается в TClipboard. В том методе, которым пользуется SetText.

---

guav   (2006-09-27 20:49:00) [2]

нет

---

Наверх