Колонки в Stringgrid

[MaXoN66613]

Доброго дня, у меня такой вопрос, у нас есть стринг грид, в который из базы мы селектим какие то данные, все бы хорошо но сталкнулся с такой проблемой что когда произвожу селект только определенных столбцов, то колонки заполняются одинаковыми значениями, то есть в запросе несколько имен столбца, а заполняется все только от первого

заполняю ее таким образом

var
i : integer;
begin
with Form2, query do
begin
Query.Sql.Clear;
Query.Sql.Add('Select Id, name from Device');
Query.Open;
Stringgrid8.RowCount:= Query.RecordCount+1;
for I := 0 to query.recordcount - 1 do
begin
Stringgrid8.Cells[0,i+1]:=Query.Fields[0].Value;
Next;
end;
begin
Stringgrid8.Cells[0,0]:='Номер';
end;
query.close;
AutoSizeGridColumn(StringGrid8, 0);

end;
end;

подскажите, как мне правильно сделать, чтобы нужные столбцы заполнялись в нужные мне колонки SG? Мне казалось это где то в настройках но что то разобраться так и не получилось, Буду Весьма благодарен за подсказку

[MaXoN66613]

разобрался сам, Спасибо все ровно =)

[evg_m]

query.fieldbyname(<нужный столбец>)
SG.Cells[<нужная колонка>,..]

[MaXoN66613]

Добрый день, У меня опять вопрос, Делаю фильтрацию списка через запрос, то есть выставляю диапозон даты через 2 Дататаймпикера, и по нажатии кнопки должно показать только то что между этими датами. Делаю это так

var
i : integer;
DT4, DT5 : string;
    begin
      DateTimeToString(DT4, 'yyyy-mm-dd', Date4.Date);
      DateTimeToString(DT5, 'yyyy-mm-dd', Date5.Date);
      with Form2, query do
      begin
      Query.Sql.Clear;
      Query.Sql.Add('Select * from Work WHERE datework BETWEEN '+DT4+' AND '+DT5+'');
      Query.Open;
      Stringgrid4.RowCount:= Query.RecordCount+1;
      for I := 0 to query.recordcount - 1 do

Но проблема в том что, список просто становится пустым, то есть ошибка в запросе, пробовал запрос в самой базе, то же самое,
посмотрел на базу, тип столбца был datatime. поменял на date, теперь при выполнении этого куска пишет ошибку 'Operand type clash: date is incompatible with int' что может быть не так ? За ранее благодарен

[Прик]

Или значения дат заключать в одинарные кавычки, или применять параметрический запрос, в котором передача значений в параметры не требует преобразования дат в строковое представление.

P.S. Надо бы сообщать какая СУБД применяется. "Догадайтесь, мол, сами"?

P.P.S. Зачем применять конструкцию with ..., query ..., если все равно внутри оператора with используется квалификатор Query?

[MaXoN66613]

СУБД MSSql 2008 r2.
ну я знаю что код так себе, но он в принципе рабочий, в принципе понятно почему у меня выборка не работает, мне так кажется что в самой базе, при указанном тиме datetime в колонке пишется как ddmmyyyy 00:00:00.000 b скорей всего из за этого и не может найти нужное значение, а с date вообще все как то странно...

[MaXoN66613]

Сообщение от MaXoN66613

СУБД MSSql 2008 r2.
ну я знаю что код так себе, но он в принципе рабочий, в принципе понятно почему у меня выборка не работает, мне так кажется что в самой базе, при указанном тиме datetime в колонке пишется как ddmmyyyy 00:00:00.000 b скорей всего из за этого и не может найти нужное значение, а с date вообще все как то странно...

Все разобрался, Спасибо =)

[Прик]

Чтобы не было проблем используйте запрос с параметрами:

Query.Sql.Text := 'Select * from Work WHERE datework BETWEEN :DT4 AND :DT5';
Query.Parameters.ParamByName('DT4').Value := Date4.Date;
...