OraSes.Connected := true;
  ods.SQL.Text := 'select 1 from dual';
  ods.Open;
  ods.SQL.Text := 'select ''a'' from dual';
  ods.Refresh; // Project Project1.exe raised exception class EConvertError with message ''a' is not a valid floating point value'. Process stopped. Use Step or Run to continue.