Thema: Field exists

Einzelnen Beitrag anzeigen

bernhard_LA

Registriert seit: 8. Jun 2009
Ort: Bayern
1.136 Beiträge
 
Delphi 11 Alexandria
 
#1

Field exists

  Alt 20. Dez 2014, 13:51
Datenbank: MSSQL • Version: 12 • Zugriff über: ADO
Hallo ,


wie frage ich denn am besten bei einer sehr großen DB Tabelle ab ob ein bestimmtes Feld existiert oder nicht

Ich möchte ***Keine *** Query oder Tabelle öffnen ... mit doesem Code habe ich deshalb so meine Probleme



Delphi-Quellcode:
function FindFieldInDB (DataSet: TDataSet; FieldName: String): Boolean;
var
  findField: TField;
begin
  Result := false; {Posit failure}

  findField := nil;
  findField := DataSet.FindField(FieldName);
  if Assigned(findField) then
  begin
    Result := not (findField.Calculated);
  end;
end;
  Mit Zitat antworten Zitat