Einzelnen Beitrag anzeigen

Moaddin

Registriert seit: 18. Jan 2007
Ort: Düsseldorf
4 Beiträge
 
Delphi 2005 Personal
 
#6

Re: Optionen-Schaltfläche in TOpenDialog

  Alt 23. Jan 2007, 23:06
Hmm... hört sich alles ganz toll an...
Ich komme auch ein Stückchen weiter... Ich kann jetzt beispielsweise
Delphi-Quellcode:
type
  TOpenOptionsDialog = class(TOpenDialog)
  private
    FOptionsClick: TNotifyEvent;
    FOptionen: TButton;
    procedure OptionsClick(Sender: TObject);
  published
    property OnOptionsClick: TNotifyEvent read FOptionsClick write FOptionsClick;
  end;

procedure TOpenOptionsDialog.OptionsClick(Sender: TObject);
begin
  FOptionen.Caption := 'Hallo';
end;
dieses hier schreibe, kann ich genau das machen was in der procedure OptionsClick angegeben ist (hier im Beispiel Caption auf Hallo setzen.). Das ist aber nicht das, was mir eigentlich vorschwebt.
Da es sich hier um eine Komponente handelt, will ich nachher im eigentlichen Programm selbst bestimmen können, was passiert, wenn ich auf den Button klicke. Der Hinweis mit SetOptionsClick bringt mich auch nicht ganz weiter, da ich hier eine Fehlermeldung bekomme.
Delphi-Quellcode:
  published
    property OnOptionsClick: TNotifyEvent read FOptionsClick write SetOptionsClick;

procedure TOpenOptionsDialog.SetOptionsClick(const Value: TNotifyEvent);
begin
  FOptionen.OnClick := Value;
end;
[Fehler] mOpenOptions.pas(27): E2168 Feld- oder Methodenbezeichner erwartet

Langsam bin ich echt ratlos. Was mache ich nur falsch?
Einer der Info-Pros, die nur wegen dem fetten Stephan keine 1 bekommen haben óÒ
  Mit Zitat antworten Zitat