-
unit Childwin;
interface
uses Windows, Classes, Graphics, Forms, Controls, StdCtrls;
type
TMDIChild = class(TForm)
procedure FormClose(Sender: TObject; var Action: TCloseAction);
p
http://www.codebf.com/read/161088/7122812
-
unit DZHWeb;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics,
Controls, Forms, Dialogs, StdCtrls
type
TfrmWeb=class(TForm)
procedure FormClose(Sender : TObject);
http://www.codebf.com/read/461488/7226625
-
unit Fbase;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs;
type
TF_base = class(TForm)
procedure FormKeyPress(Sender: TObject
http://www.codebf.com/read/458705/7290934
-
unit ChildFM;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs;
type
Tfm_Child = class(TForm)
procedure FormCreate(Sender: TObject);
http://www.codebf.com/read/456207/7353931
-
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs;
type
TForm1 = class(TForm)
procedure FormClose(Sender: TObject; va
http://www.codebf.com/read/454914/7381781
-
unit Unit2;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs;
type
TForm2 = class(TForm)
procedure FormClose(Sender: TObject; va
http://www.codebf.com/read/454914/7381783
-
unit Fbase;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs;
type
TF_base = class(TForm)
procedure FormKeyPress(Sender: TObject
http://www.codebf.com/read/454449/7390397
-
unit Unit2;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, DB, ADODB, StdCtrls, Menus;
type
TMenuClick = procedure(Sender: TObject
http://www.codebf.com/read/449643/7499240
-
unit frmDemo;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls;
type
//---这里声明需要用到的DLL中对象的方法---
TVehicle = class(TObject
http://www.codebf.com/read/446628/7574526
-
unit frame;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs;
type
Tf_frame = class(TForm)
procedure FormKeyDown(Sender: TObject
http://www.codebf.com/read/446167/7584518
