Clipboard的问题

Question

我有副图象数据，现存在６４０＊４８０的Byte数组中，想把他拷贝到Clipboard中，格式为BMP的，以便别的程序将这副图拷过来，应该怎么做

Answer 1

procedure TForm1.Button1Click(Sender: TObject);
var
  cpl:Tclipboard;
  p: pchar;
  arr:   array[0..639,0..479] of byte;
begin  arr[0][0]:=12;
  p:=@arr;
  cpl:=Tclipboard.Create;
  cpl.SetTextBuf(p);
  cpl.Free;end;

Answer 2

上面那句什么意思啊还有这样做了后，clipboard是BMP图象吗

Answer 3

  arr[0][0]:=12; 
我随便写的，clipboard放的是二维数组