| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Как написать такое условие красиво и короче по возможности? [D7, XP]
Nikolaich © (2006-06-13 12:16:00)Приветсвую. Вот очень хочется узнать, есть ли написание некоторых простых условий проще и короче. К примеру
if str <> '' then ...
if myint = 0 then ...
Не особо красиво выглядит как-то. К примеру для счетчика в дельфи есть Inc, Dec и не надо писать myint := myint+1. Можно конечно свои подобные функции написать, но может есть готовые и я о них просто не знаю?
Спасибо.
Sergey13 (2006-06-13 12:33:00) [1]2 [3] Nikolaich (13.06.06 12:26)
Если ты автор function ns(str: string): boolean то возможно и так.
Если это чужой код, то я бы убил автора. 8-)
В строке if str <> ''мне сразу понятно что с чем сравнивается, а в if ns(str)еще надо вспомнить, что там в nsесть и с чем ее едят.
Dmitrij_K (2006-06-13 12:28:00) [2]Если хочешь поизвращаться, см. ф-ю IfThen()
Nikolaich (2006-06-13 12:26:00) [3]
> Sergey13 ©
ну грубо возьмем, но для примера (ns - no string)
function ns(str: string): boolean;
.......
if ns(str) then ...
по мне этот код будет красивее и короче и не только для меня думаю.
Рамиль (с) (2006-06-13 12:20:00) [4]Красиво, посмотри исходники VCL
Sergey13 (2006-06-13 12:19:00) [5]2Nikolaich (13.06.06 12:16)
Ты считаешь, что
if str <> '' then ...
сложно и длинно?
| |
