Delphi-Quellcode:
type
TForm4 = class(TForm)
DBEdit1: TDBEdit;
procedure Wird_Angezeigt(Sender: TObject);
private
{ Private-Deklarationen }
procedure Wird_Nicht_Angezeigt_1(Sender: TObject);
public
{ Public-Deklarationen }
procedure Wird_Nicht_Angezeigt_2(Sender: TObject);
end;
Es werden nur Prozeduren vor "private" in der Liste zur Auswahl angezeigt. Die Anderen kann man natürlich trotzdem per Hand zuweisen.