Программистский шедевр на индусском форуме на тему "как узнать завтрашнюю дату" остался непревзойденным:
Code:

void get_tomorrow_date( struct timeval *date )
{
   sleep( 86400 ); // 60 * 60 * 24
   gettimeofday( date, 0 );
}

Здравствуйте, BuHHunyx, Вы писали:

BHH>

BHH>Программистский шедевр на индусском форуме на тему "как узнать завтрашнюю дату" остался непревзойденным:

Это еще что... Я не знаю, проскакивало ли это ЗДЕСЬ, но я сегодня этот тантрический код увидел впервые. И реально залип. Над этим кодом можно медитировать:

   if (var == true)
       return true;
   else if (var == false)
       return false;
   else
       return (!false && !true);

Здравствуйте, KaBoom, Вы писали:

KB>Здравствуйте, BuHHunyx, Вы писали:


KB>Это еще что... Я не знаю, проскакивало ли это ЗДЕСЬ, но я сегодня этот тантрический код увидел впервые. И реально залип. Над этим кодом можно медитировать:
KB>

KB>   if (var == true)
KB>       return true;
KB>   else if (var == false)
KB>       return false;
KB>   else
KB>       return (!false && !true);
KB>

Да здесь все правильно — это модные алгоритмы с нечеткой логикой.

Здравствуйте, KaBoom, Вы писали:

KB>Это еще что... Я не знаю, проскакивало ли это ЗДЕСЬ, но я сегодня этот тантрический код увидел впервые. И реально залип. Над этим кодом можно медитировать:
KB>

KB>   if (var == true)
KB>       return true;
KB>   else if (var == false)
KB>       return false;
KB>   else
KB>       return (!false && !true);
KB>

Из серии: WARNING: expression "to_be || !to_be" is always true

Здравствуйте, BuHHunyx, Вы писали:

BHH>

BHH>void get_date_tomorrow( struct timeval *date )
BHH>{
BHH>   sleep( 86400 ); // 60 * 60 * 24
BHH>   gettimeofday( date, 0 );
BHH>}
BHH>

BHH>[/q]

Здравствуйте, KaBoom, Вы писали:

BHH>>

BHH>>Программистский шедевр на индусском форуме на тему "как узнать завтрашнюю дату" остался непревзойденным:

KB>Это еще что... Я не знаю, проскакивало ли это ЗДЕСЬ, но я сегодня этот тантрический код увидел впервые. И реально залип. Над этим кодом можно медитировать:
KB>

   int var = 2;
   if (var == true)
       return true;
   else if (var == false)
       return false;
   else
       return (!false && !true);
   // возвращаем false.

Здравствуйте, BuHHunyx, Вы писали:

BHH>Программистский шедевр на индусском форуме на тему "как узнать завтрашнюю дату" остался непревзойденным:
не знаю, при чем тут индусы, но эта шняга уже давно проскакивала на РСДН: http://www.rsdn.ru/Forum/?mid=556381

Автор: Gollum
Дата: 02.03.04

Здравствуйте, KaBoom, Вы писали:

KB>Это еще что... Я не знаю, проскакивало ли это ЗДЕСЬ, но я сегодня этот тантрический код увидел впервые. И реально залип. Над этим кодом можно медитировать:
KB>

KB>   if (var == true)
KB>       return true;
KB>   else if (var == false)
KB>       return false;
KB>   else
KB>       return (!false && !true);
KB>

А язык какой? true и false --- это настоящие true и false, или некоторые пользовательские константы?

Если, скажем, true = 0x1, а false = 0x2, то совершенно нормальный код.

Нарыл в инете такое :

procedure TfNastr.FormCreate(Sender: TObject);
begin  try  if fDmNadz.takod_progr.Active=False then
fDmNadz.takod_progr.Active:=True;  except
 begin    ShowMessage(OnErrorMessage);    Close;   end;  end;
end;

procedure TfNastr.btnOdbClick(Sender: TObject);
var i,j:Integer;filNam,filNam1:String;F:TextFile;rrr:Boolean;
    NameOld,NameNew,Izm:String;
begin try i:=fdmNadz.taKod_ProgrKOL_INS.Value; fUdos.DBGrid_Udos.DataSource:=nil;
fUdos.DBGrid_UdosA.DataSource:=nil; fUdos.DBGrid_OUd.DataSource:=nil;
fUdos.DBGrid_OudA.DataSource:=nil;
fUdos.taUd_f.Active:=False; fUdos.taUd_Af.Active:=False;
fUdos.taUdos.Active:=False; fUdos.taUdos_A.Active:=False;
fUdos.taGur_Udos.Active:=False; fUdos.taOUdos.Active:=False;
fUdos.taOUdos_A.Active:=False;  if FileExists('c:\nadzor\ondz.gdb') then
begin   with  Qobl_del do
 begin    SQL.Clear;    SQL.Add('Delete From udos');
  ExecSQL;    SQL.Clear;
  SQL.Add('Delete From UDOS_A');
  ExecSQL;
  end;// with
end // if exis
 else
 begin
  ShowMessage('Создание БД области прекращено.Отсутствует файл ONDZ.GDB');
 Exit;
 // тут надо или завершить приложение или все восстановить сетки табл
 end; // not FileExist

