Einzelnen Beitrag anzeigen

Apollonius

Registriert seit: 16. Apr 2007
2.325 Beiträge
 
Turbo Delphi für Win32
 
#5

Re: "Direkter zugriff auf auslösendes Objekt"

  Alt 8. Okt 2007, 21:33
Das ist kein Grund zum Masochisten zu werden - ehrlich!
Du musst einfach nach TButton casten:
Delphi-Quellcode:
addElem(beschreibung,code,strtoint(TButton(Sender).Caption),'1','1');
//oder
addElem(beschreibung,code,strtoint((Sender as TButton).Caption),'1','1');
Bei der zweiten Variante wird zusätzlich noch eine Überprüfung gemacht, ob es sich wirklich um einen Button handelt, allerdings dauert das natürlich geringfügig länger.
Wer erweist der Welt einen Dienst und findet ein gutes Synonym für "Pointer"?
"An interface pointer is a pointer to a pointer. This pointer points to an array of pointers, each of which points to an interface function."
  Mit Zitat antworten Zitat