在TMemo上画一条线
2024-09-10 07:21:37
var
C:TControlCanvas;
begin
C := TControlCanvas.Create;
C.Pen.Color := clRed;
C.Pen.Width := ;
C.Control := Memo1;
C.MoveTo( , );
C.LineTo( , );
C.Free;
end;
真是简单啊~~
最新文章
- Spring MVC中Session的正确用法<;转>;
- scikit-learn 逻辑回归类库使用小结
- .NET LINQ 转换数据类型
- NPOI分层导出
- vtk保存图像
- iOS自动处理键盘事件的第三方库:IQKeyboardManager
- Sublime 不自动打开上次未关闭的文件 设置方法
- 每用户订阅上的所有者 SID 不存在 (异常来自 HRESULT:0x80040207)
- Android Studio修改包名和applicationId的方法
- C#多线程交替赋值取值
- python eval函数
- 经常使用git命令集
- Django项目之小博客
- Python&;amp;MySQL&;amp;PyQt
- Java:IO流-流的操作规律和转换流
- Chapter 5 Blood Type——14
- python三种回收机制
- java 第二天运算符及录入函数Scanner
- clientdataset新增append新增多条记录的时候报错 key valation
- -bash: /etc/profile: line 11: syntax error near unexpected token `$&#39;{\r&#39;&#39;报错问题解决