delphi 查询 from子句错误 做了一晚上没做好 高手指教

adoquery sql 属性 select * from 1
dbgrid datasource 属性DataSource1
project代码program Project1;

uses
Forms,
Unit1 in 'Unit1.pas' {Form1};

{$R *.res}

begin
Application.Initialize;
Application.CreateForm(TForm1, Form1);
Application.Run;
end.
查询代码
procedure TForm1.BitBtn1Click(Sender: TObject);

var
tj,tj1,tj2,tj3,tj4,tj5:string;
begin
tj1:='1=1';
if
checkbox1.checked then
tj1:='1 like ''' + '%'+edit1.text+'%'+'''';

tj2:='1=1';
if
checkbox2.checked then
tj1:='2 like ''' + '%'+edit2.text+'%'+'''';

tj3:='1=1';
if
checkbox3.checked then
tj1:='3 like ''' + '%'+edit3.text+'%'+'''';

tj4:='1=1';
if