Отправляет email-рассылки с помощью сервиса Sendsay

Программирование. Форум !!!

За 2005-01-14

Anons

Здравствуйте !

Господа !
В рамках программы раскрутки данного листа :)

Я рад презентовать Вам _уникальный_проект_:

рассылку "Кто есть ХУ на Subscribe.Ru"

АВТОРЫ рассылок и МОДЕРАТОРЫ диск.листов и форумов
рассказывают в этой рассылке о своих проектах.

Только ЗДЕСЬ ВЫ УЗНАЕТЕ всю правду об авторах и
модераторах: КТО__ЕСТЬ__КТО__НА__SUBSCRIBE.ru!"

Такого _откровенного_ проекта на Subscribe.Ru
Вы еще не видели...


--
С уважением, Вахтуров Виктор.

Номер выпуска : 3944
Возраст листа : 480 (дней)
Количество подписчиков : 519
Адрес в архиве : http://subscribe.ru/archive/comp.soft.prog.prog/msg/297315
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

   2005-01-14 22:51:12 (#297315)

Re: аналог функции

Hello keel,

Friday, January 14, 2005, 7:48:17 AM, you wrote:

k> Здравствуйте!
k> Подскажите пожалуйста аналог Visual Basic функции Sgn на Дельфи, оченб
k> нужно!

А в хелп заглянуть слабо?
Там написано ( правда, на ихнем дурацком английском -(((( ):

Unit

Math

Category

Arithmetic routines

type TValueSign = -1..1;
function Sign(const AValue: Double): TValueSign; overload;
function Sign(const AValue: Integer): TValueSign; overload;
function Sign(const AValue: Int64): TValueSign; overload;

Description

Use Sign to test the sign of a numeric value. Sign returns

0 if AValue is zero.
1 if AValue is greater than zero.
-1 if AValue is less than zero.

   Вадим Шешунов 2005-01-14 17:09:51 (#297141)

Re: аналог функции

Тема: аналог функции
> Здравствуйте!
> Подскажите пожалуйста аналог Visual Basic функции Sgn на Дельфи, оченб
> нужно!

Можно задавать в формате function Format(const Format: string;
const Args: array of const): string; - u Unsigned decimal
А функция Sign есть в модуле Math

   2005-01-14 16:58:36 (#297130)

Re[4]: Delphi OpenGL

> Ю>> Я думаю, вся прелесть здесь именно в вызове gluPerspective(30,
> Ю>> Width*1.0/Height, 1.0, 100.0).
>
> j> Не помогает причем прога реагирует только на два последних параметра,
> j> если они не равны - вообще не рисует ! (( Может проблема в ХР ?
>
> Давайте все свои проблемы и ошибки приписывать Microsoft!!!

Странно, у меня XP, но при этом картинка не искажается при изменении
соотношения сторон окошка... Наверно, я что-то делаю не правильно... А
janalex - как раз правильно? :-)

А если серьезно, то в дельфях же есть стандартные примеры приложений OpenGL,
интересно, если их посмотреть, там тоже искажается? Если нет, то можно
просто сравнить тексты.

Номер выпуска : 3941
Возраст листа : 480 (дней)
Количество подписчиков : 519
Адрес в архиве : http://subscribe.ru/archive/comp.soft.prog.prog/msg/297077
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

   2005-01-14 16:13:03 (#297077)

Re: аналог функции

> Подскажите пожалуйста аналог Visual Basic функции Sgn на Дельфи, оченб
> нужно!

Дельфей нет, в Билдере нашел. Но функция, вроде, дельфийская...

Unit
Math

Category
Arithmetic routines

extern PACKAGE int __fastcall Sign(const double AValue);
extern PACKAGE int __fastcall Sign(const int AValue);
extern PACKAGE int __fastcall Sign(const __int64 AValue);

Description
Use Sign to test the sign of a numeric value. Sign returns

0 if AValue is zero.
1 if AValue is greater than zero.
-1 if AValue is less than zero.

Или даже можно написать собственную функцию, которая будет делать это.

Этот вариант сканает для любых числовых типов x (не только integer):

function sign(x: integer): integer;
begin
sgn := ord(x>0) - ord(x<0);
end;

Номер выпуска : 3940
Возраст листа : 480 (дней)
Количество подписчиков : 519
Адрес в архиве : http://subscribe.ru/archive/comp.soft.prog.prog/msg/297070
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

   2005-01-14 16:02:23 (#297070)

Re[3]: Delphi OpenGL

Привет janalex,

Thursday, January 13, 2005, 7:36:16 PM, вы писали:

Ю>> Я думаю, вся прелесть здесь именно в вызове gluPerspective(30,
Ю>> Width*1.0/Height, 1.0, 100.0).

j> Не помогает причем прога реагирует только на два последних параметра,
j> если они не равны - вообще не рисует ! (( Может проблема в ХР ?

Давайте все свои проблемы и ошибки приписывать Microsoft!!!

Афоризм напоследок: Истинную цену живого человеческого общения по-настоящему
понимаешь, только глядя на счета от провайдера.
14 января 2005 г. 7:58:11

Просто студент
Eugene mailto:rav***@o*****.ru

Номер выпуска : 3939
Возраст листа : 480 (дней)
Количество подписчиков : 519
Адрес в архиве : http://subscribe.ru/archive/comp.soft.prog.prog/msg/296865
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

   2005-01-14 10:48:25 (#296865)

аналог функции

Здравствуйте!
Подскажите пожалуйста аналог Visual Basic функции Sgn на Дельфи, оченб
нужно!

   2005-01-14 10:46:21 (#296853)

Re[2]: Ошибка при удалении обьекта. Delphi

Привет Юрчик,

Monday, January 10, 2005, 10:42:31 PM, вы писали:

>> МГ> Я слышал, что форточка сама память очистить в состоянии?
>> В состоянии. Но только если работа ведется в .Net например, в C#

Ю> По-моему, форточка прекрасно очищает память умирающего процесса, независмо
Ю> от того, написан ли он на C++ или C#. Причем, она очищает не только всю
Ю> занимаемую им память, но и остальные ресурсы, типа открытых файлов и прочих
Ю> системных ценностей.

Ю> Тем не менее, лучше, конечно, всю память освобождать самому. Вдруг, эта
Ю> программа будет потом использоваться как составная часть другой программы,
Ю> тогда мусор будет накапливаться в памяти и время от времени приводить к ее
Ю> переполнению. :-) Уж лучше сразу стараться быть аккуратным.

Не факт -> когда я писл лабораторные по Компьютерной графике
(требовались большие объемы памяти), а при тестировании всегда есть
ошибки (а как же без них) - то ОС приходилось перегружать после 20-21
компиляции!!! А то системных ресурсов не оставалось :(

Афоризм напоследок: Кто ходит в гости "за рулем", то поступает глупо.
14 января 2005 г. 7:46:33

Просто студент
Eugene mailto:rav***@o*****.ru

Номер выпуска : 3937
Возраст листа : 480 (дней)
Количество подписчиков : 519
Адрес в архиве : http://subscribe.ru/archive/comp.soft.prog.prog/msg/296838
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

   2005-01-14 10:45:33 (#296838)