Ergebnis der Suchanfrage

• Forum: Object-Pascal / Delphi-Language

  Re: problem beim erstellen einer Funktion

    Delphi
    by Sharky, 12. Jul 2006
  Habe ich in meinem Posting doch extra geschrieben. Ich habe das OnCreate nur gezeigt damit man sieht was ich mache. ;-)
  
  Hier das Video wie ich es mache. *g*
  
  Aber das ist jetz OT.
• Forum: Object-Pascal / Delphi-Language

  Re: problem beim erstellen einer Funktion

    Delphi
    by Sharky, 12. Jul 2006
  Hai sigma,
  
  das ganze kannst Du auch ohne eine Funktion lösen. Das "Geheimniss" ist: Du erzeugst nicht für jeden Button eine eigene OnClick Methode sondern verwendest für alle Buttons die selbe. Über den Parameter Sender erfährst Du dann welcher Button das OnClick-Egeigniss ausgelöst hat:
  
  
  procedure TDemo_Form.FormCreate(Sender: TObject);
  begin
  Button1.OnClick := AlleButonOnClick;
  ...