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

Вниз

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

 
Dy1   (2009-08-07 13:08) [0]

пожалуйста не игнорируйте глупый вопрос
procedure DrawArr(d: Pointer; Sender: PControl; DC: HDC);//OnPaint
как передать Sender не через d?  < MakeMethod(nil, DrawArr ? ) >


 
Демьян   (2009-08-07 14:56) [1]

Что-то не понял, в чём проблема... Зачем тебе это нужно?


 
Dy1   (2009-08-07 16:02) [2]

хочу человеческого Sender: PControl; DC: HDC, а не передачу через запись (d: Pointer)


 
MTsv DN   (2009-08-07 17:09) [3]

Тогда объявляй в объекте и приравнивай к OnDraw.

PMyObj = ^TMyObj
...
public
procedure DrawArr(Sender: PControl; DC: HDC);
end;
...
procedure TMyObj.DrawArr(Sender: PControl; DC: HDC);
begin
end;
...
var
MO : TMyObj;
begin
New(MO);
...

Где-то так...



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

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

Наверх




Память: 0.47 MB
Время: 0.006 c
15-1377376202
Юрий
2013-08-25 00:30
2014.02.09
С днем рождения ! 25 августа 2013 воскресенье


15-1377069296
Els
2013-08-21 11:14
2014.02.09
Хороший форум по программированию


15-1377241940
Павиа
2013-08-23 11:12
2014.02.09
Успешный пуск ракеты.


1-1321910834
Mr.Devil
2011-11-22 01:27
2014.02.09
Ошибка при инициализации приложения (0xc0000005)


1-1320579862
DmitriyG.
2011-11-06 14:44
2014.02.09
Regexp в бинарниках