Robert

What we do is use a file dsn and write it before
we launch the report, the only limit is that you
have to design thev report with a file dsn

HTH

Neven

-----Original Message-----
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] Behalf Of Robert martin
Sent: Thursday, 15 April 2004 4:28 p.m.
To: [EMAIL PROTECTED]; NZ Borland Developers Group - Delphi List
Subject: Re: [DUG] Crystal reports


Thanks Rohit

But..  your example works by changing between DSNs  (my code also works for
that:) ).  I would have prefered not to have to create a DSN for every
database the software connects to.  However it seems I may have to o(


Rob Martin
Software Engineer

phone 03 377 0495
fax 03 377 0496
web www.chreos.com
----- Original Message ----- 
From: "Rohit Gupta" <[EMAIL PROTECTED]>
To: "NZ Borland Developers Group - Delphi List" <[EMAIL PROTECTED]>
Sent: Thursday, April 15, 2004 4:00 PM
Subject: Re: [DUG] Crystal reports


> Excerpt from ours - it works with 8.5 and ODBC.  You do have to
> have the ODBC alias setup correctly
>
>             Tables.Propagate  := true;
>             Connect.Propagate := true;
>             { Connect to Database }
>             if Connect.ServerName <> IB_Alias then
>             with Connect
>             do begin
>                ServerName := IB_Alias;
>                UserID     := IBNrm_User;
>                Password   := IBNrm_Pwd;
>                Propagate  := true;
>             end;
>
> >
> > Hi
> >
> > I am working with an ODBC based crystal report. At runtime I want to be
able to change the DB
> > the report is looking at (without having multiple DSN's defined). The
crystal Help suggests this is
> > possible using the .connect properties however they seem to be ignored
when I set them.
> >
> > var
> >  cr : TCrpe;
> >  cnt : Integer;
> > begin
> >  cr := TCrpe.Create(Self);
> >  try
> >  cr.ReportName := 'C:\a.rpt';
> >  cr.Connect.Clear;
> >  cr.Connect.DatabaseName := '<CRWDC>DSQ=' + Edit1.Text;
> >  cr.Connect.Propagate := True;
> >  cr.Show;
> >
> >  while (cr.ReportWindowHandle <> 0) do begin
> >  Application.ProcessMessages;
> >  end;
> >  finally
> >  cr.Free;
> >  end;
> >
> >
> > I have also tried 'Database' instead of 'DSQ' as suggested in the help
but to no avail. I am using
> > Crystal 8.5 and the Firebird ODBC driver. Any suggestions?
> >
> >
> >
> >
> > Rob Martin
> > Software Engineer
> >
> > phone 03 377 0495
> > fax 03 377 0496
> > web www.chreos.com
>
> Regards
>
> Rohit
>
> ======================================================================
> CFL - Computer Fanatics Ltd.  21 Barry's Point Road, AKL, New Zealand
> PH    (649) 489-2280
> FX    (649) 489-2290
> email [EMAIL PROTECTED]  or  [EMAIL PROTECTED]
> ======================================================================
>
>
> _______________________________________________
> Delphi mailing list
> [EMAIL PROTECTED]
> http://ns3.123.co.nz/mailman/listinfo/delphi
>
>

_______________________________________________
Delphi mailing list
[EMAIL PROTECTED]
http://ns3.123.co.nz/mailman/listinfo/delphi



_______________________________________________
Delphi mailing list
[EMAIL PROTECTED]
http://ns3.123.co.nz/mailman/listinfo/delphi

Reply via email to