Entwickler-Ecke

Grafische Benutzeroberflächen (VCL & FireMonkey) - procedure TForm1.Label1Click; ...


mäuschen123 - Fr 30.05.08 21:20
Titel: procedure TForm1.Label1Click; ...
ich brauche nochmal eure hilfe,
ist für euch wahrscheinlich ein dummes anfänger problem.

durch klicken auf das label wird ... ausgeführt.

procedure TForm1.Label1Click;
begin ... end;


nun möchte ich von einer anderen stelle im gleichem code diese procedure aufrufen.
normalerweise würde ich "TForm1.Label1Click;" schreiben, aber das klappt nicht. auch nur "label1;" klappt nicht.

Es kommt immer die Fehlermeldung: Nicht genügend wirkliche Parameter.

Und nu????


jaenicke - Fr 30.05.08 21:23
Da steht noch ein Parameter ;-), Sender nämlich.
Also:

Delphi-Quelltext 
1:
2:
3:
 
Label1Click(Sender);
// bzw.
Label1Click(Label1);
Sender gibt an, von welchem Steuerelement das Ereignis ausgelöst wurde. Im Originalaufruf ist das also immer Label1 selbst.


Delete - Fr 30.05.08 21:23
bin auch kein fachmann aber schreib mal self in klammern hinter


mäuschen123 - Fr 30.05.08 21:26
funktioniert, war klar das es mal wieder was triviales war

manchmal hat man nen brett vor dem kopf

Vielen Dank!!!


Entwickler-Ecke.de based on phpBB
Copyright 2002 - 2011 by Tino Teuber, Copyright 2011 - 2025 by Christian Stelzmann Alle Rechte vorbehalten.
Alle Beiträge stammen von dritten Personen und dürfen geltendes Recht nicht verletzen.
Entwickler-Ecke und die zugehörigen Webseiten distanzieren sich ausdrücklich von Fremdinhalten jeglicher Art!