조경달 님이 쓰신 글 :
: 백그라운드에서 계속해서 화면을 캡춰하는 놈인데
: 잘 돌다가도 마우스를 마구 움직이면 시스템시소스가 없다나요...
: 아무리 보아도 로직에러는 없습니다.
:
: 고수님들의 도움을 기다립니다.
:
:
:
: //---------------------------------------------------------------------------
:
: #include <vcl.h>
: #include <jpeg.hpp>
:
: #pragma hdrstop
:
: #include "cap.h"
: //---------------------------------------------------------------------------
: #pragma package(smart_init)
: #pragma resource "*.dfm"
: TForm1 *Form1;
: class TCaptureThread : public TThread
: {
: public:
:     void __fastcall Execute(void);
:         __fastcall  TCaptureThread(void):TThread(true)
:         {};
: };
:
: //---------------------------------------------------------------------------
: __fastcall TForm1::TForm1(TComponent* Owner)
:         : TForm(Owner)
: {
: }
:
: void __fastcall TCaptureThread::Execute(void)
: {
: int status;
:  TRect rect,rect2,FullRect;
:   int lx,ly,sx,sy,dif;
:   TMemoryStream *tms=new TMemoryStream;
:   static int initialized =false;
:   Graphics::TBitmap *Bitmap;
:
:   Bitmap=  new Graphics::TBitmap;
:
:  HDC dc = GetDC(0);
:  Graphics::TCanvas *ScreenCanvas = new Graphics::TCanvas;
:   ScreenCanvas->Handle=dc;
:
:   TJPEGImage *jp = new TJPEGImage();
:
:
: while(1){
:   Bitmap->Height=Screen->Height;
:   Bitmap->Width=Screen->Width;
:   Form1->Memo1->Lines->Add("!");
:   rect = Rect(0,0,Screen->Width,Screen->Height);
:
:   sx=sy=0;
:   lx=Screen->Width;
:   ly=Screen->Height;
:
:   rect = Rect(0,0,lx-sx,ly-sy);
:   rect2 = Rect(sx,sy,lx,ly);
:   Bitmap->Canvas->CopyRect(rect,ScreenCanvas,rect2);
:   ////////////////////////////////////////////
:   /////PART SCREEN Update
:   tms->Position=0;
:     jp->Assign(Bitmap);
:     jp->SaveToStream(tms);
: //  DataSize = tms->Position;
:
: }//while
:   Form1->Memo1->Lines->Add("Cap thread end!");
:   delete Bitmap;
:   delete ScreenCanvas;
:   delete jp;
:
:   ReleaseDC(NULL,dc);
:
: }
:
: //---------------------------------------------------------------------------
:
:
: void __fastcall TForm1::FormCreate(TObject *Sender)
: {
: TCaptureThread * captureThread = new  TCaptureThread;
:  captureThread->Priority = tpNormal; // set the priority lower than normal
:  captureThread->Resume(); // now run the thread
: }
: //---------------------------------------------------------------------------
:

안녕하십니까?

한꼬맹이 입니다.

제가 한방에 여러개의 답변을 쓰다보니 게을러서 코드는 작성 못해드리고 문제점만

지적해드리자면 위의 코드는 멀티쓰레드로 돌아가기에 안전한 코드가 아닙니다.

먼저 TCaptureThread * captureThread = new  TCaptureThread(true); 고치시고

Execute()부분에서 VCL에 접근하는 코드를 사용할려면 Synchronize()를 이용하셔야

합니다. 그리고 Canvas에 접근하려면

Canvas->Lock();
//Canvas접근 내용
Canvas->UnLock();

처럼 해주시고요...

이정도만 하면 멀티쓰레드에서 안전할겁니다.

그럼 참고하시길....