Оптимізація вкладених циклів

 

Як розлочити юзера в лінукс?

 Юзер був заблочений через 3 невдалих ввода пароля. І треба чекати 10 хвилин.

Ось одне із існуючих рішень:

# faillock --user username --reset

Gnome: Як виводити нові вікна в центр?

Дуже не подобається що нові вікна відкриваються де попало. Я очикую нове вікно по центру екрана. І для цього є чудова команда 

 gsettings set org.gnome.mutter center-new-windows true

Насолоджуйтесь. 

Мирного неба. 

Как словить событие формы OnMove в Delphi

Я не нашел такого события OnMove для формы в Delphi XE8. Как дела обстоят в более старших версиях не знаю. Но вот как это решается для моего случая - просто добавляем обработчик сообщения WM_MOVE в форму:

procedure OnMove(var Msg: TWMMove); message WM_MOVE;

....

procedure TMyForm.OnMove(var Msg: TWMMove);
begin
  DoSomething;
end;

Сообщение WM_MOVE приходить когда пользователь схватил форму, перетащил и отпустил. Если вам нужно ловить событие во время самого движение добавьте обработчик WM_MOVING.

SSH Тунель

Ситуация: в офисе на рабочей машине крутиться несколько виртуальных машин, к которым я подключаюсь через RDP.  Иногда я работаю из дому. А открыт только SSH к моей рабочей машине.
Я думал просить, что бы админ пробросил еще порты на некоторые виртуалки, но... сами понимаете. Никто не хоче делать из своего сервера решето.
Но как оказалось одного проброшенного 22 порта хватает для множества задач.
Можно пробросить порты через SSH тунель

ssh -N -p 22123 myoffice.com -L 55389:localhost:3389

тут
-N не выполнять команд на той стороне

-p 22123 порт сервера, который проброшен на 22 порт моей офисной машины

-L 55389:localhost:3389 а это как рази есть прброс порта через SSH. Тут 55389 это порт, который будет на моей домашней машине, а 3389 это порт который на моей офисной машине.
После этого нужно просто подключиться к своей домашней машине на порт 55389.

 xfreerdp /v:localhost:55389 /bpp:16 /workarea -decorations +auto-reconnect

А вот так можно пробросить сразу несколько портов:

ssh -N -p 22055 myoffice.com -L 55389:localhost:3389 -L 55390:localhost:3390 -L 55621:localhost:6021 -L 55622:localhost:6022

Как отключить Blueman-applet в KDE

Я пользуюсь разными окружениями KDE, awesome, qtile... по настроению или в зависимости от текущих задач.
Мне нужен bluetooth т.к. я пользуюсь bluetooth наушниками.
В KDE есть bluedevil, а для других WM я пользуюсь blueman-applet.
Но blueman-applet запускается в KDE, хотя где это прописано я не смог найти.
Зато нашел решение как запретить блюману запускаться в KDE.

1.  cp /etc/xdg/autostart/blueman.desktop ~/.config/autostart
2. vim  ~/.config/autostart/blueman.desktop
3. Дописать

   NotShowIn=KDE

Как отключить BEEP в TEdit при нажатии Enter?

Нужно просто обнулить переменную Key в обработчике OnKeyPress

procedure TfrmMain.cbxTestCaseFilterKeyPress(Sender: TObject; var Key: Char);
begin
  case Ord(Key) of
    // {Enter} Apply Filter
    13: begin
          actTestCaseFilterApply.Execute;
          Key := #0;
        end;