Zitat von
shmia:
Delphi-Quellcode:
function AddLookupField(ADataSet: TDataSet; AFieldClass: TFieldClass; const AFieldName: string; const AFieldSize: Integer = 0): TField;
procedure CreateAllFields(DS: TDataSet);
begin
with TDataSetCracker(DS) do
begin
DestroyFields;
FieldDefs.Update;
CreateFields;
end;
end;
begin
.
.
end;
Hey! Vielen Dank für deine Antwort!
Ich wollte es gleich ausprobieren, aber beim übertragen fiel mir "TDataSetCracker" auf. Was ist das für ein Type?
Bei Delphi 2.0 (auch bei D7) finde ich darüber nichts in der Hilfe und aus deinem Code-Snipet kann ich leider auch nicht erkennen was für ein Typ dies ist.
Gruß