[Lazarus] External SIGSEGV (random) when assigning TBookmark

Leonardo M. Ramé l.rame at griensu.com
Sun Nov 1 13:25:08 CET 2015

Hi, I don't use data aware controls too often, but as I'm updating a 
legacy application I have to use them.

Please take a look at this code. DataModule1.SQLQuery1 is a simple 
"select * from customers limit 10". What I want to accomplish is the 
refreshing of a DBGrid *without losing the focused row*, that's why I 
use a TBookmark.

To me, the code looks correct, but I'm getting a SIGSEGV while assigning 
the bookmark. I must add the error only happens the 2nd or 3rd time this 
method is called:

   lOldStatus: string;
   lBookmark : TBookmark;
   lOldStatus := StatusBar1.Panels[1].Text;
   StatusBar1.Panels[1].Text := 'Updating...';
   lBookmark := DataModule1.SQLQuery1.Bookmark;
   DataModule1.SQLQuery1.Bookmark := lBookmark; <-- Random SIGSEGV
   StatusBar1.Panels[1].Text := lOldStatus;

Leonardo M. Ramé
Medical IT - Griensu S.A.
Av. Colón 636 - Piso 8 Of. A
X5000EPT -- Córdoba
Tel.: +54(351)4246924 +54(351)4247788 +54(351)4247979 int. 19
Cel.: +54 9 (011) 40871877

More information about the Lazarus mailing list