Hi Neven Sounds perfect and no problem as we have to change all our reports anyway. I will try it as soon as I find the settings I need for my ODBC driver :)
Rob Martin Software Engineer phone 03 377 0495 fax 03 377 0496 web www.chreos.com ----- Original Message ----- From: "Neven" <[EMAIL PROTECTED]> To: "NZ Borland Developers Group - Delphi List" <[EMAIL PROTECTED]> Sent: Thursday, April 15, 2004 5:31 PM Subject: RE: [DUG] Crystal reports > 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 > > _______________________________________________ Delphi mailing list [EMAIL PROTECTED] http://ns3.123.co.nz/mailman/listinfo/delphi
