【delphi开源代码栏目提醒】:网学会员为需要delphi开源代码的朋友们搜集整理了jfbzfindform.pas相关资料，希望对各位网友有所帮助!

    unit jfbzfindform;
    
    interface
    
    uses
      Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
      StdCtrls, Buttons, ExtCtrls;
    
    type
      Tjfbzfind = class(TForm)
        Panel1: TPanel;
        Panel2: TPanel;
        Panel3: TPanel;
        Label1: TLabel;
        Edit1: TEdit;
        BitBtn1: TBitBtn;
        BitBtn2: TBitBtn;
        procedure FormShow(Sender: TObject);
      private
        { Private declarations }
      public
        { Public declarations }
      end;
    
    var
      jfbzfind: Tjfbzfind;
    
    implementation
    
    {$R *.DFM}
    
    procedure Tjfbzfind.FormShow(Sender: TObject);
    begin
      edit1.Text:='';
    end;
    
    end.
    

上一篇：JEDITM.PAS
下一篇：法律专业开题报告范文