如何实现两个TImage控件Picture的互换！

image1和image2，想将它们的图片互相调换，如何实现！愁死我了

解决方案 »

  1.   

    用Image3作过渡中介，就像两个变量的值进行交换一样
      

  2.   

    var 
      image3 : TImage;
    begin
      image3 := TImage.Create;
      image3 := image1;
      image1 := image2;
      image2 := image3;
    end;
      

  3.   

    nod
    你只需要将image3设置为visible=false就行了
    image3做中间过渡的桥梁
    image3.picture := image1.picture;
    image1.picture := image2.picture;
    image2.picture := image1.picture;
      

  4.   

    只有： naughtyboy(一切都是为了明天) 是对的，其他人和我犯了同一个错误！