Nein, das ist der Versuch ein Batchprogramm mit Oberfläche (zur Fortschrittsanzeige) zu realisieren.
Sowas musste ich auch schon häufiger machen.
'ne Konsole ist bei manchen halt verpönt, die können den Fortschritt einer Aufgabe nur in 'ner Windowsoberfläche erkennen, aber nicht an der Ausgabe auf der Konsole
Und mit sowas kann man ein Programm mit Oberfläche auch "mal eben" zu 'nem "bedienungslosen" Batchprogramm umfunktionieren:
Delphi-Quellcode:
// in der DPR
begin
Application.Initialize;
Application.CreateForm(TForm1, Form1);
...
// halt da hier gewöhnliche
if ParamCount > 1
then begin
Form1.Show;
Form1.DoSomething;
Form1.Close;
end else begin
Application.Run;
end;
end;
Und wenn's in erster Linie um "sichtbare Funktionalität" geht, dann kann das ausreichen