这段代码为什么出现异常?procedure TForm1.Button1Click(Sender: TObject);
var
graphic:TGraphic;
begin
graphic:=TGraphic.Create;
graphic.LoadFromFile('c:\asdf.bmp');
form1.Canvas.Draw(0,0,graphic);
graphic.Free;
end;
var
graphic:TGraphic;
begin
graphic:=TGraphic.Create;
graphic.LoadFromFile('c:\asdf.bmp');
form1.Canvas.Draw(0,0,graphic);
graphic.Free;
end;
解决方案 »
- delphi 怎么实现 C++中的union
- 咨询业务高手,物资系统在先进先出的成本核算方式下红冲处理流程。
- delphi中颜色得表示
- 关于在Image上画图颜色问题,拜托,拜托了
- 关于CheckListBox的一个菜菜的问题
- 如何控制DBGrid中每条记录特定字段的显示?
- 简单一问:得到表中有重复的姓名的人员的资料,重复姓名只出现一次
- 急,急!关于数据库备份跟恢复的问题!进者有分!`
- 怎样用delphi编写知道一个网址怎样用程序得到他的ip地址?
- 请问如何向另存为对话框中的文件名栏自动填写文件名??DELPHI5
- 高分求救一个控件呀~~~~急急急急急急急急急急急急~~~
- 过年了想抱台笔记本回家,这台笔记本大家帮忙看看。
var
graphic:TGraphic;
begin
graphic:=TBitmap.Create;//不能使用TGraphic创建抽象类对象。
graphic.LoadFromFile('c:\asdf.bmp');
form1.Canvas.Draw(0,0,graphic);
graphic.Free;
end;