Subject RE: [IBO] IB_Export bug
Author IBO Support List
Post date 2015-01-02T20:36:44Z
I have attempted to duplicate this problem but so far I have not been able to see any incorrect behavior.
 
Would you please put together a little sample app that you confirm actually shows the problem?
 
Thanks,
Jason Wharton
 

From: IBObjects@yahoogroups.com [mailto:IBObjects@yahoogroups.com]
Sent: Monday, December 8, 2014 6:37 AM
To: IBObjects@yahoogroups.com
Subject: [IBO] IB_Export bug

Hi
After upgrading from IBO 4.9 to IBO 5.5.5.2152 exporting to dbf is broken. Integer fields are all "0", string fields truncated to first char.
Delphi XE3. Installed d2014 packages (d2013 do not compile).

Code to reproduce:
Drop on form
IB_connection,
IB_Query connected to IB_connection,
IB_Export connected to TIB_Query.

  if not IB_Export1.Dataset.IB_Connection.Connected then
    Exit;
  with IB_Export1 do
  try
    Screen.Cursor := crHourGlass;
    Dataset.SQL.Text := 'select some fields from any table';
    Dataset.Open;
    FileName := 'Any path';
    ExportFormat := efDBF;
    Execute;
  finally
    Screen.Cursor := crDefault;
    if Dataset.Active then
      Dataset.Close;
  end;

Regards, Tomek