home *** CD-ROM | disk | FTP | other *** search
/ Delphi 5 for Professionals / DELPHI5.iso / Runimage / Delphi50 / Demos / Midas / Mstrdtl / srvrform.pas < prev   
Encoding:
Pascal/Delphi Source File  |  1999-08-11  |  823 b   |  39 lines
  1. unit SrvrForm;
  2.  
  3. { This demo uses the IBLOCAL alias which is setup by the install program
  4.   when you install Delphi 5.0 if you have installed Local Interbase.
  5.  
  6.   This example demonstrates how ClientDataSets can be used in a master-detail
  7.   application.  This is the server (or middle-tier).
  8.  
  9.  
  10.   This form is not used in the demo.  You can make the form not visible by
  11.   adding the line
  12.  
  13.     Application.ShowMainForm := False;
  14.  
  15.   to the project source.  (View | Project Source will show the project source.)
  16. }
  17.  
  18. interface
  19.  
  20. uses
  21.   Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs;
  22.  
  23. type
  24.   TServerForm = class(TForm)
  25.   private
  26.     { Private declarations }
  27.   public
  28.     { Public declarations }
  29.   end;
  30.  
  31. var
  32.   ServerForm: TServerForm;
  33.  
  34. implementation
  35.  
  36. {$R *.DFM}
  37.  
  38. end.
  39.