Einzelnen Beitrag anzeigen

Benutzerbild von f4k3
f4k3

Registriert seit: 15. Aug 2007
Ort: Nürnberg
313 Beiträge
 
Delphi 2007 Architect
 
#1

Mehrere Ereignisse

  Alt 21. Nov 2007, 15:31
Seid gegrüßt liebe DP'ler ,

hab folgendes Problem ... hab n Event-Handler für 10 Buttons innerhalb der Form1.pas erstellt ...

ist zwar nicht von belang aber ich post den Event-Handler mal rein ...

Delphi-Quellcode:
procedure TForm1.ZeiButtonClick(Sender: TObject); // zeichenweise Zahleneingabe

var zei: Char;

begin

    if Sender = Button10 then zei := '0';
    if Sender = Button1 then zei := '1';
    if Sender = Button2 then zei := '2';
    if Sender = Button3 then zei := '3';
    if Sender = Button4 then zei := '4';
    if Sender = Button5 then zei := '5';
    if Sender = Button6 then zei := '6';
    if Sender = Button7 then zei := '7';
    if Sender = Button8 then zei := '8';
    if Sender = Button9 then zei := '9';
    if Sender = Button11 then zei := '.';


    if mode = 1 then
    begin
                strBuff1 := strBuff1 + zei;
          Label1.Caption := strBuff1;
    end

    else
    begin

          strBuff2 := strBuff2 + zei;
          Label1.Caption := strBuff1 + ' ' + op + ' ' + strBuff2;

    end;

end;
So ... etz bräucht ich n zweites On-klick-Event-Handler innerhalb der Form1.pas ...

Wenn ich nun im OnKlick-Event der Form ... das aktuelle Event-Handler ZeiButtonClick überschreibe, um ein neuen Event-Handler namen zu vergeben
wechselt er mir nur den Namen meines ZeiButtonClick, anstatt mir n neuen Rahmencode für einen neuen Event-Handler zu liefern ...

Muss ich da irgendwie n umweg gehen damit des funktioniert? oder bin ich einfach nur zu doof?

Vielen Dank für eure PostZ

Euer f4k3
Sascha
  Mit Zitat antworten Zitat