[Neftali [Germán.Estévez]]

Empezado por Wbarrantes

Pues efectivamente no tengo contemplado el ftWideString, como podria agregarlo?

En el Case:

Código Delphi [-]
  case fld.DataType of

Habría que ir añadiendo los que faltan; Por ejemplo, al final puedes poner:

Código Delphi [-]
    ftLargeInt: Result := '"i8"';
    ftWideString: Result := '"string" WIDTH="' + IntToStr(fld.Size) + '"';