Я использую Firemonkey и хочу назначить событие OnTap объекту во время выполнения.
Код, который я пробую, в основном такой же, как и тот, который я использую для события OnClick:
Заголовок вверху:
procedure txtHostClick(Sender: TObject);
Процедура :
procedure TMyForm.txtHostClick(Sender: TObject);
begin
//do stuff
end;
Назначение обработчику события:
hotspot := Tmemo.Create(Highlight_Scrollbox);
hotspot.OnClick := txtHostClick;
Поэтому я пытаюсь применить ту же логику к событию OnTap, и это дает следующую ошибку:
[Ошибка DCC] s3.pas (4338): E2009 Несовместимые типы: "Списки параметров различаются"
Ниже приведен пример кода того, что я пробовал:
Заголовок вверху:
procedure txtOnTAPEvent(Sender: TObject; const [Ref] Point: TPointF);
Процедура :
procedure TMyForm.txtOnTAPEvent(Sender: TObject; const [Ref] Point: TPointF);
begin
//do stuff
end;
Назначение обработчику события:
hotspot := Tmemo.Create(Highlight_Scrollbox);
hotspot.OnTap := txtOnTAPEvent;
В моих знаниях есть пробел, который необходимо восполнить.