Ich nutzte Delphi7 Professional und stehe vor einem Problem.
Ich habe einen kleinenes LAN CLient und Server Chat Programm geschrieben, welches auch begrenzt funktioniert.
Wenn das Programm den Befehl PRINT vom anderen Computer erhält, dann soll es die vorangegangenen Nachrichten, die in einer RichEditBox stehen ausdrucken.
Delphi-Quellcode:
if t = 'print' then
begin
PrinterDialog1.Execute;
Printer.BeginDoc;
for x:= 0 to memo1.Lines.Count do //Schleife
memo1.Print(memo1.lines[x]); //Druckt jede Zeile
Printer.EndDoc;
end;
So hab ich das mal geschreiben.
Leider funktioniert es nicht,
der Drucker verarbeitet zwar etwas, wenn das Programm geschlossen wird, es erscheint jedoch nur ein leeres Blatt Papier.
Für Hilfe währe ich dankbar
