• Registered: 2017-05-30
  • Posts: 254

Topic: Как получить id записей в таблице

Есть таблица, в которой перетасовали строки мышью (изменили порядок строк).
Надо получить id всех записей, перебирая строки в получившемся порядке.
Как получать id записей таблицы перебором строк по порядку?

  • From: Нефтеюганск
  • Registered: 2018-04-11
  • Posts: 1,775

Re: Как получить id записей в таблице

procedure Form1_Button1_OnClick (Sender: TObject; var Cancel: boolean);
var
i:integer;
begin
  for i:=0 to Form1.TableGrid1.RowCount-1 do begin
      Form1.Memo1.Lines.Add(SQLExecute('SELECT id FROM qq WHERE id='+IntToStr(Form1.TableGrid1.dbIndexToID(i))));
      end;
end;
Post's attachments

Attachment icon test.7z 3.04 kb, 201 downloads since 2020-02-17 

  • k245
  • k245
  • Member
  • Offline
  • From: Deep
  • Registered: 2017-10-12
  • Posts: 1,554

Re: Как получить id записей в таблице

sibprogsistem wrote:
procedure Form1_Button1_OnClick (Sender: TObject; var Cancel: boolean);
var
i:integer;
begin
  for i:=0 to Form1.TableGrid1.RowCount-1 do begin
      Form1.Memo1.Lines.Add(SQLExecute('SELECT id FROM qq WHERE id='+IntToStr(Form1.TableGrid1.dbIndexToID(i))));
      end;
end;

Зачем ID из базы тянуть? можно проще:


procedure Form1_Button1_OnClick (Sender: TObject; var Cancel: boolean);
var
  i:integer;
begin
  for i:=0 to Form1.TableGrid1.RowCount-1 do
    Form1.Memo1.Lines.Add( IntToStr(Form1.TableGrid1.dbIndexToID(i) );
end;
Визуальное программирование: блог и телеграм-канал.

k245's Website