ich hatte ein aehnliches problem und hab es mit einer include datei geloest.
bsp.:
include.inc
programm:
Delphi-Quellcode:
program miep;
{$INCLUDE 'include.inc'}
begin
Writeln(miep);
end.
die include datei wird einfach an die stelle, an der sie inkludiert wurde, 'rein' kopiert.
der quelltext sieht dann eigentlich so aus:
Delphi-Quellcode:
program miep;
const
miep = 123;
begin
Writeln(miep);
end.
in die include datei schreibst du einfach deinen typ (oder sonstwas) und bindest diese in deine quelltexte ein.
alternativ kannst du aber auch eine
unit verwenden, waere 'fast' das selbe :o)