Как очистить буфер обмена после Range1.Copy в Excel е?

← →
Programmer1 © (2002-07-26 18:01) [0]

Уважаемые мастера! Как быть?
Я сделала так:
ExcelApplication1.Range1:=Sheet1.UsedRange;
ExcelApplication1.Range1.Activate;
ExcelApplication1.Range1.Copy;
После этого поместила свою табличку Range1 в Word:
Link:=False; DataType:=wdPasteOLEObject;
Placement:=wdInLine; DisplayAsIcon:=False;
Selection.PasteSpecial(EmptyParam,Link,
Placement,DisplayAsIcon,
DataType,EmptyParam,EmptyParam);
Теперь закрываю Excel:
SaveChanges:=False;
Excel1.ActiveWorkbook.Close(SaveChanges,EmptyParam,
EmptyParam,xlLCID);
Excel1.Disconnect;
Проблема в том что если Range1 большой, то выскакивает сообщение Windows с вопросом, "удалить ли содержимое буфера обмена?".
Как мне его удалить самой, чтобы не выскакивало этих сообщений?
Я записала макрос в Excel"е, там если сделаешь Copy, а потом нажмешь Escape, это будет выглядеть так:
Range["A1:E29"].Activate;
Range["A1:E29"].Copy;
Application.CutCopyMode = False //Escape
Как-нибудь можно то же самре сделать в Delphi? У меня ничего не получается :(
В Delphi CutCopyMode"у можно присвоить только одну из констант: xlCopy=1 или xlCut=2, а не False.
ПОМОГИТЕ!!!!!!

← →
Guerrillero Che © (2002-07-26 18:22) [1]

смотри TClipboard

Как очистить буфер обмена после Range1.Copy в Excel е? Найти похожие ветки