代码搜索:TObject

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

代码结果 10,000
www.eeworm.com/read/429300/8812215

pas ucreatehatchbrush.pas

unit UCreateHatchBrush; interface uses Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls; type TForm1 = class(TForm) Button1: TButton; proc
www.eeworm.com/read/429300/8812236

pas strokepathu.pas

unit StrokePathU; interface uses Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs; type TForm1 = class(TForm) procedure FormPaint(Sender: TObject); priva
www.eeworm.com/read/429300/8812245

pas uextfloodfill.pas

unit UExtFloodFill; interface uses Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, ExtCtrls; type TForm1 = class(TForm) Button1: TButton;
www.eeworm.com/read/429300/8812246

pas udrawfocusrect.pas

unit UDrawFocusRect; interface uses Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, Grids; type TForm1 = class(TForm) Button1: TButton;
www.eeworm.com/read/429300/8812269

pas settextalignu.pas

unit SetTextAlignU; interface uses Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs, ExtCtrls, StdCtrls, Spin, ColorGrd; type TForm1 = class(TForm) Group
www.eeworm.com/read/429300/8812280

pas drawtextexu.pas

unit DrawTextExU; interface uses Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs, ExtCtrls; type TForm1 = class(TForm) PaintBox1: TPaintBox; Panel1
www.eeworm.com/read/429300/8812298

pas createfontindirectu.pas

unit CreateFontIndirectU; interface uses Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, ComCtrls; type TForm1 = class(TForm) Label1: TLabel;
www.eeworm.com/read/429300/8812305

pas getglyphoutlineu.pas

unit GetGlyphOutlineU; {Special thanks to Marco Cocco for his valuable insight into making this example work. Note: See Marco Cocco's excellent True Type Font to Vector conversion
www.eeworm.com/read/429300/8812346

pas offsetrectu.pas

unit OffsetRectU; interface uses Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs, ExtCtrls, StdCtrls, Buttons; type TForm1 = class(TForm) Panel1: TPanel
www.eeworm.com/read/429300/8812350

pas createrectregionindirectu.pas

unit CreateRectRegionIndirectU; interface uses Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls; type TForm1 = class(TForm) Button1: TButton;