Hi, das ist keine variable, die du setzen kannst, Pageleft gibt dir den linken Rand deines Druckers
gruß Stefan Am 29.06.2011 um 11:53 schrieb Klemens Klarhoelter: > Hi, > warum akzeptiert RB denn ps.Pageleft = 0 nicht? > "Code, Window1.Listbox1.ContextualMenuAction, line 209, Cannot assign a value > to this property, ps.PageLeft = 0" > Warum kann man diese Variable nicht setzen? Oder wie kann ich noch die linke > Position mitgeben? > > > dim ps as new PrinterSetup > Dim g As Graphics > rpt = new ReportInventar > ps.MaxHorizontalResolution = 300 > ps.MaxVerticalResolution = 300 > ps.Pageleft = 0 <<<<<< > > if ps.PageSetupDialog then > g = OpenPrinterDialog(ps, nil) > if g <> nil then > if rpt.run(ds,ps) then > if rpt.document<>nil then > rpt.Document.Print(g) > end if > end if > end if > end if > redim app.DatabaseReport(-1,-1) > > > Gruß > Klemens >
