Entwickler-Ecke

Sonstiges (Delphi) - Listbox ausdrucken


andi_hauser - Mo 07.10.02 21:18
Titel: Listbox ausdrucken
Hi, kurze frage:

Wie kann ich den Inhalt einer Listbox auf ButtonClick ausdrucken? :?

thx, Andi


Delete - Mo 07.10.02 21:38

Schreib den Inhalt mit TextOut auf einen TPrinter.Canvas oder pack den Inhalt der Listbox in ein RichEdit und ruf dann die Methode Print davon auf.


SMI - Mo 07.10.02 21:40

Get auch einfacher, einfach die unit printers einbinden und dann folgende Zeilen einfügen:

Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
procedure TForm1.Button1Click(Sender: TObject);
var
 i:integer;
 MyFile: TextFile;
begin
  AssignPRN(MyFile);
  Rewrite(MyFile);
  For i:=0 to ListBox1.Items.Count-1 DO
  BEGIN
   Writeln(MyFile,ListBox1.Items.Strings[i]);
  END;
  System.CloseFile(MyFile);
end;


SMI

(08.10.02 00:12 Tino) Code-Tags hinzugefügt.


Delete - Mo 07.10.02 21:42

:roll: Alte DOS-Schule, was? :wink:


SMI - Mo 07.10.02 21:43

Warum nicht Delphi ist eben auch nur ein besseres Turbo Pascal.

SMI


Delete - Mo 07.10.02 21:48

Delphi ist die IDE, Object Pascal ist die Sprache


SMI - Mo 07.10.02 22:05

Da muss ich dich korrigieren, Delphi war nur der Codename für eine Datenbanksprache von Borland. Der Syntax dieser Sprache sollte keine C Ähnlickeit haben, und so ist jemand Borland auf die gloreiche Idee gekommen, dass man doch das etwas angestaubte Pascal verwenden könne. Daher kommt auch die hervoragende Datenbankanbindung. Delphi ist nicht die IDE, sondern einfach nur der Name des Projekts, was den Compiler, sowie die IDE einschließt. Bei der Programmiersprache hast du recht die heißt und hieß aber schon seit TP 5.0 Objekt Pascal (seitdem Borland OOP eigeführt hat). Daher war meine Aussage schon richtig, dass Delphi ist auch nur ein besseres TurboPascal ist.

Das alles steht viel ausführlicher auf der Borland Homepage.

SMI