Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2005.12.11;
Скачать: CL | DM;

Вниз

CallBack   Найти похожие ветки 

 
SkyRanger ©   (2005-11-24 04:29) [0]

Наткнулся тут на модуль, реализующий енто дело на delphi
Что то не могу найти ничего путного по этому вопросу.
Не подскажете зачем вообще сущесьвует CallBack??

P.S. и что то поиск по сайту не работает :(


 
Джо ©   (2005-11-24 04:44) [1]

Callback-функции - это родовое понятие. Русский перевод функции обратного вызова. Чтобы поменьше разводить теории, приведу разъясняющий пример.

type
 // определим процедурный тип
 TMyCallBackProc = procedure (CurrentValue: Integer);

// в качестве одного из параметров процедура принимает функцию обратного вызова

// и вызывает ее для каждой итерации цикла, заданного рамками Min & Max
procedure DoCycle (Min,Max: Integer; Callback: TMyCallBackProc);
var
 I: Integer;
begin
 for I := Min to Max do
   Callback (I)
end;

// определяем нашу callback-процедуру
// список параметров должен соответствовать типу TMyCallBackProc
// название может быть любым
procedure MyCallBackProc (CurrentValue: Integer);
begin
 // выводит на экран передаваемое ей значение
 ShowMessage (IntToStr(CurrentValue));
end;

// тестируем
procedure TForm1.Button1Click(Sender: TObject);
begin
 // вызываем процедуру, в цикле перебирающую значения от 0 до 3
 // и передаем ей адрес нашей callback-процедуры
 DoCycle(0,3,MyCallBackProc);
end;


Если что-то непонятно, пиши.



Страницы: 1 вся ветка

Текущий архив: 2005.12.11;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.047 c
14-1132226125
dr Tr0jan
2005-11-17 14:15
2005.12.11
Кто помнит Basic?


14-1132302191
pic509
2005-11-18 11:23
2005.12.11
Ограничения в Database Descktop под Delphi ?


2-1132334155
boble
2005-11-18 20:15
2005.12.11
FILTER по LOOKUP полям


3-1130097537
redlord
2005-10-23 23:58
2005.12.11
последовательная обработка данных


2-1132593006
floxi
2005-11-21 20:10
2005.12.11
Memo