Einführung in Pointer

[bttb930]

naja, getestet hab ich den code nicht, aber dann schreib einfach

Delphi-Quellcode:

if Sender is TListBox then
  CurrentBox := Sender as TListBox;