Thread Rating:
  • 212 Vote(s) - 2.9 Average
  • 1
  • 2
  • 3
  • 4
  • 5
delete-all ではレコードは実際に削除されていない?
10-24-2013, 08:05 PM,
#1
delete-all ではレコードは実際に削除されていない?

ReocrdSet.delete-all をコールした際、RecordsBulkChanges が発生すると思いますが、
このイベントの中で、レコードの数を見ると、削除される前の件数が取得されます。

after 句を使っても、件数は同じでした。

どうすれば、削除されたあとの件数(つまり0件)を取得できますか?

Code:
{let rs:RecordSet =
    {RecordSet
        {RecordFields
            {RecordField "First", domain = String},
            {RecordField "Last", domain = String},
            {RecordField "Age", domain = int}
        },
        {RecordData First = "John", Last = "Smith", Age = 25},
        {RecordData First = "Jane", Last = "Smith", Age = 29},
        {RecordData First = "Jane", Last = "Jones", Age = 28},

        {on e:RecordsBulkChanges at rs:RecordSet do
            {popup-message "RecordsBulkChanges レコード数:" & rs.size}
            {after 1s do
                {popup-message "RecordsBulkChanges after レコード数:" & rs.size}
            }
        },
        {on e:RecordRemoved at rs:RecordSet do
            {popup-message "RecordRemoved レコード数:" & rs.size}
        }

    }
}
{def rg = {RecordGrid record-source = rs}}

{VBox rg,
{CommandButton
    label = "delete-all",
    {on Action do
        {rs.delete-all}
    }
}}
Reply


Messages In This Thread
delete-all ではレコードは実際に削除されていない? - by umemura - 10-24-2013, 08:05 PM

Possibly Related Threads...
Thread Author Replies Views Last Post
  Reocrd.delete では、RecordRemoved イベントは発生しない? umemura 1 2,436 10-26-2013, 07:28 PM
Last Post: John Abraham
Forum Jump:


Users browsing this thread:
1 Guest(s)

MyBB SQL Error

MyBB has experienced an internal SQL error and cannot continue.

SQL Error:
1017 - Can't find file: 'mybb_threadviews' (errno: 2)
Query:
INSERT INTO mybb_threadviews (tid) VALUES('996')