Einzelnen Beitrag anzeigen

Emwykey

Registriert seit: 27. Aug 2013
51 Beiträge
 
#3

AW: TFDQuery Select - Ermitteln ob ein Feld Berechnet ist ( Computed Field )

  Alt 26. Feb 2019, 13:32
Hallo, danke für die Antwort, die Eigenschaft ist leider auch false

hier mal ein Code Ausschnitt, vielleicht fällt ja noch was auf:
Code:

  QuCloneData := TFDQuery.Create( nil );
  QuCloneData.Connection := fConnection;
  QuCloneData.Sql.Text := 'Select * from !Tabelle ';
  QuCloneData.MacroByName( 'Tabelle' ).AsRaw := fTableName;
  QuCloneData.Open;

  for i := 0 to QuCloneData.Fields.Count-1 do begin
    if ((  not QuCloneData.FieldDefs[i].InternalCalcField )
    and ( AnsiUpperCase(QuCloneData.Fields[i].FieldName) <> AnsiUpperCase( fKeyFieldName ) )) then begin
      if Trim( FieldString ) <> '' then begin
        FieldString := FieldString + ',';
        ParamString := ParamString + ',';
      end;
      FieldString := FieldString + QuCloneData.Fields[i].FieldName;
      ParamString := ParamString + ':' + QuCloneData.Fields[i].FieldName;
    end;
  end;
  Mit Zitat antworten Zitat