Einzelnen Beitrag anzeigen

shmia

Registriert seit: 2. Mär 2004
5.508 Beiträge
 
Delphi 5 Professional
 
#15

Re: Programm durchsteppen - Anzeige, was gerade ausgeführt w

  Alt 28. Nov 2005, 16:21
Zitat von Susanne:
über die MS-DOS Eingabeaufforderung habe ich edit als Editor benutzt, ist der Alt genug?
Ja, der ist ok. Copyright ist von 1995; also schon ein Oldie.
Zitat von Susanne:
ich hab einen Kommentar eingefügt und dann gespeichert, aber gebracht hat das gar nichts.
Hast du auch den Cursor bis ans Dateiende bewegt ?
Wenn die Zeile mit dem Cursor überstrichen wird, ist das für den Editor der Anreiz, die Zeile neu zu "formatieren".
Hast du danach auch das Projekt neu erzeugt ? Es sollte reichen, nur die Problemunit neu zu kompilieren, aber sicher ist sicher.

Du kannst auch folgendes Konsolenprogramm benützen:
Delphi-Quellcode:
program PASclean;
{$APPTYPE CONSOLE}
uses
  sysutils;

var
   s : string;
   p : Integer;
begin
  // Hier Anwender-Code
  while not Eof(Input) do
  begin
     Readln(s);

     p := Pos(#10, s);
     while p > 0 do
     begin
        Write(Copy(s,1, p-1), #13#10);
        Delete(s, 1, p);
        p := Pos(#10, s);
     end;

     p := Pos(#13, s);
     while p > 0 do
     begin
        Write(Copy(s,1, p-1), #13#10);
        Delete(s, 1, p);
        p := Pos(#13, s);
     end;

     Write(s, #13#10);
  end;
end.
Und dann an der Kommandozeile:
PASclean <unit1.pas >unit1_NEU.pas
Wenn die erzeugte Datei mehr Bytes hat wie die Orginale, weisst du dass kaputte Linefeeds
im Spiel waren.
Andreas
  Mit Zitat antworten Zitat