prograss.pas

来自「商场管理系统源码 一套值得初学者学习的源码包含全部源码,控件」· PAS 代码 · 共 28 行

unit PROGRASS;

interface

uses
  Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
  ExtCtrls, StdCtrls;

type
  TFrm_prograss = class(TForm)
    Panel1: TPanel;
    P_message: TPanel;
    Panel3: TPanel;
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Frm_prograss: TFrm_prograss;

implementation

{$R *.DFM}

end.