代码搜索：TObject

找到约 10,000 项符合「TObject」的源代码

代码结果 10,000
热门代码： main.c GPIO I2C SPI UART timer interrupt ADC PWM LED
www.eeworm.com/read/386969/8715196

pas unit1.pas

unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, ExtCtrls, StdCtrls; type TForm1 = class(TForm) Shape1: TShape;
·
www.eeworm.com/read/430977/8715200

pas form.pas

unit Form; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, XPMan; type TMainForm = class(TForm) GroupBox1: TGroupBox
·
www.eeworm.com/read/430977/8715209

~pas form.~pas

unit Form; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, XPMan; type TMainForm = class(TForm) GroupBox1: TGroupBox
·
www.eeworm.com/read/386969/8715214

pas unit1.pas

unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, OleCtrls, SHDocVw, StdCtrls, ComCtrls, ToolWin; type TForm1 = class(TFo
·
www.eeworm.com/read/386969/8715249

pas unit1.pas

unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, ExtCtrls; type TForm1 = class(TForm) Button1: TButton;
·
www.eeworm.com/read/386969/8715267

txt 画图.txt

复制Ctrl C 粘贴Ctrl V 1.建一个文件夹，用于放程序。 2.新建一个程序。 3.保存(用Save All) 4.向窗体上放一个按钮(Button)控件,把它的标题(文字,Caption属性)改为 画直线,双击它添加事件，并添加代码： procedure TForm1.Button1Click(Sender: TObject); begin // Canvas是画布
·
www.eeworm.com/read/386969/8715271

pas unit1.pas

unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls; type TForm1 = class(TForm) Button1: TButton; Button
·
www.eeworm.com/read/386969/8715287

pas unit1.pas

unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls; type TForm1 = class(TForm) Button1: TButton; Button
·
www.eeworm.com/read/386969/8715296

pas unit1.pas

unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls; type TForm1 = class(TForm) Edit1: TEdit; Label1: TL
·
www.eeworm.com/read/386969/8715312

txt 显示鼠标位置.txt

1.新建一个文件夹 2.新建一个程序(File-->New-->Application)，并保存(Save All)到该文件夹 3.添加标签(Label)控件，把它的标题(文字、Caption属性)改为X, 添加标签(Label)控件，把它的标题(文字、Caption属性)改为Y, 添加编辑框(Edit)控件，把它的文本(文字、Text属性)清空， 添加编辑框(Edit)控件，把它的文本
·