title: Delphi 10.1 FireDac and Sqlite date issue
body: <p>I have a table that is created in my android app.</p>
  
  <pre><code>CREATE TABLE IF NOT EXISTS `TimeSheet  
    `TKey` INTEGER PRIMARY KEY AUTOINCREMENT,
    `PriKey1` INT NOT NULL,
    `PriKey2` DEFAULT NULL,
    `PriKey3` DEFAULT NULL,
    `STime` DATETIME DEFAULT NULL,
    `ETime` DATETIME DEFAULT NULL,
    `Note` BLOB);
  </code></pre>
  
  <p>I have loaded some data using various dates.</p>
  
  <p>And I need to filter so as only one days data is shown at a time.</p>
  
  <p>Delphi code to do so is below</p>
  
  <pre><code>FD := "a date";
  QuTimeSheet.Active := False;
  QuTimeSheet.SQL.Text := 'Select Date(STime) as SDate, Time(STime) as STime,     Time(ETime) as ETime, Task.TaskName From TimeSheet' + #13 + #10 +
  '  LEFT JOIN task ON (TimeSheet.PriKey1 = task.TKey)';// + #13 + #10 +
  'Where SDate = ''' + formatdatetime('YYYY-MM-DD',FD) + ''';';
  QuTimeSheet.Active := True;
  </code></pre>
  
  <p>If I remove the where statement SDate has some DD-MM-1800 date. Which tells me that the Date(STime) dosent work in Delphi.</p>
  
  <p>Have also tried strfTime(%Y-&amp;M-%D, STime) as SDate</p>
  
  <p>Delphi dosent seem to like strfTime android device crashes.</p>
  
  <p>Have tried using a filter</p>
  
  <pre><code>  QuTimeSheet.Filtered := False;
    QuTimeSheet.Filter := 'SDate = ''' + formatdatetime('YYYY-MM-DD',FD) + '''';
    QuTimeSheet.Filtered := True;
  </code></pre>
  
  <p>or</p>
  
  <pre><code>  QuTimeSheet.Filtered := False;
    QuTimeSheet.Filter := 'SDate = ''' + Datetostr(FD) + '''';
    QuTimeSheet.Filtered := True;
  </code></pre>
  
  <p>This filters nothing.</p>
  
  <p>This is such a simple where statement that works in MySql and on the Sqlite turorials site. </p>
  
  <p>Why not in my app.</p>