1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:

[...]
var {meine Variablen}

procedure sowieso;

implementation
[...]

procedure sowieso;
begin
showmessage('irgendwas');
end;					

1:

form1.sowieso;					

1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:

[...] 
public
  procedure sowieso; 
[...]

implementation 
[...] 

procedure Form1.sowieso; 
begin 
showmessage('irgendwas'); 
end;					

1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:

unit MyUnit;
interface
uses Dialogs;
{ Hier die Deklarationen der global verfügbaren Variablen, Konstaten, Typen, Klassen und Funktionen. Bei Funktionen aber nur der Funktionskopf. In diesem Bereich wird die Schnittstelle (=Interface) bereitgestellt. }

procedure MyFunc(const s: String);

implementation

{ Hier werden die für diese Unit "privaten" Variablen, Konstanten, Typen, Klassen deklariert. Die Funktionen und Prozeduren werden hier "ausprogrammiert" (=implementiert => implementation) }

procedure MyFunc(const s: String);
begin
  ShowMessage(s);
end;

end.					

1:
2:

uses
  Unit1;					

1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:

Type 
  tForm1 = {...}
    public
      procedure test;
    end;

{...}

procedure tForm1.test;
begin
end;					

1:

Form1.test;