SQL Оператор SELECT на основе полей, выбранных в чеклисте - PullRequest
Новая
       51

SQL Оператор SELECT на основе полей, выбранных в чеклисте

0 голосов
/ 28 мая 2020

Я пытаюсь использовать SQL для отображения полей, которые пользователь выбирает в TCheckListBox на TDBGrid.

Я думал, что массивы могут помочь. Вот мой код, он не выполняется: 

Var

arrFields : array [1..9] of string = ('UserId','Surname','Name','EMail',
  'Gender','DOB','ContinentOfOririn','Passport','IDNumber');
implementation

{$R *.dfm}

procedure TfrmUsersMan.pnlDisplayClick(Sender: TObject);
Var
I: Integer;
arrTempArray: Array [1..10] of String;
begin

for i := 0 to chkDisplay.Items.Count - 1 do
  begin
    if chkDisplay.Checked[i] then
      arrTempArray[i+1]:='Checked';

    With dmTourists  do
      begin
        qryUsers.Active:=False;
        qryUsers.SQL.Clear;
        qryUsers.SQL.Add('SELECT ''arrFileds[i]'' FROM tblUsers WHERE ''(arrTemp[i+1]=Checked)''');
        qryUsers.Active:=True;
      end;
  end;

end;
End;
...