Action := TBasicAction.Create(Self);
{ Set the OnExecute event handler. }
Action.OnExecute := BtnRafSorgula.OnClick;