direct assignations , invalid pointer

Discussion of open issues, suggestions and bugs regarding to (known as Delphi HL7) HL7 Components
Post Reply
ppb
Posts: 9
Joined: Sat Sep 08, 2012 11:09 am

direct assignations , invalid pointer

Post by ppb »

Hello everybody,

this code works fine in versión 1.7.3

Code: Select all

var
msgRequest: TbsOML_O21_25;
msgPro: TbsORL_O22_25;
begin
   msgRequest := TbsOML_O21_25.Create;
   msgRequest.AsHL7 := Memo1.Lines.Text;
   msgPro := TbsORL_O22_25.Create;
   memo2.Lines.Text:= msgRequest.AsHL7;
   msgRequest.PATIENT.PID.AsString:=msgResponse.RESPONSE.PATIENT.PID.AsString;
end;

but in versions greater than 1.7.3 , it occurs an exception “Invalid pointer operation”
in "msgRequest.PATIENT.PID.AsString:=msgResponse.RESPONSE.PATIENT.PID.AsString",
we have trying with 1.7.9 and 1.7.10, it seem that any direct assignation gets exception
¿ How can we do these direct assignations ? with some type of cast ?

We are using professional edition.

Thanks for your help.
admin
Site Admin
Posts: 256
Joined: Sun Jun 05, 2011 8:06 pm

Re: direct assignations , invalid pointer

Post by admin »

Hi,

This problem fixed with version 1.7.11.

Best Regards.
Post Reply

Who is online

Users browsing this forum: No registered users and 1 guest