groupeditor.pas

来自「fastreport 4.6.8完全源码」· PAS 代码 · 共 47 行

{******************************************}
{                                          }
{             FastReport v4.0              }
{     FastReport User/Group editor demo    }
{         Copyright (c) 1998-2007          }
{         by Alexander Fediachov,          }
{            Fast Reports Inc.             }
{                                          }
{******************************************}

unit GroupEditor;

interface

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

type
  TGroupEditorForm = class(TForm)
    Panel1: TPanel;
    UserEditForm: TButton;
    Button2: TButton;
    Panel2: TPanel;
    Label1: TLabel;
    Label2: TLabel;
    Label3: TLabel;
    EFullName: TEdit;
    ELogin: TEdit;
    CBActive: TCheckBox;
    EIndex: TEdit;
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  GroupEditorForm: TGroupEditorForm;

implementation

{$R *.dfm}

end.