Sources
Delphi Russian Knowledge Base
DRKB - это самая большая и удобная в использовании база знаний по Дельфи в рунете, составленная Виталием Невзоровым

Функции редактора полей во время выполнения программы

01.01.2007

Возможен ли вызов функций редактора полей (Fields Editor) во время выполнения программы?

Да. Если вы определили поля во время разработки приложения, то во время выполнения можно менять их свойства (например, Size).

Например, следующий код изменяет каждый размер поля TField.Size так, чтобы соответствовать фактическому размеру поля открываемого набора данных:

procedure SetupFieldsAndOpenDataset(DataSet: TDataSet);
var
 
FieldNum, DefNum: Integer;
begin
 
with DataSet do
 
begin
   
if Active then
     
Close;
   
FieldDefs.Update; {набор данных должен быть закрыт}
   
{ищем каждое предопределенное TField в DataSet.FieldDefs:}
   
for FieldNum := FieldCount - 1 downto 0 do
     
with Fields[FieldNum] do
     
begin
       
DefNum := FieldDefs.IndexOf(FieldName);
       
if DefNum < 0 then
         
raise Exception.CreateFmt(
           
'Поле "%s" не найдено в наборе данных "%s"',
           
[FieldName, Dataset.Name]);
       
{устанавливаем свойство size:}
       
Size := FieldDefs[DefNum].Size;
     
end;
   
Open;
 
end;
end;

Взято с https://delphiworld.narod.ru