TUniCustomDBGrid.MoveToRow(): Unexpected Row number: 0, 3.

[Wilton Ergon]

9 minutes ago, picyka said:

Você usa grid para manipular dados?

only in low-access forms, such as editing auxiliary tables, which are rarely changed.
in all others when I use the grid and only for data visualization.

[picyka]

Right, I use grid only to visualize data, I think that in the web world, it would be the most appropriate, just my opinion.

[eduardosuruagy]

3 hours ago, Wilton Ergon said:

em algumas telas de uso intenso, simplesmente abandonei o uso do grid, crio listas em html puro, onde o resultado visual é bem mais bonito, mais rápido, e não dá todos esses problemas, podemos nos contentar com o que ter..

If you can give me an example, I'd appreciate it, when you have the native option to mark the record, that's where the error happens

[Mossy]

4 hours ago, Wilton Ergon said:

in some screens of intense use, I simply abandoned the use of the grid, I create lists in pure html, where the visual result is much prettier, faster, and it doesn't give all these problems, we can make do with what we have..

Hi

Is it possible to share this code?

Regards

[lcolombo]

Hi,

We use Advantage Database Server and had the same error continuously. We fixed it by changing the following option of the TAdsTable component:

Sequenced := true;

SequencedLevel := slExact;

 

Regards,

[Denton]

Hi,

For me, it happens when I have an event in UniDBGrid and ActionColumn:

And the events execute this code:

And this happens(it only happens the first time u delete a row):

 

but when u remove the OnCellClick event, the bug wont show.

Any idea how to resolve it ?

 

[Sherzod]

On 10/9/2022 at 6:44 AM, Denton said:

but when u remove the OnCellClick event, the bug wont show.

Any idea how to resolve it ?

Hello,

Can you please make a simple testcase to reproduce?

[Denton]

Hi

15 hours ago, Sherzod said:

Can you please make a simple testcase to reproduce?

Here.. if u remove the OnCellClick event the bug wont show...

GridCheckBox.rar

[Sherzod]

@Denton

Yes, I see the issue...

[Sherzod]

@Denton

If this suits you, you may need confirmation, which gives you a workaround:

procedure TMainForm.UniDBGrid1ColumnActionClick(Column: TUniDBGridColumn;
  ButtonId: Integer);
begin
  MessageDlg('Are you sure..?', mtConfirmation, [mbYes, mbNo],
    procedure (AComponent: TComponent; ARes: Integer)
    begin
      if ARes = mrYes then
        UniMainModule.ClientDataSet1.Delete;
    end
  )
end;

 

[Denton]

Hi @Sherzod

1 hour ago, Sherzod said:

If this suits you, you may need confirmation, which gives you a workaround:

in my case i dont use delete ActionColumn.. I use add Action Column which when clicked, the data goes to another grid.. so it doesnt need confirmation..

[Sherzod]

1 hour ago, Denton said:

in my case i dont use delete ActionColumn.. I use add Action Column which when clicked, the data goes to another grid.. so it doesnt need confirmation..

Okay. But it seems to me that the error is related to the deletion of the record!?

[Denton]

25 minutes ago, Sherzod said:

Okay. But it seems to me that the error is related to the deletion of the record!?

Sorry.. i forgot to mention.. when i click add, the row gets deleted from UniDBGrid1 and added to UniDBGrid2..

[Sherzod]

3 minutes ago, Denton said:

Sorry.. i forgot to mention.. when i click add, the row gets deleted from UniDBGrid1 and added to UniDBGrid2..

Well, as a workaround, can you add first and then delete?

[Denton]

12 minutes ago, Sherzod said:

Well, as a workaround, can you add first and then delete?

did not work.. bug still shows.. my code:

[lcolombo]

What database do you use?

We use ADS by SAP and we had to check the Sequenced option in the dataset to avoid this problem.

Regards

[Denton]

8 minutes ago, lcolombo said:

What database do you use?

We use MariaDB..

10 minutes ago, lcolombo said:

we had to check the Sequenced option

where can i find this option?

[lcolombo]

https://docwiki.embarcadero.com/Libraries/Alexandria/en/Data.DB.TDataSet.IsSequenced

[Denton]

17 minutes ago, lcolombo said:

https://docwiki.embarcadero.com/Libraries/Alexandria/en/Data.DB.TDataSet.IsSequenced

thanks.. will try this..

[zhyhero]

On 10/11/2022 at 1:36 PM, Denton said:

Hi

Here.. if u remove the OnCellClick event the bug wont show...

GridCheckBox.rar 7.64 kB · 4 downloads

I am not sure this is helpful , something (procedure or function) delayed untill OnCellClick. 

So i changed your source code.

 

type

  TMainForm = class(TUniForm)
    UniDBGrid1: TUniDBGrid;
    UniDBNavigator1: TUniDBNavigator;
    DataSource1: TDataSource;
    procedure UniFormCreate(Sender: TObject);
    procedure UniDBGrid1ColumnActionClick(Column: TUniDBGridColumn; ButtonId: Integer);
    procedure UniDBGrid1CellClick(Column: TUniDBGridColumn);
  private
    { Private declarations }
    DeleteJobReady: boolean;
  public
    { Public declarations }
  end;

function MainForm: TMainForm;

implementation

{$R *.dfm}

uses
  uniGUIVars, MainModule, uniGUIApplication, StrUtils;

function MainForm: TMainForm;
begin
  Result := TMainForm(UniMainModule.GetFormInstance(TMainForm));
end;

procedure TMainForm.UniDBGrid1CellClick(Column: TUniDBGridColumn);
begin
  if DeleteJobReady then
  begin
    UniMainModule.ClientDataSet1.Delete;
    DeleteJobReady := false;
  end;
end;

procedure TMainForm.UniDBGrid1ColumnActionClick(Column: TUniDBGridColumn; ButtonId: Integer);
begin
  DeleteJobReady := true;
end;

procedure TMainForm.UniFormCreate(Sender: TObject);
var
  I: Integer;
begin
  DeleteJobReady := false;
  with UniMainModule.ClientDataSet1 do
  begin
    for I := 1 to 100 do
    begin
      Append;
      FieldByName('EmpNo').AsInteger    := I;
      FieldByName('Lastname').AsString  := Char(65 + Random(28));
      FieldByName('Firstname').AsString := Char(65 + Random(28));

      FieldByName('shift').AsBoolean     := Random(2) = 1;
      FieldByName('BoolInt').AsInteger   := Random(2);
      FieldByName('Boolstring').AsString := IfThen(Random(2) = 0, 'set', 'unset');
      Post;
    end;
    First;
  end;
end;

 

[FFREDIANELLI]

I had this erros in version 1561, but magicaly enabling buffered store the error disapeeared !

[eduardosuruagy]

On 10/12/2022 at 20:59, FFREDIANELLI said:

Eu tive esses erros na versão 1561, mas ativando magicamente o armazenamento em buffer, o erro desapareceu!

I've been living with this error for a long time and nobody found out what it was

[FFREDIANELLI]

Hi Eduardo, and enabling buffer do not solved the problem ?

[eduardosuruagy]

1 hour ago, FFREDIANELLI said:

Oi Eduardo, e habilitar buffer não resolveu o problema ?

I can't enable buffering, clients want to see all records in a single screen

[eduardosuruagy]

If this helps the Unigui people, the eurekalog errors are attached.

SigefWeb_SERVIDORUNIGUI_20221229113625.el SigefWeb_SERVIDORUNIGUI_20221229113601.el SigefWeb_SERVIDORUNIGUI_20221229113607.el SigefWeb_SERVIDORUNIGUI_20221229113611.el SigefWeb_SERVIDORUNIGUI_20221229113616.el SigefWeb_SERVIDORUNIGUI_20221229113621.el