Zmiana rozmiaru strony

[Mironas]

Jak programowo zmienić rozmiar strony dla domyślnej (aktualnie wybranej) drukarki?
Chodzi o zrobienie tego samego co mogę ręcznie zrobić w dialogu PageSetupDialog, opcja Papier/Rozmiar.

Orientację strony mogę zmienić tak:

KOD cpp:   �  UKRYJ  �

KOD cpp:   �  POKAŻ  �

Printer()->Orientation = poLandscape;

Jednak rozmiaru strony już się tak nie da bo są tylko do odczytu:

KOD cpp:   �  UKRYJ  �

KOD cpp:   �  POKAŻ  �

  Printer()->PageWidth = szerokosc;
  Printer()->PageHeight = wysokosc;
 

[Cyfrowy Baron]

Funkcja Skaluj dostępna w ustawieniach drukarki nie skaluje strony, lecz skaluje elementy przesłane do drukowania. Klasa TPrinter nie posiada funkcji pozwalającej sterować tą funkcją, więc programowo to możesz przeskalować to co chcesz wydrukować przed przesłaniem tego do drukarki. Skalowanie trzeba realizować poprzez odczytanie właśnie właściwości PageWidth i PageHeight. W przypadku tekstu trzeba skorzystać ze struktury LOGFON. Poczytaj sobie tutaj: http://programowanie.cal.pl/cyfbar/print.html

[Mironas]

Chyba się nie rozumiemy.
Nie chcę niczego skalować ani drukować.

Chcę programowo zmienić domyślny rozmiar strony dla domyślnej drukarki.

Czyli chcę osiągnąć taki sam efekt jak "na piechotę" mogę mieć przez otwarcie okna PageSetupDialog i zmianę rozmiaru papieru np z A4 na A3. Po tej operacji w Printer()->PageWidth/PageHeight mam prawidłowe wymiary wybranej strony, a w innych oknach dialogowych otwieranych w programie mam prawidłowo wybraną stronę (A3). Taki i tylko taki efekt chcę osiągnąc, ale bez ręcznego otwierania PageSetupDialog.

[Cyfrowy Baron]

Rzeczywiście, źle cię zrozumiałem. Próbowałem kodu z tej strony: http://www.codeproject.com/Articles/132365/Configuring-Printer-Settings-Programmatically, ale u mnie to jakoś nie zadziałało i nie zmieniała się strona w drukarce z A4 na A3.

[Mironas]

Problem rozwiązany. Inspirację co ciekawe znalazłem na forum:
Zmiana formatu wydruku

Dla potomnych (ewentualnie dla tych którzy by chcieli poprawić kod):

KOD cpp:   �  UKRYJ  �

KOD cpp:   �  POKAŻ  �

// Pobierz parametry strony
void TForm1::PobierzParametryStrony(int &PaperSize, int &Orientation)
{
  WCHAR cDevice[1024], cDriver[1024], cPort[1024];
  THandle hDeviceMode;
  PDeviceMode DevMode;

  Printer()->GetPrinter(cDevice, cDriver, cPort, hDeviceMode);
  DevMode =(_devicemodeW*) GlobalLock((void*)hDeviceMode);

  PaperSize   = DevMode->dmPaperSize;   // DMPAPER_A3, DMPAPER_A4, DMPAPER_A5, ...
  Orientation = DevMode->dmOrientation; // DMORIENT_PORTRAIT, DMORIENT_LANDSCAPE

  GlobalUnlock((void*)hDeviceMode);
}
//---------------------------------------------------------------------------
// Ustaw parametry strony
void TForm1::UstawParametryStrony(int PaperSize, int Orientation)
{
  WCHAR cDevice[1024], cDriver[1024], cPort[1024];
  THandle hDeviceMode;
  PDeviceMode DevMode;

  Printer()->GetPrinter(cDevice, cDriver, cPort, hDeviceMode);
  DevMode =(_devicemodeW*) GlobalLock((void*)hDeviceMode);

  DevMode->dmFields = DevMode->dmFields | DM_PAPERSIZE;
  DevMode->dmFields = DevMode->dmFields | DM_ORIENTATION;

  DevMode->dmPaperSize    = PaperSize;    // DMPAPER_A3, DMPAPER_A4, DMPAPER_A5, ...
  DevMode->dmOrientation  = Orientation;  // DMORIENT_PORTRAIT, DMORIENT_LANDSCAPE

  Printer()->SetPrinter(cDevice, cDriver, cPort, hDeviceMode);
  GlobalUnlock((void*)hDeviceMode);
}
//---------------------------------------------------------------------------