|
Тема |
Re: Делфи забавления :) [re: SAGE_BS] |
|
Автор | eмил (Нерегистриран) | |
Публикувано | 03.11.05 17:34 |
|
|
"Ако си решил да търсиш под вола теле..."
:)
Не, не търся под вола теле. Нито обвинявам Борланд :)
или някой друг.
Писах с мисълта, че примерите ще са забавни ... може би :)
Идеята беше, не че са са нещо "неправилно", а може би
малко неочаквано - с една дума беше замислено като
"fun", а не като заяждане :)
И против Round нямам нищо против :) работи си точно
както трябва и не бих я реализирал по друг начин :)
По-скоро търсех елемента на изненада :)
Например за abs машинално приемаш, че е не може да е
отрицателно - след примера си казваш - е, да може -
но обикновено не ти минава през ума по време на писане :)
Примера с TControl така поднесен е ясен :) но в реалния код
може да се срещне в такъв вариант:
if (FControl is TControl) then
begin
if not Assigned(FControl) then FControl:=TControl.Create;
end
else ShowMessage('Error! Not a control');
така машинално записан може и да не се усетиш,
че си написал глупост :)
Та това беше "за забавление".
Съжалявам ако не се е харесало :(
|
| |
|
|
|