Ergebnis der Suchanfrage

• Forum: GUI-Design mit VCL / FireMonkey / Common Controls

  Re: Eigener Klasse OnClickEvent zuweisen

    Delphi
    by Apollonius, 10. Mai 2007
  Ist eigentlich schon ganz in Ordnung. Aber erstelle ganz am Ende der neuen Klasse einen published-Block (meinetwegen auch public) mit dem Property, dann erkennt er auch SetEditClick und FOnEditClick.
  In SetEditClick musst du auch noch das OnClick der einzelnen Edits (das sind doch Edits?) zuweisen, also
  
  erstesedit.onClick:=Click;
  zweitesEdit.onclick:=click;
  ...
  
  Hoffe geholfen zu haben...
• Forum: GUI-Design mit VCL / FireMonkey / Common Controls

  Re: Eigener Klasse OnClickEvent zuweisen

    Delphi
    by Apollonius, 10. Mai 2007
  Du musst eine private Variable vom Typ TNotifyEvent erstellen (z.B. FOnLabelClick). Außerdem eine Prozedur (protected) namens SetLabelClick mit einem Parameter vom Typ TNotifyEvent. LabelOnClick deklarierst du dann so:
  
  property OnLabelClick:TNotifyEvent read FOnLabelClick write SetLabelClick;
  
  In SetLabelClick musst du nur noch das OnClick aller Labels sowie FOnLabelClick durch den Parameter...