Register fields

[zeljkoc]

how  register fields

Delphi:

procedure Register;
begin
 RegisterFields([ __,  ___]);
end;

[marcov]

I can't find such method in SVN, even trunk. Might be worth a bugreport.  Make sure to mention it is to register custom field types, maybe there is a workaround that is not Delphi standard yet.

[zeljkoc]

I was not able to register their fields

DbCtrls
register TIntegerField
====================================

Code: [Select]

var
  FieldClasses: TFpList;

procedure RegField(const FieldClass: TFieldClass);
begin
  if FieldClasses = nil then FieldClasses := TFpList.Create;
  if (FieldClass <> Nil) And (FieldClasses.IndexOf(FieldClass) = -1) then
  begin
    FieldClasses.Add(FieldClass);
    RegisterNoIcon([FieldClass]);
    RegisterClass(FieldClass);
  end;
end;

procedure RegFields(const AFieldClasses: array of TFieldClass);
var I: Integer;
begin
  for I := Low(AFieldClasses) to High(AFieldClasses) do
    RegField(AFieldClasses[I]);
end;

procedure Register;
begin
  RegisterComponents('Data Controls',[TDBNavigator,TDBText,TDBEdit,TDBMemo,
    TDBImage,TDBListBox,TDBLookupListBox,TDBComboBox,TDBLookupComboBox,
    TDBCheckBox, TDBRadioGroup, TDBCalendar,TDBGroupBox]);
  RegFields(DefaultFieldClasses);
  RegField(TIntegerField);
end; ============================================