unitmapxshapebusinessframe.pas

来自「此代码是关于mapgis的在」· PAS 代码 · 共 31 行

unit UnitMapXShapeBusinessFrame;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, 
  Dialogs;

type
  TMapXShapeBusinessFrameClass = class of TMapXShapeBusinessFrame;
  
  TMapXShapeBusinessFrame = class(TFrame)
  private
    { Private declarations }
  public
    { Public declarations }
    procedure Apply; virtual; 
  end;

implementation

{$R *.dfm}

{ TMapXShapeBusinessFrame }

procedure TMapXShapeBusinessFrame.Apply;
begin
end;

end.