When user send Shift+Shift+F7

krasi_varna_77 · 2007-10-08

When I run a form triger OnFindRecord is started. when the user press keys Shift+Ctrl+F7 or button which clear a filters triger OnFindRecord strated again. how I determined when is pressed toolbar for clear filters

Waldo · 2007-10-08

Afaik, this is not possible, I'm afraid.
The pointer doesn't leave the record, because the record is still displayed. That's why no trigger is "fired".

krasi_varna_77 · 2007-10-08

So . than give me a idea what I set a filter when I start a Customer List, and when I send Shift+Ctrl+F7 this filter clear

lubost · 2007-10-08

I think that FILTERGROUP command can solve your problem.

ara3n · 2007-10-08

Create another customer variable. On open form copyfilters from rec to this variable.

add you code onaftergetrecord to compare the filters to rec and if they are different, you know that the user has changed the filters.

krasi_varna_77 · 2007-10-08

I use triger

Form_OnFindRecord()
EXIT(SetFilterPerUser);

Form_OnAfterGetRecord
......

SetFilterPerUser() : Boolean

IF Users.GET(USERID) THEN BEGIN
CASE Users."Job Type" OF
Users."Job Type"::Salesperson : BEGIN
RESET;
SETRANGE("Salesperson Code",Users."Person Code");
RecordFind:=FINDFIRST;
CurrForm.EDITABLE:=TRUE;
EXIT(RecordFind);
END;
Users."Job Type"::Speditor,Users."Job Type"::SeniorSpeditor : BEGIN
RESET;
SETRANGE("Senior Speditor",Users."Person Code");
RecordFind:=FINDFIRST;
CurrForm.EDITABLE:=TRUE;
EXIT(RecordFind);
END;
END;
END;

this triger is execute one way started the form and second when user press key Shift+Ctrl+F7

Yaroslav_Gaponov · 2007-10-08

Hi All

FILTERGROUP := 2;
set filters ....
FILTERGROUP := 0;

When user send Shift+Shift+F7

Comments

Categories