Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2007.02.11;
Скачать: CL | DM;

Вниз

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

 
vidiv ©   (2006-09-27 19:25) [0]

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

Вот код:

   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);


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


 
guav ©   (2006-09-27 20:49) [1]

нет


 
GrayFace ©   (2006-09-28 17:20) [2]

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



Страницы: 1 вся ветка

Текущий архив: 2007.02.11;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.06 c
3-1163674006
*Ray*
2006-11-16 13:46
2007.02.11
надпись на DBLookUpComboBox


6-1157965971
dwar
2006-09-11 13:12
2007.02.11
INDY 9 проблемма стоп сервера


1-1166610505
ZubrZubr
2006-12-20 13:28
2007.02.11
Component под Component


8-1150388501
***(H@kker)***
2006-06-15 20:21
2007.02.11
Экспорт модели


15-1168916009
Юнит
2007-01-16 05:53
2007.02.11
Как прописать {$DEFINE UseBox}, чтобы она была видна во всех юнит