Вверх ↑
Ответов: 16884
Рейтинг: 1239
#1: 2011-05-02 21:11:46 ЛС | профиль | цитата
Итак, тема называется "Создание учебника по IC":
Весь учебник - это то, что в комментариях.
unit HiAsmUnit;

interface  


uses kol,Share,Debug;   // Объявление внешних модулей необходимых для работы
//==============================================================================
type                   // Секция объявления и описания типов
 THiAsmClass = class(TDebug)
 
   private            // всё, используемое только внутри данного Unit-а
   i:integer;         
   procedure calck;   

   public             // Всё, что может быть использовано вне Unit-a
   Procedure values(var _Data:TData; Index:Word); 
 end;                 // Конец объявления типа
//==============================================================================
implementation  // начало раздела кодов

Procedure THiAsmClass.calck;
 var n:integer;
begin
 for n:=0 to 12 do i:=i+n;
end; 

Procedure THiAsmClass.values;
begin
    calck;
    dtInteger(_Data,i);
end;
end.            // конец Unit-а


А вот это:
nesco писал(а):
ToXXXX: аналог этого метода на ReadXXXX -- ReadXXXX(_Data, Null),
Roma писал(а):
нехватает _hi_createEvent между _hi_createEvent и _hi_onEvent нет почти никакой разницы
это описания функций и процедур внешних Unit-ов и никакого отношения к "учебнику по IC" не имеют.

Я специально дал пример IC с одной нижней точкой. и нет там ни ReadXXXX, ни _hi_onEvent
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0