请问如何触发一个剪贴版事件啊？？~急~

CopyToCilpboard
CutToClipboard
FasteFromBoard

解决方案 »

  1.   

    麻烦楼主遇到问题的时候先看看书。
    为了实现对文本和图象等的剪切和拷贝和粘贴功能，在DELPHI中用到了CLIPBRD单元声明的clipboard类，由于他不是一个VCL组件，所以为了方便使用，在USES中加入CLIPBRD。
      

  2.   

    直接用copytocilpboard就可以了么？？不用带什么参数？？
      

  3.   

    在单元的USES中加入CLIPBRD，然后参考下面的程序：procedure TForm1.Button2Click(Sender: TObject);
    begin//将当前文本送到剪贴版
       clipboard.AsText:=edit1.Text;
    end;procedure TForm1.Button1Click(Sender: TObject);
    begin//检验剪贴版文本
        memo1.Lines.Add(clipboard.AsText);
    end;
      

  4.   

    不打了，累。
    CopyToCilpboard 是在组建中剪切所选择的文本，并放置到剪切板上。
    CutToClipboard  拷贝
    FasteFromBoard  粘贴
    例： procedure tform.cuttoclipboard(sender:tobject);
         begin
           memo1.cuttoclipboard;
         end;
    哪本书上都有，麻烦你找找吧。
      

  5.   

    copy 的时候先要选择
    paste的时候先要放焦点。
      

  6.   

    Memo,maskedit,edit等控件都有上面三个函数
      

  7.   

    恩。我怎么获得当前窗体的焦点呢？然后在将此焦点赋给clipboard~