HILFE HILFE ich kriegs nicht hin! Ich versuche einem QR-Formular einen bestimmten Drucker zuzuordnen und daraus folgend die Seitenlaenge zu definieren (z.B. 12 Zoll x 240 mm) die dem Drucker in der WIN-Druckerverwaltung zugeordnet sind. Der Nadler ist NICHT der Standarddrucker, sondern ein Laser mit 297 mm Seitenlänge. Ich habe alles mögliche probiert z.B. die VERTSIZE zu ermitteln aber offenbar stammt der Handle vom Standarddrucker, so daß ich staendig auflauf.
s_length:=GetDeviceCaps(printer.Handle,VERTSIZE);
if QRRechnung.Page.Length < s_length then
begin
if s_length>297 then
begin
QRRechnung.Page.PaperSize:=custom;
QRRechnung.Page.length :=s_length;
end;
end;
Für Hilfe wäre ich sehrr sehr dankbar!
mfg
Christoph
s_length:=GetDeviceCaps(printer.Handle,VERTSIZE);
if QRRechnung.Page.Length < s_length then
begin
if s_length>297 then
begin
QRRechnung.Page.PaperSize:=custom;
QRRechnung.Page.length :=s_length;
end;
end;
Für Hilfe wäre ich sehrr sehr dankbar!
mfg
Christoph
Comment