Und Quellcode bitte in Delphi-Tags einschließen ([ delphi] und [ /delphi] ohne die Leerzeichen). Außerdem bitte auch mitteilen, wo es hakt, "funktioniert nicht" ist keine aussagefähige Fehlerbeschreibung.
P.S.: Auch von mir Willkommen in der
DP
@Larsi: deklinieren ist etwas anderes