Вниз
Скачать: CL | DM;

Как очистить буфер обмена после 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



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

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.009 c
14-24232
Igor_thief
2002-07-15 12:55
2002.08.08
Народ, может кто уже


3-23890
Andrew_
2002-07-16 16:34
2002.08.08
Работа с CLOB-полем в Oracle


1-24035
eruc
2002-07-25 17:37
2002.08.08
Как создать <?xml version=


1-24026
Andy BitOff
2002-07-28 23:32
2002.08.08
Работа с указателем


14-24227
Skywalker
2002-07-15 09:51
2002.08.08
IN




   Наверх