Setting cursor in the custom report explorer form.

rbuser

Hi,
How can I set the cursor on the custom report explorer form to the one I
want?
I have even tried the following code, but to no avail. Can you help me
please?

var
i :Integer;
begin
for i:=0 to Self.ComponentCount-1 do begin
if Self.Components[i] is TControl then
TControl(Self.Components[i]).Cursor:=crDefault;
end;
Self.Cursor:=crDefault;
Application.ProcessMessages;
end;

Thanks,
MB.

digitalmetaphors

The report explorer class sets it, so simply changing it on the report
explorer form replacement won't work. Look in ppRptExp.pas and change the
Execute method to not set it to crDefault.


Cheers,

Jim Bennett
Digital Metaphors