�@ �g�b�v�y�[�W��

�e����̉ߋ����O

�EC/C++
�EDelphi
�EVisual Basic���S��
�@(VB2-VB6��.NET���p)
�EVisual Basic(VB2-VB6)
�EVisual Basic .NET
�EVisual C++

�֘A�T�C�g

�Epapy's softwarelibrary

�j�� 2006/08/18(��) 19:15:17

BitBlt�����ʂ̈ꕔ��擾���ATBitmap�ɂ܂Ŏ󂯓n����Ƃ�������
���F����悤��TBitmap.PixelFormat := pf8bit;�̂悤�ɂ����
���s���Ɂu���̃R�}���h����s����̂ɏ\���ȋL���悪����܂���B�v��
�G���[���o�܂��BPixelFormat��g��Ȃ���Ζ��Ȃ��Ō�܂ł����̂�
�������F�������̂ŁB

TBitmap�Ɏ󂯓n�����AHBitmap���������Ă���̂ł���������������
������PixelFormat���g�p�ł��Ȃ��̂ł��傤���H
PixelFormat��g�킸�Ƃ��Ă�BitBlt����TBitmap�Ɏ���ߒ��Ō��F����ɂ�
�ǂ������炢���̂ł��傤���H�������@������΂�낵�����肢���܂��B

��ɂ� 2006/08/18(��) 22:36:30

>TBitmap�Ɏ󂯓n�����AHBitmap���������Ă���̂ł���
�̈Ӗ���������܂���B
�Ƃ肠�����ŏ��R�[�h�œ���m�F���܂����B

procedure TForm1.Button1Click(Sender: TObject);
var
  bmp :TBitmap;
  bmp2:TBitmap;
begin
  bmp:=TBitmap.Create;
  bmp.LoadFromFile('test.bmp');

  bmp2:=TBitmap.Create;
  bmp2.Width :=50;
  bmp2.Height:=50;
  BitBlt(bmp2.Canvas.Handle,0,0,50,50,bmp.Canvas.Handle,0,0,SRCCOPY);
  bmp2.PixelFormat:=pf1bit; //pf8bit
  bmp2.SaveToFile('aaa.bmp');
  bmp2.Free;

  bmp.Free;
end;

�j�� 2006/08/19(�y) 01:28:14

���肪�Ƃ��������܂��B
�摜�t�@�C������ł͂Ȃ���ʂ�����ۂɎ擾���Ă�����
HBitmap��g���񂶂�Ȃ����ȁH�Ǝv���܂����ǂ��Ȃ��
���傤���H

���[�� 2006/08/19(�y) 03:03:08

BitBlt() �Ńf�X�N�g�b�v���� TBitmap �Ɏʂ�����ł�����
HBitmap �͊֌W����܂���B

�udelphi �L���v�`���v�Ō�������Ƃ������񌩂‚���܂��B

�Ⴆ��

http://www.hi-ho.ne.jp/tadokoro/menu/menu8_3.html

��ɂ� 2006/08/19(�y) 04:43:54

HBitmap�͈�ʓI�ȕ\������Ȃ��ł��ˁB
���炭�f�o�C�X�R���e�L�X�g�̃n���h�����Ƃ͌����‚��܂����ǁB
�r�b�g�}�b�v�̃n���h���Ƃ̈Ⴂ�͒��ׂđ��͂Ȃ��ł����B
http://msdn.microsoft.com/library/ja/default.asp?url=/library/ja/jpgdi/html/_win32_bitblt.asp


procedure TForm1.Button2Click(Sender: TObject);
var
  bmp:Tbitmap;
  dc:hdc;
begin
  bmp:=Tbitmap.Create;
  bmp.width :=100;
  bmp.height:=100;
  dc:=getdc(0);
  BitBlt(bmp.canvas.handle,0,0,bmp.width,bmp.height,dc,0,0,srccopy);
  releasedc(0,dc);

  bmp.PixelFormat:=pf1bit;
  bmp.SaveToFile('bbb.bmp');
  bmp.free;
end;

�j�� 2006/08/19(�y) 13:50:08

��ɂႳ��A���[�Ƃ���@���肪�Ƃ��������܂�
HBitmap�֌W�Ȃ��ł��܂��ˁB
�����ԑO�̃\�[�X�Ȃ�łǂ�����č�������Y��܂�����
�ړI��B�����邽�߂ɂ��������̃T���v������q���q����
�̂������܂���O�O�G
������������Ȋ����ŏ����Ă��܂����B

var
bit: tbitmap;
Bitmap: HBitmap;
D, DC: HDC;

begin
DC:=CreateDC('DISPLAY', nil, nil, nil);
d:=CreateCompatibleDC(dc);
Bitmap:=CreateCompatibleBitmap(DC, xx, yx);
SelectObject(D,Bitmap);
BitBlt(D, 0, 0, xx, yx, dc,widsi,heisi, srccopy); 
bit:=TBitmap.Create;
Bit.Width:=100;
Bit.Height:=100;
Bit.Handle:=Bitmap;

��L���C���O�̂�‚ł��B
> BitBlt(bmp2.Canvas.Handle,0,0,50,50,bmp.Canvas.Handle,0,0,SRCCOPY);
���̂����͈ȑO�ɂ킩���Ă��͂��Ȃ̂ł����Ȃ����ړn���Ȃ������̂��L����
�c���Ă��܂���O�O�G
��������ł��܂����B���肪�Ƃ��������܂����O�O����l�Ɋ��ӂ��܂��O�O

�j�� 2006/08/19(�y) 13:50:54

�`�F�b�N���Y��Ă܂���^^�G

Created by board of various Programming Library.