// Getestet mit D4 unter XP

// Wenn Sie zur Entwicklerzeit Variablen überwachen wollen ohne Haltepunkte zu
// setzen, dann klicken Sie Projekt/Optionen/Linker/Textbildschirm-Anwendungen
// an. Beim Start geht ein DOS-Fenster auf, in dem Sie folgendermaßen
// Werte ablesen können:
 
function zeigen(txt: string):boolean;  
begin  
  if System.IsConsole then  
  begin  
    WriteLn(txt);  
    result := true;  
  end else result := false;  
end;  
 
// Aufruf 
... 
var i:integer; 
begin 
  i:=5; 
  zeigen(inttostr(i)); 
end;