Ich hätte eine konzeptionielle Frage und zwar habe ich ein Programm das einerseits in einer Batchdatei mit Parameter aufgerufen wird, wo kein Fenster aufpoppen soll, und falls kein Parameter mitgegeben wird, soll es mit
GUI gestartet werden. Derzeit löse ich so:
Delphi-Quellcode:
procedure TForm1.FormCreate(Sender: TObject);
begin
case paramcount of
1: begin
showmessage('Zuwenige Parameter. Programm wird fortgesetzt.');
end;
else
begin
Mach_Was_ohne_GUI(paramstr(2)); //Parameter wurde angegeben
Halt;
end;
end;
end;
Falls ein Parameter angegeben wurde, wird es ausgeführt und danach das Programm in FormCreate brutal mit "Halt" beendet. Funktionert eigentlich auch zufriedenstellend. Doch vermutlich gibt es elegantere Lösungen.
Wie könnte man es besser machen?
lg,
jus