You've already forked lazarus-ccr
990d5a299f
Fix for TO32TCFlexEdit validation; 3 new example programs (TestSpinner, TestSimpField, TestTblEdits); updated OrphStatus.html notes. git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@204 8e941d3f-bd1b-0410-a28a-d453659cc2b4
36 lines
543 B
ObjectPascal
36 lines
543 B
ObjectPascal
unit Unit1;
|
|
|
|
interface
|
|
|
|
uses
|
|
{$IFNDEF LCL} Windows, Messages, {$ELSE} LclIntf, LMessages, LclType, LResources, {$ENDIF}
|
|
SysUtils, Variants, Classes, Graphics, Controls, Forms,
|
|
Dialogs, StdCtrls, ovcsc, ovcbase;
|
|
|
|
type
|
|
TForm1 = class(TForm)
|
|
OvcSpinner1: TOvcSpinner;
|
|
Edit1: TEdit;
|
|
private
|
|
{ Private declarations }
|
|
public
|
|
{ Public declarations }
|
|
end;
|
|
|
|
var
|
|
Form1: TForm1;
|
|
|
|
implementation
|
|
|
|
{$IFNDEF LCL}
|
|
{$R *.dfm}
|
|
{$ENDIF}
|
|
|
|
|
|
initialization
|
|
{$IFDEF LCL}
|
|
{$I unit1.lrs} {Include form's resource file}
|
|
{$ENDIF}
|
|
|
|
end.
|