Внести изменения в набор данных и не потерять текушей позиции

Советы » Записи, индексы, поля, закладки » Внести изменения в набор данных и не потерять текушей позиции

procedure

TMyForm.MakeChanges; var

aBookmark: TBookmark; begin

Table1.DisableControls; aBookmark := Table.GetBookmark; try

{ваш код} finally

Table1.GotoBookmark(aBookmark); Table1.FreeBookmark(aBookmark); Table1.EnableControls; end

; end

;

Другое по теме:

Категории

Статьи

Советы

Copyright © 2023 - All Rights Reserved - www.delphirus.com