Ich hab es mit
Project.Filename
gemacht, aber da gibt es nur die Endung
dpr.
Das könnte evtl. noch gehen... ich hab es noch nicht ausprobiert, aber teste mal:
Project.Projectoptions.Values['CompileName']
hier im übrigen noch ne Liste der Optionen:
Delphi-Quellcode:
{
Align FloatSupport MemberPointer SrcDir
Alignment ForLoops MemberPrecision StackChecks
Ansi GenConsoleApp MergeDupStrs StackFrames
Assertions GenDll MFCCompat StackSize
ATLAutoRegisterInproc GenDRC MinEnumSize StdStackFrame
ATLCoinitMultiThreaded GenDUI MinorVersion SysDefines
ATLDebug GenPackage ModuleAttribs Target
ATLDebugQI GenStaticLibrary NestedComments TasmAllCase
ATLDebugRefCount HeapSize NoAskLibs TasmCaseCheckingOn
ATLMultiUse HintFlag ObjDir TasmCrossReference
ATLThreading HostApplication OpenStrings TasmDebugOn
AutoDep IdentLen Optimization TasmDirective
AutoIncBuildNum ImageBase OptionsString TasmExpanded
AutoRegVars ImageDebugInfo OutputDir TasmFullDebug
BoolEval ImplicitBuild OutputObj TasmGenerateListing
Build ImportedData OverflowChecks TasmHashTable
CallingConvention IncludePath Packages TasmIncludeConditionals
CaseSensitive IncludeVersionInfo PageSize TasmIncludeErrors
ClearPackageCache InMemoryExe PCH TasmPasses
ClearUnitCache InstructionSet PchPath TasmSymbolLength
CodeModifiers IOChecks PchStopAfter TasmSymbolTables
CodeOpt Keys PentiumFloat TasmViaCppOpts
CodePage LibPath PkgDcpDir TasmWarningsLevel1
CompileName LibraryList PkgDllDir TasmWarningsOn
CppDebugInfo LineNumbers PurgeComment Templates
DebugInfo LinkDebugVcl RangeChecks TwoChar
DebugPath LinkGenImportLib ReferenceInfo TypedAddress
DebugSourcePath LinkGenLib RegisterVars TypeInfo
Defines LinkMaxErrors Release Underscore
DesigntimeOnly LinkNoStateFiles ReleasePath UnitAliases
EHDtor LinkShowMangle RemoteDebug UnitDebugInfo
EHLocalInfo LinkSubsysMajor RemoteHost UnitDir
EHPrologs LinkSubsysMinor RemotePath UnitOutputDir
EnableExceptions Locale RemoteSymbols UseDynamicRtl
EnableInLines LocalSymbols ResDir UseIncLinker
EnableRTTI LongStrings RunParams UsePackages
ExeDescription MajorVersion RuntimeOnly VarStringChecks
ExtendedDictionary MapFile SafeDivide VTables
ExtendedSyntax MarkModified ShowInfoMsgs WarnFlag
FastFloat MaxHeapSize ShowLinkerWarnings WriteableConst
Float MaxStackSize ShowWarnings ZeroBaseClass
}