Files
lazarus-ccr/components/exctrls/examples/ShapeEx/main.pas
2022-09-17 17:26:39 +00:00

37 lines
425 B
ObjectPascal

unit main;
{$mode objfpc}{$H+}
interface
uses
Classes, SysUtils, Forms, Controls, Graphics, Dialogs, ExShape;
type
{ TMainForm }
TMainForm = class(TForm)
ShapeEx1: TShapeEx;
ShapeEx2: TShapeEx;
ShapeEx3: TShapeEx;
ShapeEx4: TShapeEx;
ShapeEx5: TShapeEx;
ShapeEx6: TShapeEx;
ShapeEx7: TShapeEx;
private
public
end;
var
MainForm: TMainForm;
implementation
{$R *.lfm}
end.