Entwickler-Ecke

Delphi Language (Object-Pascal) / CLX - Textzeile drucken


Eberhard - Di 03.09.02 22:09
Titel: Textzeile drucken
Hallo,
wer kann mir helfen. Ich versuche gerade, von Turbo-Pascal auf Delphi
umzusteigen. Trotz 25cm Bücherstapel habe ich auf einige Fragen keine
Antwort gefunden.
1. Frage
Wie kann man ein berechnetes Ergebnis (Realzahl) als einfache Druckzeile ausgeben.
In Pascal würde man z.B. schreiben writeln(LPT1,'Ergebnis=',zahl:5:2);
Wie sieht das Äquivalent in Delphi aus? Welche Units braucht man?
Die nächsten Fragen später.


Klabautermann - Di 03.09.02 22:20

Hallo,

so einfach ist das in Zeiten von Multitascing Betriebssystemen nicht mehr. Du must immer damit rechnen, das neben deinen noch drei Andere Programme gleichzeitig auf den Ducker zugreifen wollen der Scheduller (Druckmanager) muss das irgendwie sinvoll verwalten, daher kannst du nur komplette Dokumente drucken.
Du musst also die Datei (den Post) erst öffnen und danach wieder schließen:

Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
var
  F: TextFile;
begin
  AssignFile(F, 'LPT1');// LPT2,COM1,COM2...
  Rewrite(F);
  Writeln(F, 'Hello');
  Writeln(F, 'There!');
  Writeln(F, #12);
  CloseFile(F);
end;

(Quelle für das Beispiel: Swiss Delphi Center [http://www.swissdelphicenter.ch/de/showcode.php?id=293])

Gruß
Klabautermann