Update bindsource and listview

Question

I am working on a Delphi XE5 Firemonkey Mobil app.

I use FireDac for connection.

Just trying to do a simple query insert into sQlite database and update the listview with the inserted info.

  procedure TTabbedwithNavigationForm.Button4Click(Sender: TObject);
   begin

   DataModule1.qSelectCustomers.SQL.Text := 'insert into Invoice (Name) values(:newName)';
   DataModule1.qSelectCustomers.ParamByName('newName').AsString := 'test';
   DataModule1.qSelectCustomers.ExecSQL;
   BindSourceDB1.DataSet.Refresh;
   ////LinkFillControlToField1.BindList.FillList;
  end;

My problem is i am getting error. error:= TFDQuery : Can not perform this operation on a closed dataset. I have tried opening the dats set but no go. Why will this not work ?

Why are you using the SELECT query to INSERT? Use a separate query for inserting, and one for deleting. See the Sample in the FireMonkey Mobile Code Snippets folder (it's the FireDACSQLLite demo). — Ken White
– Ken White, Commented Oct 4, 2013 at 1:10

Marcus Adams · Accepted Answer · 2013-10-04 01:19:29Z

3

You can insert a record into a dataset with a select query like this:

DataModule1.qSelectCustomers.SQL.Text := 'SELECT * FROM Invoice';
DataModuel1.qSelectCustomers.Active := True;
DataModule1.qSelectCustomers.Append;
DataModule1.qSelectCustomers.FieldByName('Name').Value := 'test';
DataModule1.qSelectCustomers.Post;

answered Oct 4, 2013 at 1:19

Marcus Adams

54k9 gold badges98 silver badges145 bronze badges

Sign up to request clarification or add additional context in comments.

Collectives™ on Stack Overflow

Update bindsource and listview

1 Answer 1

Comments

Your Answer

Linked

Hot Network Questions

Collectives™ on Stack Overflow

1 Answer 1

Comments

Your Answer

Sign up or log in

Post as a guest

Linked

Related