Files
lazarus-ccr/components/orpheus/tests/TestURL/unit1.pas
2007-01-16 02:17:08 +00:00

34 lines
508 B
ObjectPascal

unit Unit1;
interface
uses
{$IFNDEF LCL} Windows, Messages, {$ELSE} LclIntf, LMessages, LclType, LResources, {$ENDIF}
SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls, ovcurl;
type
TForm1 = class(TForm)
OvcURL1: TOvcURL;
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.