07-22-2021, 09:51 AM
(This post was last modified: 07-22-2021, 09:52 AM by Сергей Александрович.)
There is a desire to press the Enter key to go to the next information input field.
The option with event processing does not work.
procedure TfmPayTovarEd.edKOLAsyncKeyPress(Sender: TObject;
EventParams: TStringList);
var
mValue : String;
begin
mValue := EventParams.Values['which'];
if EventParams.Values['which'] = '13' then
begin
ActiveControl := edEDIZM;
Self.Refresh;
end;
end;
In Delphi, I constantly use the "ActiveControl := edEDIZM;" And for some reason it doesn't work in IW. Can you tell me how to do this?
The option with event processing does not work.
procedure TfmPayTovarEd.edKOLAsyncKeyPress(Sender: TObject;
EventParams: TStringList);
var
mValue : String;
begin
mValue := EventParams.Values['which'];
if EventParams.Values['which'] = '13' then
begin
ActiveControl := edEDIZM;
Self.Refresh;
end;
end;
In Delphi, I constantly use the "ActiveControl := edEDIZM;" And for some reason it doesn't work in IW. Can you tell me how to do this?