关于Delphi if else的问题

selectString1 := contentSelect1;
  selectString2 := contentSelect2;
  if(selectString1='')and(selectString2='') then
  begin
      with application do
          MessageBox('请选择查询条件','提示信息',MB_OK);
      end;
  end
  else if(selectString1='')and(selectString2 <>'') then begin /////出错
      if(selectString2='Y') then begin
          With ADOQuery1 do
          begin
          Close;
          SQL.Clear;
          SQL.Add('Select * from jshk');
          SQL.Add(' where 打印状态=''Y'' and 监管项目 <>''0037''');
          Open;
          end;
      end else begin
          With ADOQuery1 do
          begin
          Close;
          SQL.Clear;
          SQL.Add('Select * from jshk');
          SQL.Add(' where 打印状态 <>