SQLite Forum

Well if all you say is true, then there is nothing wrong with any of what you done, nothing wrong with SQLite, nor Delphi, and the answer is something like "Something weird is afoot on your system".

But since, I'm an unbeliever in magic, could you do the following:

Drop a TMemo on the main form, make it nice and big. I'm assuming the default name of "Memo1"

in the button click add this code:

```
procedure ....
  var n : Integer;
      a : AnsiString;
begin  
  Memo1.Clear;
  for n:=0 to sqlconnection1.params.count-1 do 
    memo1.Lines.Add(sqlconnection1.params[n]);

  Memo1.Lines.Add('');
  Memo1.Lines.Add('Driver:     '+sqlconnection1.DriverName);
  Memo1.Lines.Add('lib:        '+sqlconnection1.LibraryName);
  Memo1.Lines.Add('Connection: '+sqlconnection1.ConnectionName );

  Memo1.Lines.Add('Metadata:   '+
    IntToStr(Integer(sqlconnection1.ColumnMetaDataSupported)));

  Memo1.Lines.Add('Filecheck1: '+ 
    IntToStr(Integer(FileExists('c:\newff\myfile.db')));

  Memo1.Lines.Add('Filecheck2: '+ 
    IntToStr(Integer(FileExists(sqlconnection1.params.Values[2])));

  try
    with TFilestream.Create(sqlconnection1.params.Values[2],fOpenRead or fmShareDenyNone) do begin
      SetLength(a,15);
      ReadBuffer(a[1],15);
      Free;
    end;
  except 
    on Ex:Exception do a:='Exception: '+Ex.Message;
  end;

  Memo1.Lines.Add('SQLite Mark: '+String(a));

end;

```
I typed it from my head so please correct any syntax errors.

Run it and paste us the resulting text in the memo.

If the compiler fails on any of those that will also be very telling, so please let us know.