Version 6.50.0.34
The following procedure cause an access violation
procedure TForm3.Button1Click(Sender: TObject);
begin
FConnectDialog := TConnectDialog.Create(Self);
FConnectDialog.GetServerList(ComboBox1.Items);
end;
Bye
TConnectDialog - GetServerList AccessViolation !!
To prevent the error set Session for the TConnectDialog component:
Code: Select all
FConnectDialog := TConnectDialog.Create(Self);
TDBAccessUtils.SetConnection(FConnectDialog, OraSession1);
FConnectDialog.GetServerList(ComboBox1.Items);