BDE로 간단한 프로그램을 만들고 있습니다.
질문의 내용은
procedure TForm1.FormCreate(Sender: TObject);
begin
FDataSource := TDataSource.Create(Self);
FTable := TTable.Create(nil);
FTable.TableName := ExtractFilePath(Application.ExeName)+'Y_BUYING_M.DB';
FTable.OnCalcFields := FTableCalcTest;
FCalc := TCurrencyField.Create(FTable);
with FCalc do
begin
FieldName := 'ACOUNT';
FieldKind := fkCalculated;
Calculated := True;
end
FDataSource.DataSet := FTable;
dbgBuy.DataSource := FDataSource;
FTable.Open;
FTable.Fields.Add(FCalc)
end;
여기서 추가 된 필드를 어떻게 사용합니까.
제가 작성한 내용이 잘못된나요.
고수님들 도와 주세용....
with DataSet do
FieldByName('ACOUNT').AsInteger := 어쩌구 저쩌구..
그럼~ 즐거운 프로그래밍 하시길~~