Class TMyPg3Form (unit MyPg3) |
TForm
**********************************************************} {* BSS Tip of the Week *} {* Copyright (c) Business Software Systems, Inc. 1995-1997 *} {* All rights reserved. *} {
Constructors |
Functions |
Properties |
Events |
Variables |
Constructors |
Functions |
Fits Tabsheet for this demo. SetBounds(0, 0, 784, 446); // Fits Tabsheet of full size BSS AF Form. Run this code with SetFromFunc instead of calling SetForm. {aDatabase := i_Database; aForm := i_Form; aDataSource := i_DataSource; with Table1 do begin Close; DatabaseName := aDatabase.DatabaseName; MasterSource := aDataSource; MasterFields := 'PROJ_ID'; end; inherited; // Call FrameWork Inherited Code.
Properties |
Events |
Variables |
Private declarations