Subject | "Access Violation" on IB_CONNECTION1.Open |
---|---|
Author | hamacker |
Post date | 2010-11-25T13:21:10Z |
Hi, everybody.
I am in trouble because my application stop in this line :
IB_CONNECTION1.Open;
with error message "Access Violation".
I debug with step and go, and several loops in above line, but only
12o times stop.
(IB_Components.pas)
function TIB_Connection.GetProtocol: TIB_Protocol;
var
ProtocolString: string;
begin
ProtocolString := Uppercase( Params.Values[ IBO_PROTOCOL ] ); <---
Stop Here after some loops !
if ProtocolString = IBO_PROTOCOL_NETBEUI then Result := cpNetBEUI else
if ProtocolString = IBO_PROTOCOL_TCP_IP then Result := cpTCP_IP else
if ProtocolString = IBO_PROTOCOL_NOVELL then Result := cpNovell else
Result := cpLocal;
end;
I use IBO 4.8.7 and Delphi7 using TCP/IP protocol, loopback 127.0.0.1
to deploy, but using cpLocal is the same error.
Any help will be welcome.
H.
I am in trouble because my application stop in this line :
IB_CONNECTION1.Open;
with error message "Access Violation".
I debug with step and go, and several loops in above line, but only
12o times stop.
(IB_Components.pas)
function TIB_Connection.GetProtocol: TIB_Protocol;
var
ProtocolString: string;
begin
ProtocolString := Uppercase( Params.Values[ IBO_PROTOCOL ] ); <---
Stop Here after some loops !
if ProtocolString = IBO_PROTOCOL_NETBEUI then Result := cpNetBEUI else
if ProtocolString = IBO_PROTOCOL_TCP_IP then Result := cpTCP_IP else
if ProtocolString = IBO_PROTOCOL_NOVELL then Result := cpNovell else
Result := cpLocal;
end;
I use IBO 4.8.7 and Delphi7 using TCP/IP protocol, loopback 127.0.0.1
to deploy, but using cpLocal is the same error.
Any help will be welcome.
H.