unit Unit3;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, Menus;
type
TForm3 = class(TForm)
private
F1 : TForm1;
public
end;
var
Form3: TForm3;
implementation
uses unit1;
{$R *.dfm}
.........
.........
.........