代码搜索:TObject
找到约 10,000 项符合「TObject」的源代码
代码结果 10,000
www.eeworm.com/read/427616/8929503
pas createellipticrgnindirectu.pas
unit CreateEllipticRgnIndirectU;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs;
type
TForm1 = class(TForm)
procedure FormPaint(Sender: TOb
www.eeworm.com/read/427616/8929563
pas callwindowprocu.pas
unit CallWindowProcU;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
StdCtrls, ComCtrls;
type
TForm1 = class(TForm)
Label1: TLabel;
www.eeworm.com/read/427616/8929594
pas messageextrainfou.pas
unit MessageExtraInfoU;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
StdCtrls;
{define an application specific user message}
const
UserMe
www.eeworm.com/read/427616/8929662
pas registermessagegetu.pas
unit RegisterMessageGetU;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
StdCtrls, ExtCtrls;
var
UserMessage: UINT;
type
TForm1 = clas
www.eeworm.com/read/427616/8929667
pas registermessagesendu.pas
unit RegisterMessageSendU;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
StdCtrls;
type
TForm1 = class(TForm)
Button1: TButton;
p
www.eeworm.com/read/284437/8929679
cpp main.cpp
//---------------------------------------------------------------------------
#include
#pragma hdrstop
#include "main.h"
#include "SPinfo.h"
#include "SPLBinfo.h"
#include "login.h"
www.eeworm.com/read/427616/8929690
pas windowshooku.pas
unit WindowsHookU;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
StdCtrls;
type
TForm1 = class(TForm)
Edit1: TEdit;
Edit2: TEdit;
www.eeworm.com/read/427616/8929744
pas loadlibraryexu.pas
unit LoadLibraryExU;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
StdCtrls, ExtCtrls;
type
TForm1 = class(TForm)
Button1: TButton;
www.eeworm.com/read/427616/8930080
pas copyimageu.pas
unit CopyImageU;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
ExtCtrls;
type
TForm1 = class(TForm)
Image1: TImage;
procedure For
www.eeworm.com/read/427616/8930164
pas scalingu.pas
unit ScalingU;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs;
type
TForm1 = class(TForm)
procedure FormMouseDown(Sender: TObject; Button: