Recent

Author Topic: IBX 2.7.2.1650 Bug?  (Read 444 times)

incendio

  • Sr. Member
  • ****
  • Posts: 358
IBX 2.7.2.1650 Bug?
« on: June 19, 2025, 02:09:59 am »
Hi guys,

I have fresh install Lazarus 4 32bit Windows and latest IBX from OPM.

Have this strange behaviour
Code: Pascal  [Select][+][-]
  1. procedure TForm1.Button2Click(Sender: TObject);
  2.  
  3. begin
  4.   Q.Close;
  5.   Q.SQL.Clear;
  6.   Q.SQL.Add('select title from m_rpt_col where ID_RPT = 2664 order by id rows 1' );
  7.   Q.Open;
  8.  
  9.   while not(Q.EOF) do
  10.   begin
  11.     ShowMessage(Q.FieldByName('title').AsString);    
  12.     ShowMessage('Field : ' + Q.FieldByName('title').AsString + 'cv');
  13.     Q.Next;
  14.   end;
  15. end;
  16.  
  17.  
Result from ShowMessage :
Code
Field : cv

When Q.FieldByName('title').AsString added to a string, it became empty.

Here is the sql for table
Code: Pascal  [Select][+][-]
  1. CREATE TABLE M_RPT_COL
  2. (
  3.   ID INTEGER NOT NULL,
  4.   ID_RPT INTEGER NOT NULL,
  5.   TITLE VARCHAR(60) NOT NULL,
  6.   WD SMALLINT NOT NULL,
  7.   ISTXT BOOLEAN DEFAULT TRUE NOT NULL,
  8.   CONSTRAINT INTEG_602 PRIMARY KEY (ID)
  9. );
  10.  
  11.  
  12. INSERT INTO M_RPT_COL (ID, ID_RPT, TITLE, WD, ISTXT) VALUES ('120', '2664', 'Code', '15', 'true');
  13. INSERT INTO M_RPT_COL (ID, ID_RPT, TITLE, WD, ISTXT) VALUES ('121', '2664', 'Counter', '40', 'true');
  14. INSERT INTO M_RPT_COL (ID, ID_RPT, TITLE, WD, ISTXT) VALUES ('122', '2664', 'Barcode', '30', 'true');
  15. INSERT INTO M_RPT_COL (ID, ID_RPT, TITLE, WD, ISTXT) VALUES ('123', '2664', 'Brand', '35', 'true');
  16. INSERT INTO M_RPT_COL (ID, ID_RPT, TITLE, WD, ISTXT) VALUES ('124', '2664', 'Sub Category', '30', 'true');
  17. INSERT INTO M_RPT_COL (ID, ID_RPT, TITLE, WD, ISTXT) VALUES ('125', '2664', 'Art', '40', 'true');
  18. INSERT INTO M_RPT_COL (ID, ID_RPT, TITLE, WD, ISTXT) VALUES ('126', '2664', 'Color', '50', 'true');
  19. INSERT INTO M_RPT_COL (ID, ID_RPT, TITLE, WD, ISTXT) VALUES ('127', '2664', 'Size', '15', 'true');
  20. INSERT INTO M_RPT_COL (ID, ID_RPT, TITLE, WD, ISTXT) VALUES ('128', '2664', 'Sld', '15', 'false');
  21. INSERT INTO M_RPT_COL (ID, ID_RPT, TITLE, WD, ISTXT) VALUES ('129', '2664', 'HPP', '20', 'false');
  22. INSERT INTO M_RPT_COL (ID, ID_RPT, TITLE, WD, ISTXT) VALUES ('130', '2664', 'Total', '25', 'false');
  23. INSERT INTO M_RPT_COL (ID, ID_RPT, TITLE, WD, ISTXT) VALUES ('131', '2664', 'Sls Prc', '20', 'false');
  24.  

Could this is a bug in IBX?
« Last Edit: June 19, 2025, 03:13:38 am by incendio »

incendio

  • Sr. Member
  • ****
  • Posts: 358
Re: IBX 2.7.2.1650 Bug?
« Reply #1 on: June 19, 2025, 06:33:52 am »
Tried with Lazarus 2.2.2 and IBX 2.7.4 from github, gave same problem.

incendio

  • Sr. Member
  • ****
  • Posts: 358
Re: IBX 2.7.2.1650 Bug?
« Reply #2 on: June 20, 2025, 03:26:57 am »
Tried with Lazarus 4 32bit Windows and IBX 2.5, it worked like expected.

 

TinyPortal © 2005-2018