Warum Platzhalter? (wo du ja noch nichtmal das B auswertest)
Delphi-Quellcode:
ftUnknown: ;
ftString: ClientDataSet.FieldDefs.Add(...
ftWideString: ClientDataSet.FieldDefs.Add(...
ftInteger: ClientDataSet.FieldDefs.Add(...
ftSmallint: ;
ftCurrency: ;
ftAutoInc: ClientDataSet.FieldDefs.Add(...
ftWord: ;
ftFloat: ;
ftBoolean: ;
ftBCD: ;
ftTime: ;
ftDate: ;
ftDateTime: ;
ftBytes: ;
ftVarBytes: ;
ftBlob: ;
ftMemo: ;
ftGraphic: ;
ftFmtMemo: ;
ftParadoxOle: ;
ftDBaseOle: ;
ftTypedBinary: ;
ftCursor: ;
ftFixedChar: ;
ftLargeint: ;
ftADT: ;
ftArray: ;
ftReference: ;
ftDataSet: ;
ftOraBlob: ;
ftOraClob: ;
ftVariant: ;
ftInterface: ;
ftIDispatch: ;
ftGuid: ;
ftTimeStamp: ;
ftFMTBcd: ;
else {Fehler oder was weiß ich .... kommt man überhaut hier jemals vorbei?};
Wobei ich es wohl eher etwa so lösen würde.
Hier hätte man auch 'ne bessere Kontrolle über alles, welches schon implementiert ist.
Delphi-Quellcode:
//ftUnknown: ;
ftString: ClientDataSet.FieldDefs.Add(...
ftWideString: ClientDataSet.FieldDefs.Add(...
ftInteger: ClientDataSet.FieldDefs.Add(...
//ftSmallint: ;
//ftCurrency: ;
ftAutoInc: ClientDataSet.FieldDefs.Add(...
//ftWord: ;
//ftFloat: ;
//ftBoolean: ;
//ftBCD: ;
//ftTime: ;
//ftDate: ;
//ftDateTime: ;
//ftBytes: ;
//ftVarBytes: ;
//ftBlob: ;
//ftMemo: ;
//ftGraphic: ;
//ftFmtMemo: ;
//ftParadoxOle: ;
//ftDBaseOle: ;
//ftTypedBinary: ;
//ftCursor: ;
//ftFixedChar: ;
//ftLargeint: ;
//ftADT: ;
//ftArray: ;
//ftReference: ;
//ftDataSet: ;
//ftOraBlob: ;
//ftOraClob: ;
//ftVariant: ;
//ftInterface: ;
//ftIDispatch: ;
//ftGuid: ;
//ftTimeStamp: ;
//ftFMTBcd: ;
else Raise Exception.Create('
not implemented');