Versionsinfo automatisch ins Programm übernehmen

[Christian Seehase]

Moin Luckie,

der Code kommt mir so bekannt vor

@m-werk:
Du musst doch nur die Funktion kopieren und aufrufen:

Code:

Label.Caption := GetFileVersionsString(paramstr(0));

fertig.

Sollte Dir das Ergebnis zu lang sein, dann schau Dir doch mal die Hilfe zu der Funktion Format an. Damit sollte es dann hinzubekommen sein, in der Funktion GetFileVerionsString den Rückgabewert auf das gewünscht Mass zu reduzieren.