Delphi问题，单选框控件问题

答案:2 悬赏:10 手机版

解决时间 2021-02-22 17:22

提问者网友：富士山上尢
2021-02-22 09:02

建立两个单选框组件，我选一个单选框能显示出一个图片image1，image2隐藏：选另一个image1隐藏，image2显示，这个要怎么编程啊？

最佳答案

五星知识达人网友：西风乍起
2021-02-22 10:10

以BMP图片为例，没完全实现你要的功能，公你参考：
procedure TForm1.RadioButton1Click(Sender: TObject);
var
pic:string;
BitMap:TBitMap;
begin
pic:='d:\picture\image1.bmp';
BitMap:=TBitMap.Create;
try
BItmap.loadfromfile(pic);
Canvas.Draw(150,80,bitmap);
finally
bitmap.Free;
end;
end;
procedure TForm1.RadioButton2Click(Sender: TObject);
var
pic:string;
BitMap:TBitMap;
begin
pic:='d:\picture\image2.bmp';
BitMap:=TBitMap.Create;
try
BItmap.loadfromfile(pic);
Canvas.Draw(150,80,bitmap);
finally
bitmap.Free;
end;
end;

全部回答

1楼网友：平生事
2021-02-22 10:42

支持一下感觉挺不错的

我要举报

如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！

点此我要举报以上问答信息