C++编程专家进,200分求救

来源:百度知道 编辑:UC知道 时间:2024/06/01 03:43:15
谁帮我看看下边有那些错误,并帮忙改正,谢谢!

//---------------------------------------------------------------------------

#include <vcl.h>
#pragma hdrstop

#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
: TForm(Owner)
{
}
//---------------------------------------------------------------------------

void __fastcall TForm1::scanpic()
{
Graphics::TBitmap *Bitmap =new
Graphics::TBitmap;
TJPEGImage *jmp= new TJPEGImage;
Bitmap->Width=Form1->Panel1->Width;
Bitmap->Height=Form1->Panel1->Height;
Bitmap->PixelFormat=pf32bit;
::BitBlt(Bitmap->Canvas->Handle,
Form1->Panel1-

程序还是要自己调试才能提高的快

靠,工程文件你都不给,让人怎么帮你调啊?

应该这样 你自己写的"vcl.h"拿出来
#include "vcl.h"
#pragma hdrstop

#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
: TForm(Owner)
{
}
//---------------------------------------------------------------------------

void __fastcall TForm1::scanpic()
{
Graphics::TBitmap *Bitmap =new
Graphics::TBitmap;
TJPEGImage *jmp= new TJPEGImage;
Bitmap->Width=Form1->Panel1->Width;
Bitmap->Height=Form1->Panel1->Height;
Bitmap->PixelFormat=pf32bit;
::BitBlt(Bitmap->Canvas->Handle,
Form1->Panel1->Left,Form1->Pa