lazarus-ccr/components/smnetgradient/demo/unit1.pas
blikblum 78d2e5e148 * update demo to use anchors
git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@1441 8e941d3f-bd1b-0410-a28a-d453659cc2b4
2011-01-13 20:15:41 +00:00

42 lines
638 B
ObjectPascal

unit Unit1;
{$mode objfpc}{$H+}
interface
uses
Classes, SysUtils, FileUtil, LResources, Forms, Controls, Graphics, Dialogs,
SMNetGradient;
type
{ TMainForm }
TMainForm = class(TForm)
NetGradient1: TNetGradient;
NetGradient2: TNetGradient;
NetGradient3: TNetGradient;
NetGradient4: TNetGradient;
NetGradient5: TNetGradient;
NetGradient6: TNetGradient;
NetGradient8: TNetGradient;
NetGradient9: TNetGradient;
private
{ private declarations }
public
{ public declarations }
end;
var
MainForm: TMainForm;
implementation
{ TMainForm }
initialization
{$I unit1.lrs}
end.