| | | | | |

2024年4月28日

摘要： //擦除原来线 procedure TForm1.DBNavigator1BeforeAction(Sender: TObject; Button: TNavigateBtn); begin if button=nbDelete then DBtooLine( clBtnFace,clBtnFac 阅读全文

posted @ 2024-04-28 15:51 涂磊阅读(25) 评论(0) 推荐(0) 编辑

TMemo 关键字代码着色

摘要： PosLabel: TLabel;是显示行列号 unit Unit1; interface uses Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, ComCtrls; typ 阅读全文

posted @ 2024-04-28 11:33 涂磊阅读(20) 评论(0) 推荐(0) 编辑