Hi,
ich will ein Memofeld ausdrucken. Die Boardsuche hat mir schon sehr geholfen, jedoch gibt´s da noch ein kleines Problem. Wenn ich
Delphi-Quellcode:
procedure TPCDatenbank.DruckenClick(Sender: TObject);
var
Zeile: Integer;
PrintText: TextFile;
begin
AssignPrn(PrintText);
Rewrite(PrintText);
Printer.Canvas.Font := Memo1.Font;
for Zeile := 0 to Memo1.Lines.Count - 1 do
Writeln(PrintText, Memo1.Lines[Zeile]);
CloseFile(PrintText);
end;
ausführe, dann wird automatisch auf dem Standartdrucker ausgedruckt. Ich möchte allerdings ein Auswahlfeld, so wie es normal erscheint: (Bild im Anhang)
Wie bekomm ich jetzt das Auswahlfeld hin?
[edit=sakura] Bild in Anhang verschoben. Bei solcher Größe... 
Mfg, sakura[/edit]