我其他对象创建都没有出现这种错误，奇怪。
-
等级
本版专家分：191结帖率 100% -
我想用Canvas画图，可是当我Canvas:=TCanvas.Create();创建Canvas对象的时候，出现错误如下：Cannot assign to a read-only property.
我其他对象创建都没有出现这种错误，奇怪。展开阅读全文
-
等级
本版专家分：305
-
关注：
-
等级
本版专家分：13233 -
Canvas:=TCanvas.Create();
左边这个canvas是你自己声明的变量，还是什么控件里自带的属性，后者的话当然不可以进行赋值，而且也不需要赋值，直接用就可以了。。
-
等级
本版专家分：1838 -
呵呵，你要用Canvas用就是了，为什么给它赋值呢？
人家不是告诉你了Canvas是一个Read-only的属性，给它赋值当然要出错了
在窗口中写Canvas就等于Form1.Canvas，而这个对象是在窗口创建时就已经创建的，由窗口来管理。当然不能让你随便就给它从新分配内存了。直接使用它就行了
-
等级
本版专家分：738 -
你要用Canvas用就是了，为什么给它赋值呢？
-
等级
本版专家分：191
-
不是了吧？
刚开始我定义Canvas：TCanvas啊
Canvas我还没有定义的对象啊，怎么可以直接用呢？
直接用我也用过了， Canvas.Brush.Color:=clWhite;这里就出错了
产生EAccessViolation错误。
-
等级
本版专家分：305
-
不是吧！！？？
-
等级
本版专家分：1251
-
在窗体中使用属性，如果没有指定对象，则默认作为当前窗体的属性，你把定义的变量名换一个吧。
-
等级
本版专家分：3511 -
procedure TForm1.Button1Click(Sender: TObject);
var
Canvas:TCanvas;
begin
Canvas:=TCanvas.Create();
Canvas.Brush.Color:=clWhite;
end;
没有错误啊
-
等级
本版专家分：788
-
Canvas:=Tcanvas.Create;没有问题啊，怎么会报错吗？我试了怎么不会呢？
-
等级
本版专家分：191
-
我觉得可能是因为Canvas创建的问题了。
我是在FormShow事件中创建Canvas是就产生上述错误了。
- Delphi XE5 FireMonkey移动开发示例：粒子系统
这个例子是参照Processing中的例子写的。 测试结果：在Windows7上，脱离开发环境的性能与Processing相当，在Android上表现良好。 源码如下： unit Example.Particles; ... System.SysUtils, System.Types, ...
- TImage、TPaintBox、TPicture、TBitmap、TCanvas、TGraphic 的关系与区别作者：万一 来源：博客园 发布时间...
TImage、TPaintBox、TPicture、TBitmap、TCanvas、TGraphic 的关系与区别 作者：万一 来源：博客园 发布时间：2009-01-09 23:01 阅读：3209 次 原文链接 [收藏] TGraphic 是 TBitmap 的父类, 很多...
- delphi 截图简单的实现
delphi 截图
- Delphi GDI+ 绘图 （1）
Delphi 有 Canvas、Pen、Brush. Canvas ：就是画布, 譬如窗体的 Canvas 属性, 就是窗体的画布; Pen ：是画笔, 可以设置笔色、笔宽等等; Brush： 是画刷, 可以设置填充颜色等等. //举例: {绘制直线} ...
- Delphi XE5 FireMonkey移动开发示例：Koch分形
这个例子是参照Processing中的例子写的。代码简洁明了，直接上代码： unit Example.KochFractal; interface uses System.SysUtils, System.Types, System.UITypes, System.Classes, System.Variants, Generics....
- Rect的合并 TCANVAS
var DestRect,SrcRect:TRect; i,TemW:Integer;begin Result:=TBitmap.Create; Result.Width:=0; for i:=0 to Soruce.Count-1 do begin Result.Width:=Result.Width+TBitmap(Soruce.Items[i]).Width; Res
- 利用DELPHI中Canvas绘图
以往开发Windows图形软件大多用 ＶＣ＋＋作为开发工具，ＶＣ＋＋强大的图形功能...Delphi中也有一个与CDC相类似的类Tcanvas, 它封装了Delphi 中的绘图函数。我们可以把Delphi和VC中相同或相近的方法做个有趣的比较
- Delphi如何在Form的标题栏绘制自定义文字
原文：http://delphi.about.com/od/adptips2006/qt/draw_captionbar.htm
- 由双缓冲绘图技术谈起到Delphi源码实现
由双缓冲绘图技术谈起到Delphi源码实现(本文原创，转载请申明)xiaoyunsoft@163.com 摘要：双缓冲绘图技术在Delphi中的实现说明：假设读者熟悉VCL 双缓冲绘图也不是什么新技术，简单的说：在绘图实现时不直接绘在...
- delphi InputBox输入密码用*代替，怎样让delphi的inputbox输入框显示密码代表符*
定义 Mydialogs.pas unit Mydialogs; interface ...uses Windows, Graphics, Forms, StdCtrls, Consts, Dialogs, Controls,SysUtils,Types;...function GetAveCharSize(Canvas: TCanvas): TPoint; function Inpu
- 挖掘DrawGrid/StringGrid的潜力1
unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, GDIPAPI, GDIPOBJ, Themes, Dialogs, Grids, StdCtrls;type TForm1 = clas
- 核心库类之TGraphicControl/TcustomControl 与画布（Canvas）
1.TGraphicControl/TcustomControl 与画布（Canvas） VCL中，TCotnrol之下的组件分两条路各行其道。一条为图形组件，这类组件并非窗口，职责只在于显示图形、图像，其基类是TGraphicControl；另一条为窗口组件，这...
- 获取 Canvas 对象
procedure TForm1.Button1Click(Sender: T... cvs: TCanvas; begin {PaintBox1 就像窗体一样, 也有 Canvas 属性} PaintBox1.Canvas.Brush.Color := clRed; PaintBox1.Canvas.FillRect(PaintBox1.ClientRect);
- Delphi TGraphicControl 类 And TWinControl 类
1.TGraphicControl/TcustomControl 与画布（Canvas） VCL中，TCotnrol之下的组件分两条路各行其道。 一条为图形组件，这类组件并非窗口，职责只在于显示图形、图像，其基类是TGraphicControl； 另一条为...
- c++ builder firemonkey 实现填充椭圆
void __fastcall TForm3::FormPaint(TObject *Sender, TCanvas *Canvas, const TRectF &ARect) { Canvas->BeginScene(); System::Types::TRectF* Rect=new System::Types::TRectF(0,0,100,100); TRectF MyRect(50
- 关于Delphi Clipboard 无法访问的问题 解决
今天需要用到一个功能。就是截图图
- 移动端vue调用照相机及相册
<template> <div class="me-detail"> <m-hbar title="个人笔记"/> <div class="detail-title"> 个人总结 </div> <p v-if="vpersonalNot...
- delphi实现屏幕截图
（1）新建工程，设置主界面form1的BoardStyle为bsNone，FormStyle为fsStayOnTop，WindowState为wsMaximized。（2）在form1中放置Image1，设置其AutoSize为True。（3）在form1的OnCreate事件中截取全屏，并将截到的...
- Delphi 重绘TEdit显示的内容
type TEdit = class(StdCtrls.TEdit) private FCanvas: TCanvas; procedure WMPaint(var Message: TWMPaint); message WM_PAINT; protected procedure WndProc(var Message: TMessage); override;
- 实现任意角度渐变填充(一) -- 双色渐变填充矩形
在实现任意角度双色渐变填充矩形之前，先了解一下简单实现横向或者纵向的双色渐变填充矩形的过程：首先按2种颜色在x（或者y）方向的按长度比例填充一条直线，然后，不断移动y（或者x）坐标，反复复制该直线，直到...
- 前端input图片的上传和压缩以及图片旋转90度问题解决
最近的微信项目中用到了input标签来上传图片文件，遇到两个大问题： 1、图片太大，导致上传速度慢，影响体验，需要压缩后上传； 2、有些手机拍照是横屏的，在页面展示的时候和正常方向相差90度，也就是本该立着的...
- DELPHI 截屏
unit mainunit; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, ExtCtrls,Clipbrd; type TForm1 = class(TForm) Image1: TImage;... pro
- 实现任意角度渐变填充(三) -- 多色渐变填充文字
本文介绍怎样实现任意角度的文字多色渐变填充。 因为文字填充区是由若干个不规则的图形组成的，因此渐变填充文字比渐变填充矩形（见《实现任意角度渐变填充(一) -- 双色渐变填充矩形》和《实现任意角度渐变填充(二)...
- 【读书笔记】【Delphi高手突破】TGraphicControl/TcustomControl 与画布（Canvas）
控件组织结构图 TControl TGraphicControl TWinControl TCustomControl TGraphicControl/TcustomControl 的Canvas属性，基本相似，下面以TGraphicControl说明 1，由TGraphi
- h5上传多张 照片太大会出现耗时久，或是卡死问题
//html //js var formdata = getFormData(); var filesData = [], sendData = []; //formdata 上传图片 function uploadFile() { $.ajax({ url: '上传路径', type: 'POST', ...async: f
- 图形程序中的自定义线型
GDI/GID+中提供的线型总是有限的，在一些行业应用领域，需要有非常专业的线型定义，如“铁路线”、“长城线”、“断崖”、“国界线”等，这就需要进行自定义的开发。我的实现思路是：先制作一些线型的图元（图元就是...
- Delphi屏幕绘图
以下代码在全屏幕中心绘制一个十字架:procedure TForm1.Button1Click(Sender: TObject);var FullscreenCanvas:TCanvas;...//取得屏幕的DC，参数0指的是屏幕 FullscreenCanvas := TCanvas.Create;//创建一个CANVA
- delphi绘图canvas及应用(转）
delphi绘图canvas及应用2010年03月25日 星期四 14:59DELPHI为编程者提供了一个灵活的绘图场所,CANVAS类,在DELPHI中的很多控件都具有此属性,使编程者可以 在这些控件的表面随心所欲的绘图,这对完善用户...
- Delphi 菜单的应用（系统菜单添加一项、主菜单增加历史记录、弹出菜单的动态合并、菜单中画图、显示状态）
知识简介： Windows菜单可以分为系统菜单、主菜单、弹出菜单三种。 一、往系统菜单中添加菜单项 //1、在FormCreate中往系统菜单中添加自己的菜单 procedure TForm1.FormCreate(Sender: TObject);...
- H5页面上传图片控件
做H5项目的时候应该经常会遇到上传图片的问题的，在这里介绍一种目前项目里面用到的一个H5页面上传图片的控件，代码如下： html代码： ::去家玩:: 秀萌照 ... 相册