Hi Stefan, danke, so hat es funktioniert...
Klemens Am 29.06.2011 um 13:14 schrieb Stefan Sicurella: > Hi, > > du musst auf dem was du drucken willst den Rand einstellen.... > bei drawstring gibst du ja sowieso einen x Wert an... wenn du mit einem > Report arbeitest lässt du dort schon den Rand. > Anders geht es meiner Meinung nach nicht. > > Gruß > > Stefan > > > > Am 29.06.2011 um 13:08 schrieb Klemens Klarhoelter: > >> Hi, >> und wie kann man den linken Rand vorgeben? >> >> Klemens >> >> Am 29.06.2011 um 11:56 schrieb Stefan Sicurella: >> >>> >>> 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 >>>> >>> >>> >> >> Klemens Klarhoelter-Selbst >> >> >> >> >> >> >> >> >> >> >> > > Klemens Klarhoelter-Selbst
