- 1
- 2
- 3
- 4
- 5
- 6
- 7
if (App.TimerClock != null)
{
App.TimerClock.Enabled = false;
App.TimerClock.Close();
App.TimerClock.Dispose();
App.TimerClock = null;
}
Нашли или выдавили из себя код, который нельзя назвать нормальным, на который без улыбки не взглянешь? Не торопитесь его удалять или рефакторить, — запостите его на говнокод.ру, посмеёмся вместе!
+105
if (App.TimerClock != null)
{
App.TimerClock.Enabled = false;
App.TimerClock.Close();
App.TimerClock.Dispose();
App.TimerClock = null;
}
+126
{if $main eq "home"}
{include file="main.tpl"}
{elseif $main eq "404"}
{include file="404.tpl"}
{elseif $main eq "category"}
{include file="category.tpl"}
{elseif $main eq "object"}
{include file="object.tpl"}
{elseif $main eq "object_har"}
{include file="object_har.tpl"}
{elseif $main eq "review"}
{include file="review.tpl"}
{elseif $main eq "search"}
{include file="search.tpl"}
{elseif $main eq "search_alphabet"}
{include file="search_alphabet.tpl"}
{elseif $main eq "reviews"}
{include file="reviews.tpl"}
{elseif $main eq "best_objects"}
{include file="best_objects.tpl"}
{elseif $main eq "add_review"}
{include file="add_review.tpl"}
{elseif $main eq "new_review"}
{include file="new_review.tpl"}
{elseif $main eq "add_object"}
{include file="add_object.tpl"}
{elseif $main eq "register"}
{include file="register.tpl"}
{elseif $main eq "profile"}
{include file="profile.tpl"}
{elseif $main eq "profile_edit"}
{include file="profile_edit.tpl"}
{elseif $main eq "page"}
{include file="page.tpl"}
{/if}
smarty
и такое попадается
+139
type
TCriricalThread = class (TThread)
private
FileS : integer;
Percent : integer;
DlSize : integer;
procedure SetMaxPos;
procedure SetCurPos;
procedure LockButton;
procedure DislockButton;
protected
Ну, уж если есть критические секции, почему бы не сделать критический поток?
TCriricalThread = class (TThread)
+129
#include <stdio.h>
#include <dlfcn.h>
#include <getopt.h>
#include <string.h>
#include <stdlib.h>
#define int64 long long
const char* help =
" -h,--help это сообщение\
-f,--func имя функции\
-n,--num количество аргументов функции\
-a,--arg1 первый аргумент\
-b,--arg2 второй аргумент";
struct option longopts[] ={
{"func",1,NULL,'f'},
{"help",1,NULL,'h'},
{"num", 1,NULL,'n'},
{"arg1",1,NULL,'a'},
{"arg2",1,NULL,'b'},
{0,0,0,0}
};
void strtoa(void** arg, char* optarg){
int tmp;
char* e;
tmp = strtol(optarg,&e,10);
if (e != optarg + strlen(optarg)){
*arg = malloc(strlen(optarg));
strcpy((char*)*arg,optarg);
} else *arg = (void*)tmp;
}
int64 main(int argc, char** argv){
int opt, num = 0;
void *a,*b;
char* e;
void* (*func2)(void*,void*),
(*func1)(void*),
(*func0)(), *func = 0;
while((opt = getopt_long(argc,argv,"f:h:n:a:b:",longopts,NULL)) != -1){
switch (opt){
case 'h':
fprintf(stderr,"%s",help);
exit(0);
case 'f':
func = dlsym(NULL,optarg);
break;
case 'n':
num = atoi(optarg);
if (num > 2) exit(1);
break;
case 'a':
strtoa(&a,optarg);
break;
case 'b':
strtoa(&b,optarg);
break;
}
}
if(func != 0){
switch (num){
case 0:
func0 = func;
(*func0)();
break;
case 1:
func1 = func;
(*func1)(a);
break;
case 2:
func2 = func;
(*func2)(a,b);
}
}
return 0;
}
Запускает любую функцию линукс, содержащую до 2-х аргументов. В хелпе все написано. Собирать так c флагом -dl.
Использовать так:
a.out -f sleep -n 1 -a 1 - sleep на 1 секунду
a.out -f printf -n 1 -a OK - выводит без конца строки
вдохновлен этим:
http://govnokod.ru/13763
Я, crastinus97, говорю вам: этого способа нет в man. Я его сам открыл.
+140
var x = 43;
var y = 34;
var z = x++ + --y;
console.log(z);
console.log(y);
console.log(x);
%D
+140
var i = 9;
for(;;){
if(i === 0)break;
console.log(i);
i--;
}
+140
if(!false && ( false || (false && true) )) alert("Guess what...");
+155
data-selected-items='[<? $i=0; foreach($children_items as $child) {echo '{"id":"'.$child['id'].'", "text":"'.addslashes($child[$item_title_column]).'"}'; if( ++$i != count($children_items) ) echo ',';} ?>]'
json_encode не слышали
+80
Главная » Усыпление программы
Усыпление программы
Автор: -Гепард97-
Написать автору
[просмотров 751]
В VBS есть функция wscript.sleep, позволяющая усыпить скрипт. Но как такое сделать в VB? Ответ прост: делаем новый модуль и пишем код:
Public Declare Sub Sleep Lib "kernel32" (byval dwMilliseconds As Long)
И все. Когда прогу нужно усыпить, просто пишем в коде проги, если например прога должна остановиться на 2 секунды то пишем
Sleep 2000
Этого способа нет на MSDN, я его сам отрыл
Билл Гатэс прочел это и уснул...
Z-z-z-z...
−111
Character * c = Character.alloc.init.autorelease;
К чему приводит излишняя либеральность синтаксиса