If you don't have any controls attached to your dataset that create a
datalink (such as a TDBGrid), then create one yourself. Having a
datalink with a reasonably sized buffercount speeds up dataset scrolling
considerably.
var DataLink: TDataLink;
In your Create:
DataLink := TDatalink.Create;
DataLink.DataSource := MyDataSet.DataSource;
DataLink.BufferCount := 20; // for example
In your Destroy
DataLink.Free;
Try it, it works.
Cheers,
Carl Reynolds Ph: +64-9-4154790
CJN Technologies Ltd. Fax: +64-9-4154791
[EMAIL PROTECTED] DDI: +64-9-4154795
PO Box 302-278, North Harbour, Auckland, New Zealand
12 Piermark Drive, North Harbour Estate, Auckland, NZ
Visit our website at http://www.cjntech.co.nz/
> -----Original Message-----
> From: Donovan J. Edye [SMTP:[EMAIL PROTECTED]]
> Sent: Monday, October 25, 1999 1:26 PM
> To: Multiple recipients of list delphi
> Subject: [DUG]: Responding to changes in record values...
>
> G'Day All,
>
> What I need to do is this:
>
> Update some UNBOUND screen controls based on some values in an
> underlying
> dataset. What I have done so far is a custom AfterScroll event that
> gets
> fired as the user moves around in the dataset. I also have a toggle
> that
> turns screen updates on and off. This works but:
>
> - There is a heap of scrolling around in the dataset which result in
> unecessary screen updates (Only the resting position is relevant)
> - Some of the updates to the screen controls are a bit complex and
> take a
> bit of time
> - I don't always have a clear indication of turn off
> controls....scroll.....turn on controls
>
> The result of this means that scrolling around in the dataset is
> getting to
> be unacceptably slow. I am looking for EFFICIENT ideas on how to
> resolve
> this. Any ideas / suggestions? The DBMS is Paradox.
>
> TIA
>
> ----------------------------------------------------------------------
> --
> --Donovan
> Donovan J. Edye [www.edye.wattle.id.au]
> Namadgi Systems, Delphi Developer
> Web: www.namsys.com.au E-Mail: [EMAIL PROTECTED]
> Voice: +61 2 6285-3460 Fax: +61 2 6285-3459
> TVisualBasic := Class(None);
> ----------------------------------------------------------------------
> --
>
> ----------------------------------------------------------------------
> -----
> New Zealand Delphi Users group - Delphi List -
> [EMAIL PROTECTED]
> Website: http://www.delphi.org.nz
application/ms-tnef
