udskriv - FIT TO PAGE funktion

jeg tror faktisk det bare er et spørgsmål om at skifte papir størelsen ud, har du prøvet at studere online hjælp ?

Hvis det er a4 kan du bare resize til 21,7 gang 29 som er A4 format, den køre sikkert letter eller noget andet sygt som standard.

/* seider */

Nej det er ikke korrekt seider :)

det er 21 * 29,7.

Men det skal lige siges at der er ingen A¤ printere der skriver til denne størrelse, hver printer har en kant hvor de ikke kan skrive ud over.

Jeg tror at de fleste printere kan klare denne størrelse.
20,29 * 28,3 cm eller 1598 * 2228 pixels.
Men husk at vælge stående billede til de mål, skal billedet ligge ned så skal tallene skiftes om.

</martin>

Hej Kristian, vi skal nok få løst problemmet

/Martin

det her kan måske bruges

procedure TForm1.Button1Click(Sender: TObject);
var
  Bitmap: TBitmap;
  PixelsX, PixelsY,
  NumPixelsX, NumPixelsY,
  PrintWidth, PrintHeight,
  OffSetX, OffSetY: Integer;
  PrintRect: TRect;
begin
  Bitmap := TBitmap.Create;
  try
    Bitmap.LoadFromFile(\'bitmap.bmp\');
    NumPixelsX := GetDeviceCaps(Printer.Handle, HORZRES); //højde i pixels
    NumPixelsY := GetDeviceCaps(Printer.Handle, VERTRES); //bredde i pixels
    PixelsX := GetDeviceCaps(Printer.Handle, LOGPIXELSX); //pixels pr inch
    PixelsY := GetDeviceCaps(Printer.Handle, LOGPIXELSY); //pixels pr inch

    PrintWidth := Round(Bitmap.Width * (PixelsX / Screen.PixelsPerInch));
    PrintHeight := Round(Bitmap.Height * (PixelsY / Screen.PixelsPerInch));
    OffSetX := (NumPixelsX - PrintWidth) div 2;
    OffSetY := (NumPixelsY - PrintHeight) div 2;

    //Billedets placering på siden
    PrintRect := Rect(OffSetX, OffSetY,
                      PrintWidth + OffSetX, PrintHeight + OffSetY);

    Printer.BeginDoc;
    Printer.Canvas.StretchDraw(PrintRect, Bitmap);
    Application.ProcessMessages;
    Printer.EndDoc;
  finally
    Bitmap.Free;
  end;
end;

Hej Kristian, som du kan se på nico22\'s eks. er det ikke bare at bruge printdialog, så brug du min smartprinter.

/Martin

da jeg ikk gider at hvide det alligevel så lukker jeg bare det her spørgsmål