Fortschrittsdialog auf Konsole

[150gozilla]

Soa ich habe es so gemacht

Delphi-Quellcode:

Write(PChar('[   Lade   ]'));
 Sleep(900);
 Write(#13);
 Write(PChar('[=         ]'));
 sleep(900);
 write(#13);
 Write(PChar('[==        ]'));
 Sleep(900);
 Write(#13);
 Write(PChar('[===       ]'));
 sleep(900);
 Write(#13);
 Write(PChar('[====      ]'));
 sleep(900);
 Write(#13);
 Write(PChar('[=====     ]'));
 sleep(900);
 Write(#13);
 Write(PChar('[======    ]'));
 sleep(900);
 Write(#13);
 Write(PChar('[=======   ]'));
 sleep(900);
 Write(#13);
 Write(PChar('[========  ]'));
 sleep(900);
 Write(#13);
 Write(PChar('[========= ]'));
 sleep(900);
 Write(#13);
 Write(PChar('[==========]'));
 sleep(900);
 Write(#13);
 Write(PChar('[ LADEN OK ]'));
 sleep(900);

Gibt es nun eine Möglichkeit, das zentriert im Fenster darzustellen ?