devxlogo

Creating a table using code

Creating a table using code

Why Trust Us

Question:
Hi,Each time l try to create a table using code-not the database explorer, i get an error message:access violation at address 0042f540 read of address 7466654c.Whats the problem, how can l create a table using delphi code only?

Answer:
The only reason I can think of that explains this is that you’re not instantiating the TTable variable. For instance,

MyTable.CreateTable;

alone will not work. You have to set up the database, tablename, and tabletype, and fielddefs properties. Here’s a code snippet that I know works:

var  tbl, sTbl : TTable;  typStr : String;  ch : Char;begin  {Create and set up the Destination Table}  tbl := TTable.Create(Application);  with tbl do begin    SessionName := ThrSes.SessionName;    DatabaseName := ExtractFilePath(TblName);    TableName := ExtractFileName(TblName);    TableType := ttParadox;    FieldDefs.Add('Field1', ftString, 10, False);    FieldDefs.Add('Field2', ftString, 25, False);    CreateTable;    Free;  end;

This is something that I pulled out from one of my own programs, and I know that it works – though I’ve edited it a bit for simplicity. You can use this code as a template.

See also  Professionalism Starts in Your Inbox: Keys to Presenting Your Best Self in Email
devxblackblue

About Our Editorial Process

At DevX, we’re dedicated to tech entrepreneurship. Our team closely follows industry shifts, new products, AI breakthroughs, technology trends, and funding announcements. Articles undergo thorough editing to ensure accuracy and clarity, reflecting DevX’s style and supporting entrepreneurs in the tech sphere.

See our full editorial policy.

About Our Journalist

Charlie Frank

Charlie has over a decade of experience in website administration and technology management. As the site admin, he oversees all technical aspects of running a high-traffic online platform, ensuring optimal performance, security, and user experience.
View Author
Show More