I'm not aware of this. Please send me a sample application to look at.

Thanks,
Jason Wharton

----- Original Message -----
From: "crazymenconnected" <CrazyMenConnected@...>
To: <IBObjects@yahoogroups.com>
Sent: Sunday, January 10, 2010 4:52 PM
Subject: [IBO] TMemoField.AsString AccessViolation


> I'm getting an AC when I try to access a text blob field.
> Whenever the code TMemoField.AsString is run an access violation is
> triggered!
> (my actual code is below)
>
> Does anyone, has experienced this same behaviour?
> I think this bug was on 4.9.8 but I didn't even notice it, I was just
> upgrading to 4.9.9 and I stumbled upon it.
>
> Jason, are you aware of this, will there be a fix soon? Or was this bug
> recently introduced?
>
> Thanks for you time.
>
> SQL
> @
> CREATE TABLE COMPANY (
> ID BIGINT NOT NULL,
> NAME VARCHAR(64) NOT NULL COLLATE PT_BR,
> DESCRIPTION VARCHAR(256),
> ADDRESS BLOB SUB_TYPE 1 SEGMENT SIZE 256 CHARACTER SET ISO8859_1,
> PHONE CHAR(32) COLLATE PT_BR,
> FAX CHAR(32) COLLATE PT_BR,
> EMAIL VARCHAR(128) COLLATE PT_BR,
> WEB VARCHAR(64) COLLATE PT_BR
> );
> @
>
> Delphi 2009 Code
> @
> // Load the company information
> if IBO_Connection.Connected then
> begin
> if GET_COMPANY_.Active then GET_COMPANY_.Active := false;
> GET_COMPANY_.Active := true;
> FCompanyInfo.id := GET_COMPANY_ID.AsLargeInt;
> FCompanyInfo.name := GET_COMPANY_NAME.AsString;
> FCompanyInfo.description := GET_COMPANY_DESCRIPTION.AsString;
> FCompanyInfo.address := GET_COMPANY_ADDRESS.AsString;
> FCompanyInfo.phone := GET_COMPANY_PHONE.AsString;
> FCompanyInfo.fax := GET_COMPANY_FAX.AsString;
> FCompanyInfo.email := GET_COMPANY_EMAIL.AsString;
> FCompanyInfo.web := GET_COMPANY_WEB.AsString;
> CFG_GET_COMPANY_.Active := false;
> end;
> @
>