Files
lazarus-ccr/components/orpheus/tests/TestURL/unit1.pas

32 lines
443 B
ObjectPascal
Raw Normal View History

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}
{$ELSE}
{$R *.lfm}
{$ENDIF}
end.