3

このコードを使用して、実行時に一連のフィールドを作成しています

  ClientDataSet1.FieldDefs.Add('ID', ftInteger, 0);
  ClientDataSet1.FieldDefs.Add('Serial', ftInteger, 0);
  ClientDataSet1.FieldDefs.Add('Customer', ftString, 40);
  ClientDataSet1.FieldDefs.Add('Address', ftString, 40);
  ClientDataSet1.CreateDataSet;

ここで、いくつかのフィールドを必須にしたいのですが、実行時に作成されたフィールドを必須として定義するにはどうすればよいですか？

4

1 に答える 1

10

addメソッドにはrequiredと呼ばれる4番目のパラメーターがあります 

procedure Add(const Name: string; DataType: TFieldType; Size: Integer = 0;
  Required: Boolean = False);

その値をTrueに設定すると、フィールドは必須になります。

フィールドを必須にする例では、IDこのコードを使用します

ClientDataSet1.FieldDefs.Add('ID', ftInteger, 0, True);
于 2012-04-19T17:43:54.713 に答える