Funções para trabalhar com data no interbase

{A primeira pega a data atual do sistema e retorna a data pronta para ser incluída em um comando INSERT através do delphi. O segunda recebe como parâmetro uma data qualquer e retorna a data pronta para ser utilizada em um comando INSERT.}

Function DataAtualIB : String;
Begin
Result := '''' + FormatDateTime('mm/dd/yyyy', Now) + '''';
End;

Function DataIB(dData : TDateTime) : String;
Begin
Result := '''' + FormatDateTime('mm/dd/yyyy', dData) + '''';
End;