ftipofday.pas

TntExUpdate 是 流行的 TntUnicodeControls控件的扩展包.包括很难找到的 TntJVCL 也在里面. TntSysUtils2.pas/TntSysUtilsEx.pa

unit FTipOfDay;

{ This unnecessary form only has been used for TntJv0TipOfDay design }

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls, TntStdCtrls, ExtCtrls, DBCtrls, TntDBCtrls, Buttons,
  TntButtons;

type
  TForm1 = class(TForm)
    Shape1: TShape;
    Shape2: TShape;
    Shape3: TShape;
    TntLabel1: TTntLabel;
    TntCheckBox1: TTntCheckBox;
    FPriorTipButton: TTntBitBtn;
    FNextTipButton: TTntBitBtn;
    FBBClose: TTntBitBtn;
    TntLabel2: TTntLabel;
    TntLabel3: TTntLabel;
    Image1: TImage;
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}

end.