代码搜索：TObject
找到约 10,000 项符合「TObject」的源代码
代码结果 10,000
www.eeworm.com/read/427616/8929179
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/427616/8929189
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/427616/8929207
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/427616/8929214
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/427616/8929278
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/427616/8929283
pas createrectregionindirectu.pas
unit CreateRectRegionIndirectU;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
StdCtrls;
type
TForm1 = class(TForm)
Button1: TButton;
www.eeworm.com/read/427616/8929305
pas setrectemtpyu.pas
unit SetRectEmtpyU;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
StdCtrls;
type
TForm1 = class(TForm)
Button1: TButton;
procedur
www.eeworm.com/read/427616/8929331
pas cooleffectu.pas
unit CoolEffectU;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
ExtCtrls;
type
TForm1 = class(TForm)
Image1: TImage;
Timer1: TTim
www.eeworm.com/read/427616/8929352
pas createpolypolygonrgnu.pas
unit CreatePolyPolygonRgnU;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
StdCtrls, ExtCtrls;
type
TForm1 = class(TForm)
Image1: TImag
www.eeworm.com/read/427616/8929358
pas createpolygonrgnu.pas
unit CreatePolygonRgnU;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
ExtCtrls;
type
TForm1 = class(TForm)
Image1: TImage;
proced