FAQ по Дельфи!, Готово - около 800 вопросов! Опции

[Vit]

FAQ по Дельфи обновлён!

Сейчас FAQ содержит около 1100 тем.
[/b][/color]

Скачать можно здесь:

Формат chm (Windows HTML Help) 3.5 Mb
Основной линк - http://chicago.lastplanet.com/DelphistFAQ.chm
Дополнительный - http://www.delphist.com/delphistfaq.chm


Старый топик:
Наконец-то добил я его!

Итак, FAQ по Дельфи в формате chm:

1) Включает в себя практически все темы FAQ Vingrad.ru и Sourses.ru.

2) Кроме того включено около полусотни тем из разных других источников. На мой взгляд наиболее важная серия ответов, не нашедших отражения в FAQ Vingrad.ru и Sourses.ru, но включённая в этот FAQ - это раздел по работе с RTTI - примерно 2 десятка топиков.

3) Сделана сносная навигация, список ключевых слов

4) Проведена титаническая работа по приведению ответов в божеский вид, форматированию исходных кодов и т.п.


Очень интересует мнение со стороны по следующим вопросам:

1) Какие темы освещены недостаточно?
2) Работает ли механика FAQ - везде ли правильная кодировка, мёртвые линки, ошибки самых разных видов
3) Надо ли включать эту статью по SQL в FAQ? ( http://forum.vingrad.ru/index.php?act=ST&f=12&t=5638 )? Статья великолепная, и очень может помочь программистам на Дельфи, но следует учесть, что она изобилует картинками, которые могут существенно увеличить размер FAQ?


Скачать можно здесь: http://chicago.lastplanet.com/FAQ.chm

[___ALex___]

Vit
отличная работа!
спасибо, что выложил модуль...
кстати можешь потом закинуть ф-ию вычисления степени:

Код

function Degree(const DegBasis, DegParam: Extended): Extended;
asm
       // Вход: DegBasis, DegParam --> в стеке
       // Выход: Result --> ST(0)
       // Примечание:
       // В случае некорректных данных в ST(0) возвращается DegParam

       XOR     EDX, EDX
       FLD     DegParam
       FTST
       FNSTSW  AX
       SAHF
       JNZ     @@DegParam_is_not_0
       FFREE   ST
       FLD1
       JMP     @@exit
@@DegParam_is_not_0:
       JC      @@DegParam_is_less_than_0
       JMP     @@cmp_DegBasis_to_0                
@@DegParam_is_less_than_0:
       OR      EDX, 1
@@cmp_DegBasis_to_0:
       FLD     DegBasis
       FTST
       FNSTSW  AX
       SAHF
       JNZ     @@DegBasis_is_not_0
       TEST    EDX, 1
       JZ      @@DegParam_is_greater_than_0
       FSTP    ST
       JMP     @@exit
@@DegParam_is_greater_than_0:
       FSTP    ST(1)
       JMP     @@exit
@@DegBasis_is_not_0:
       TEST    BYTE PTR DegBasis + 9, 80H
       JZ      @@DegBasis_is_greater_than_0
       FABS
       FXCH
       OR      EDX, 2
       FLD     ST
       FRNDINT
       FSUB    ST, ST(1)
       FTST
       FNSTSW  AX
       SAHF
       FSTP    ST
       JZ      @@DegParam_is_integer
       FLD1
       FDIV    ST, ST(1)
       FABS
       FLD1
       FCOMP        
       FNSTSW  AX
       SAHF
       JC      @@1_div_Abs_DegParam_greater_or_equal_to_1
       JZ      @@1_div_Abs_DegParam_greater_or_equal_to_1
       FSTP    ST
       FSTP    ST(1)
       JMP     @@exit
@@1_div_Abs_DegParam_greater_or_equal_to_1:
       FISTP   QWORD PTR @@Int_64
       TEST    BYTE PTR @@Int_64, 1
       JNZ     @@continue
       FSTP    ST(1)
       JMP     @@exit
@@DegParam_is_integer:
       FLD     ST
       FISTP   QWORD PTR @@Int_64
       TEST    BYTE PTR @@Int_64, 1
       JNZ     @@continue
       XOR     EDX, EDX
@@continue:
       FXCH
@@DegBasis_is_greater_than_0:
       FYL2X
       FLD     ST
       FRNDINT
       FSUB    ST(1), ST
       FXCH    ST(1)
       F2XM1
       FLD1
       FADD
       FSCALE
       FSTP    ST(1)
       TEST    EDX, 2
       JZ      @@exit
       FCHS
       JMP     @@exit                    
@@Int_64:                                  
       DQ      0
@@exit:
       FWAIT

end;

Сообщение отредактировано: volvo - 5.01.2005 16:45