Delphi Tips&Tricks News   Tips   .NET Software   VCL Software   Search   Contacts
Special Offer!

Ultimate Pack  hot!
Image Editor  new!
Runtime Fusion
Form Designer
Object Inspector
Print Suite Pro
Commented Image
Delphi Toys
WinDowse
Delphi Bonus
TMS Scripter Studio
Form Designer VB
Form Designer .NET

...get more...
for Delphi.NET, C#, VB.NET
for Delphi VCL, BCB 3-6

WinAPI Online
Unix Manual Pages
MegaDetailed.NET
in3steps.com

Blogspot  greatis.blogspot.com

 See more ads about delphi programming →


Create TTable without a form - Databases - Tips & Tricks - Greatis Delphi Pages

Actually you don't need to use any visual component. Remember that each component in Delphi is an object and do not forget to free it for releasing of the allocated memory.


uses Db, DBTables, Dialogs

procedure TForm1.Button1Click(Sender: TObject);
var
  Session: TSession;
  Database: TDatabase;
  Table: TTable;
begin
  Session:=TSession.Create(nil);
  Database:=TDatabase.Create(nil);
  Session.SessionName:='DBSession';
  Database.Connected:=False;
  Database.AliasName:='dbdemos';
  Database.DatabaseName:='biolife';
  Database.SessionName:=Session.SessionName;

  Table:=TTable.Create(nil);
  Table.DatabaseName:=Database.DatabaseName;
  Table.SessionName:=Session.SessionName;
  Table.TableName:='biolife';

  Table.Active:=True;
  ShowMessage(Table.Fields[1].AsString+' '+Table.Fields[2].AsString);
  Table.Free;
  Database.Free;
  Session.Free;
end;
Related chapters
Components

Related topics
Create an array of components
Add controls to TabbedNotebook
Duplicate component
Create component at runtime

For more
Delphi Help

Download source


 See more ads about delphi components →