Export Date Type to openOffice / libreOffice Delphi

Question

Export Date Type to openOffice / libreOffice Delphi

Navigation

#1 by (2 votes)

2

How can I export a Date type to openoffice / libreoffice when I need to export a String type I do it as follows.

 SheetOpenOffice.GetCellByPosition(vCont,vlinha).SetString(Q_Assoc.Fields[i].AsString);

How can I do when the type that comes in the query is a Date type?

delphi

asked by anonymous 18.04.2017 / 20:04

1 answer

Adding POSTGRESQL values Load the combobox

score 2 · Accepted Answer

Try to do this:

if ((DateToStr(Q_Assoc.Fields[i].Value) <> Null) and (DateToStr(Q_Assoc.Fields[i].Value) <> '')) then
    SheetOpenOffice.GetCellByPosition(vCont,vlinha).SetString(Q_Assoc.Fields[i].Value);