Du könntest es mit einem Parameter realisieren. Wenn das Programm in der Konsole aufgerufen wird, soll einfach "/c" als Parameter übergeben werden.
In der
DPR-Datei schreibst du dann
Delphi-Quellcode:
if LowerCase(ParamStr(1)) = '
/c'
then
begin
Application.CreateForm(...
//Originaler Code der DPR
end
else
//Konsolensachen
Greetz
alcaeus