Фото формы [D7, Win95/98]
Vadim840 © (2003-02-12 12:59:00)
у меня такой вопрос
uses clipbrd;
procedure TShowVRML.Kopieren1Click(Sender: TObject);
var bitmap:tbitmap;
begin
bitmap:=tbitmap.create;
bitmap.width:=200;
bitmap.height:=300;
try
with bitmap.Canvas do
CopyRect (clientrect,canvas,clientrect);
clipboard.assign(bitmap);
finally
bitmap.free;
end;
end;
при этом в буфер копируется кусок формы: 0-200; 0-300, что
надо изменить, чтобы получить кусок 70- 200; 90-300?
pasha676 (2003-02-12 13:56:00) [1]
ЭЭЭЭ... Вы головой думаете, что пишете или просто откудай-то
примеры копируете и бездумно их ставите. Даже не зная тематики
вопроса можно с уверенностью сказать, что функция непосредственно
копирования CopyRect. Набираем ее в дельфях и давим F1. Там
достаточно прозрачно написано, последний клиентрект - это
клиентрект соурса. Очевидно изменяя его, мы сможем копировать
разные части.
Наверх 
ЧАТ |
Орешник |
|
