In Konsolen Anwendung Prozeduren verwenden

[Klaus01]

Delphi-Quellcode:

program FondskurseSQL;

{$APPTYPE CONSOLE}

uses
  SysUtils, Dialogs;

  procedure SchreibLogFile(s:String);
  begin
  ..
  end;

begin
  Tu etwas ....

  SchreibeLogFile('Schritt 1 gemacht');

  Tu etwas ...

  SchreibeLogFile('Und wieder was geschafft');
end.

Grüße
Klaus