New Query Designer

rbuser

Hi,

I just tried the example download
(http://www.digital-metaphors.com/tips/ReplaceQueryTools.zip). It seems to
work fine when you create a new Data View (Data Tab, File|New...), but if
you try to modify a Data View nothing happens (when clicking on the tool bar
buttons). I'm using Delphi 5, RB 6.03 Ent on Win2000.

How do I get the Query Designer to activate (like it normally does, from the
Data View tool bar)?


Thank you,
Andrew

T. Andrew Lyric
LyricCode Software

digitalmetaphors

There is one additional step. You need to create a descendent of your query
dataview class, such a TdaBDEQueryDataview if you are using the BDE. The
method you need to override is

class function DataDesignerClass: TClass; override;

class function TdaQueryDataView.DataDesignerClass: TClass;
begin
Result := GetClass('TmyQueryDesigner');
end;

You'll also want to unregister the TdaBDEQueryDataView

daUnRegisterDataView(TdaBDEQueryDataView);

and register your new TmyBDEQueryDataView

daRegisterDataView(TmyBDEQueryDataView);


Cheers,

Jim Bennett
Digital Metaphors