Kuin Delphillä saa tulosettua formin tai pelkästään formille piirretyn kuvaajan ?
DELPHI TULOSTUS
DELPHI TULOSTUS
1115
0Äänestä
Muut lukivat myös
Odottaa vastausta
Näihin keskusteluihin ei ole vielä vastattu. Ole ensimmäinen.
Turvaa tilisi vahvistamalla puhelinnumerosi. Voit silloin palauttaa unohtuneen salasanan tekstiviestillä.
Näihin keskusteluihin ei ole vielä vastattu. Ole ensimmäinen.
Vastaukset 1
Vanhimmat
Katso Printer oliosta tietoja ja tulosta Formin TCanvas ??
Builder koodia, muuta delphille:
Tulostaa Image1 komponentin kirjoittimelle;
// Printer()->Orientation = poLandscape;
if (PrintDialog1->Execute())
{
TRect Rect;
Rect.Top = 0;
Rect.Left = 0;
Rect.Right = Printer()->PageWidth;
// Try to keep same scale
Rect.Bottom = Printer()->PageWidth / (float)(642/216); // Muuta tämä vastaamaan kuvan kokoa.
if (Rect.Bottom > Printer()->PageHeight)
Rect.Bottom = Printer()->PageHeight;
Printer()->BeginDoc();
Printer()->Canvas->StretchDraw(Rect,Image1->Picture->Graphic);
Printer()->EndDoc();
}