ButtonClick Prozedur in eigene Methode definieren

[Schokohase]

Du kannst lokale Proceduren/Funktionen definieren, die haben aber auch nur eine lokale Sichtbarkeit und du kannst diese somit auch nur lokal verwenden.

Delphi-Quellcode:

procedure MyProcedure();
// lokale procedure/function
procedure MyLocalProc();
begin
end;

function MyLocalFunc() : Integer;
begin
  Result := 10;
end;

var
  r : Integer;
begin
  MyLocalProc();
  r := MyLocalFunc();
end;