To split sql in coding for easy reading
lazarus / 16-Databases

----------------------------------------------------------------------
asdf · 2010-11-15 05:04

sqdb.sql.text:= 'create table engthagen (id int , esearch varchar
(50), eentry varchar (100), tentry varchar(1000), ecat varchar(50),
ethai varchar(700), eid varchar(10), esyn varchar(300) )';

It's very long, not comfortable to see all.
The end of it is out of the screen.

How can we split?

Like

sqdb.sql.text:= 'create table engthagen
(id int ,
esearch varchar (50),
eentry varchar (100),
tentry varchar(1000),
ecat varchar(50),
ethai varchar(700),
eid varchar(10),
esyn varchar(300) )';

----------------------------------------------------------------------
Zoran · 2010-11-15 05:12

Like any other string in Pascal code you can split it using "+"
operator:

Code: [Select]sqdb.sql.text:= 'create table engthagen '
         + '(id int , '
         + 'esearch varchar (50), '
         + 'eentry varchar (100), '
         + 'tentry varchar(1000), '
         + 'ecat varchar(50), '
         + 'ethai varchar(700), '
         + 'eid varchar(10), '
         + 'esyn varchar(300) )';

----------------------------------------------------------------------
eny · 2010-11-15 09:22

Better yet, define all SQL (DDL, DML etc.) outside your program in a
separate (resource) file and get statements from there when necessary.

----------------------------------------------------------------------
Leledumbo · 2010-11-15 10:28

AFAIK SQL property is of type TStrings, so you can use it's Add
method. Something like:
Code: [Select]with sqdb.sql do begin
  Add('create table mytable (');
  Add('  id integer not null,');
  Add('  aField varchar(31)');
  Add(')');