msmain.pas

能够显示多种图形效果的构件太好用了！！方便

unit msmain;

interface

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

type
  TForm1 = class(TForm)
    PageControl1: TPageControl;
    Page2: TTabSheet;
    MultiShape1: TMultiShape;
    MultiShape2: TMultiShape;
    Page3: TTabSheet;
    Panel1: TPanel;
    MultiShape3: TMultiShape;
    Panel2: TPanel;
    MultiShape4: TMultiShape;
    Page1: TTabSheet;
    MultiShape5: TMultiShape;
    MultiShape6: TMultiShape;
    MultiShape7: TMultiShape;
    MultiShape8: TMultiShape;
    MultiShape9: TMultiShape;
    MultiShape10: TMultiShape;
    MultiShape11: TMultiShape;
    MultiShape12: TMultiShape;
    MultiShape13: TMultiShape;
    MultiShape14: TMultiShape;
    MultiShape15: TMultiShape;
    MultiShape16: TMultiShape;
    MultiShape17: TMultiShape;
    Page4: TTabSheet;
    MultiShape18: TMultiShape;
    MultiShape19: TMultiShape;
    MultiShape20: TMultiShape;
    MultiShape21: TMultiShape;
    MultiShape22: TMultiShape;
    MultiShape23: TMultiShape;
    MultiShape24: TMultiShape;
    MultiShape25: TMultiShape;
    Page5: TTabSheet;
    MultiShape26: TMultiShape;
    MultiShape27: TMultiShape;
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form1: TForm1;

implementation

{$R *.DFM}

end.