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

Вниз

Не получается сграбить в Bitmap визуальный компонент   Найти похожие ветки 

 
Step[B.M.] ©   (2004-03-23 01:48) [0]

Братва, подсобите, очень прошу. Спасибо.


 
TUser ©   (2004-03-23 07:51) [1]

Слышь браток, заюзай крутую Билли-функцию BitBlt. Щас все реальные пацаны так делают ...
procedure TForm1.Button1Click(Sender: TObject);
var sdc:hDC;
   b:TBitMap;
   h:hWND;
begin
 try
  h:=form1.Handle;
  sdc:=GetDeviceContext(h);
  b:=TBitMap.Create;
  b.Width:=button1.Width;
  b.Height:=button1.Height;
  if not BitBlt(b.Canvas.Handle,0,0,b.Width,b.Height,sdc,button1.Left,button1.Top,SRCCOPY) then
     showMessage("error");
  Image1.Picture.Assign(b);
 finally
  releasedc(form1.Handle,sdc);
  b.Free;
 end;
end;


 
Step[B.M.] ©   (2004-03-24 14:08) [2]

Спасибо, братан, выручил.



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

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

Наверх




Память: 0.46 MB
Время: 0.03 c
3-1081358815
romeo
2004-04-07 21:26
2004.04.11
Отслеживание изменения таблицы


1-1082574416
Sur
2004-04-21 23:06
2004.04.11
Drang&Drop


14-1079149696
LiLa Ananda
2004-03-13 06:48
2004.04.11
Откровенные шуточки о Знаках Зодиака...


4-1079183758
name voe
2004-03-13 16:15
2004.04.11
Сроччно определить handle desktop


6-1075796204
frost
2004-02-03 11:16
2004.04.11
API для вычисления маски сети.