代码搜索：TObject
找到约 10,000 项符合「TObject」的源代码
代码结果 10,000
www.eeworm.com/read/362066/10021165
pas person.pas
unit Person;
interface
type
TPerson = class(TObject)
private // private declarations
_ID :Integer;
_Name :string;
_Sex :string;
_HP :
www.eeworm.com/read/357239/10213263
pas mybpstring.pas
Unit MyBPString;
Interface
Uses SyncObjs;
(**********************************************************************
用例:
procedure TForm1.Button1Click(Sender: TObject);
var
www.eeworm.com/read/280330/10338474
pas textlogerunit.pas
unit textlogerunit;
interface
uses
Windows, SysUtils, Classes;
type
Ttextloger = class(Tobject)
LogStoredPath : string ;
FileFormat : string ;
TextFileVar : TextFil
www.eeworm.com/read/422780/10610332
pas cmpkeyboard.pas
unit cmpKeyboard;
interface
uses Controls, Classes, Graphics;
type
TKeyboardOrientation = (kbHorizontal, kbVertical);
TKeyboardNoteEvent = procedure (Sender : TObject; note, velocity :
www.eeworm.com/read/468483/6991256
pas mybpstring.pas
Unit MyBPString;
Interface
Uses SyncObjs;
(**********************************************************************
用例:
procedure TForm1.Button1Click(Sender: TObject);
var
www.eeworm.com/read/436242/7774429
pas uvcommonfunc.pas
unit uVCommonFunc;
interface
uses
Windows, SysUtils, Forms;
type
TVCommonFunc = class(TObject)
private
Public
constructor Create();
destructor Destory();
www.eeworm.com/read/399281/7874730
~pa clssysparameter.~pa
unit clsSysParameter;
interface
type
TSysParameter = class(Tobject)
private
PmajorComGroup: integer;
PdisplayMode: string;
PdisplayLayer: string;
public
property Fma
www.eeworm.com/read/399281/7874814
pas clssysparameter.pas
unit clsSysParameter;
interface
type
TSysParameter = class(Tobject)
private
PmajorComGroup: integer;
PdisplayMode: string;
PdisplayLayer: string;
public
property Fma
www.eeworm.com/read/137291/13332794
pas athtmlparse.pas
unit atHTMLParse;
interface
uses
SysUtils, Classes;
type
TatLanguage = (alPascal, alBasic);
TAfterPreCompileEvent = procedure (Sender: TObject; ALanguage: TatLanguage; PreCompiledCod
www.eeworm.com/read/128449/6286082
dpr pmywindowclass.dpr
program PMyWindowClass;
uses
Windows,
Messages,
SysUtils;
type
TMyWindow = class(TObject)
private
{ Private declarations }
WindowClass: WndClass;
hWindow: HWnd;