// тут новый виток
begin
// ShowMessage('Начинаем переименованиие ');
 j:=1;
  NameNew:='c:\nadzor\ndz.gdb';
 //NameNew:='ndz.gdb';
// Добавим все записи
 while j<i+1 do
 begin
 Izm:=IntToStr(j);
 NameOld:='c:\nadzor\'+Izm+'ndz.gdb';
 if FileExists(NameOld) then
  begin
  // 3-  переименовать 1NDZ.GDB в NDZ.GDB
 if fdmNadz.DbNadzor.Connected then fdmNadz.DbNadzor.Close;
 fdmNadz.DbNadzor.Connected:=False;
   DeleteFile(NameNew);
  AssignFile(F,NameOld);
 Rename(F,NameNew);
 fdmNadz.DbNadzor.Connected:=True;
 fdmNadz.DbNadzor.Open;
         // SQL.Add('Insert INTO ": ODB: UDOS" select * from ": NADZOR: UDOS"');
      fUdos.Move_Ud.Execute;  // run the batchmove
      fUdos.Move_UdA.Execute;
      J:=J+1;
 end      // if
else  J:=J+1;
 end;// while
end;//
// новый 3 виток
begin
ShowMessage('Выполнено слияние '+IntToStr(j)+' - БД');
// восстановим табл
fUdos.taUd_f.Active:=True;
fUdos.taUd_Af.Active:=True;
fUdos.taGur_Udos.Active:=True;
fUdos.taUdos.Active:=True;
fUdos.taUdos_A.Active:=True;
fUdos.taOUdos.Active:=True;
fUdos.taOUdos_A.Active:=True;
// восстановим сетки
fUdos.DBGrid_Udos.DataSource:=fUdos.dsUdos;
fUdos.DBGrid_UdosA.DataSource:=fUdos.dsOUdos_A;
fUdos.DBGrid_OUd.DataSource:=fUdos.dsOUdos;
fUdos.DBGrid_OudA.DataSource:=fUdos.dsOUdos_A;
//fUdos.DBGrid_Gur.DataSource:=fUdos.dsGur_Udos;
end;
except
  MessageDlg('Ошибка!! при слиянии БД!',mtWarning,[mbOk],0);
end; // try
end; // вся процедура -конец

форматирование не менял

Здравствуйте, Kisloid, Вы писали:

void set_tomorrow(  )
{
   sleep( 86400 ); // 60 * 60 * 24
}

Здравствуйте, BuHHunyx, Вы писали:

Сабж, собственно

Здравствуйте, volk, Вы писали:

V>А язык какой? true и false --- это настоящие true и false, или некоторые пользовательские константы?

V>Если, скажем, true = 0x1, а false = 0x2, то совершенно нормальный код.

Может код и станет нормальным, но этого "программиста" я точно занесу в чёрный список

Здравствуйте, KaBoom, Вы писали:

KB>

KB>   if (var == true)
KB>       return true;
KB>   else if (var == false)
KB>       return false;
KB>   else
KB>       return (!false && !true);
KB>

Нормальный код. Обработка еода возврата из MsgBox-а с кнопками YES\NO\MAYBE

Здравствуйте, Sshur, Вы писали:

S>Здравствуйте, BuHHunyx, Вы писали:

S>Сабж, собственно
S>

предполагаю, что-то типа этого:

void get_yesterday_date(...)
{ 
gettimeofday( date, 0 );   
sleep( 86400 ); // 60 * 60 * 24
return...
}

=)

Здравствуйте, laconix, Вы писали:


=) — смех сквозь слезы?

Здравствуйте, tangente, Вы писали:

T>Здравствуйте, laconix, Вы писали:

T>=) — смех сквозь слезы?

кстати да)) верно подмечено

Здравствуйте, BuHHunyx, Вы писали:

a че? если ф-ция sleep() работает вне пространсвенно-временного континиума, то... это ж на каких компютерах работают индусы . уж не пришельцы ли они?

BHH>

BHH>Программистский шедевр на индусском форуме на тему "как узнать завтрашнюю дату" остался непревзойденным:
BHH>Code:

BHH>

BHH>void get_tomorrow_date( struct timeval *date )
BHH>{
BHH>   sleep( 86400 ); // 60 * 60 * 24
BHH>   gettimeofday( date, 0 );
BHH>}
BHH>

Здравствуйте, DSD, Вы писали:

DSD>Здравствуйте, BuHHunyx, Вы писали:

BHH>>Программистский шедевр на индусском форуме на тему "как узнать завтрашнюю дату" остался непревзойденным:
DSD>не знаю, при чем тут индусы, но эта шняга уже давно проскакивала на РСДН: http://www.rsdn.ru/Forum/?mid=556381

Автор: Gollum
Дата: 02.03.04

Видимо какой-то грамотный индус сделал порт с этого перлового кода на с

Здравствуйте, Master Yoda, Вы писали:

MY>Из серии: WARNING: expression "to_be || !to_be" is always true

Здравствуйте, Master Yoda, Вы писали:

MY>Из серии: WARNING: expression "to_be || !to_be" is always true

В споре рождается истина!