Announcement

Collapse
No announcement yet.

Druckt man SO direkt aus der Zwischenablage?

Collapse
X
Collapse
  • Page of 1
  • Filter
  • Time
  • Show
Clear All
new posts
Previous template Next
  • #1

    Druckt man SO direkt aus der Zwischenablage?

    Hallo,

    da ich es sehr gut gebrauchen kann, habe ich mir ein Programm zurecht gebastelt, das Grafiken, die

    in die Windows-Zwischenablage wandern, direkt ausdruckt.
    Funktioniert bei allen Rechnern hier bei mir ausgezeichnet. Ich kopiere eine Grafik in die

    Zwischenablage und schon kommt sie mir aus dem Drucker entgegen geflogen.
    So weit so gut.
    Aber auf allen anderen PCs scheint es nicht zu funktionieren. Es kommen bloss leere Blätter aus den

    Druckern. Ich kann mir darauf absolut keinen Reim machen.

    Ich habe hier deshalb mal kurz das Herzstück des Programms hingeschrieben, in der Hoffnung, dass mir

    jemand sagen kann, ob das so grundsätzlich vielleicht Quatsch ist und nicht richtig funktionieren

    kann.

    dummyPic: TImage; //dummyPic ist vom Typ TImage

    .
    .

    dann im Programm

    .
    .

    dummyPic := TImage.Create(nil); //dummyPic erzeugen
    dummyPic.Picture.Assign(Clipboard); //Grafik aus Zwischenablage zuweisen

    .
    .

    dann kommt etwas zur Druckereinrichtung und danach

    .
    .

    printer.Begindoc;
    printer.Canvas.draw(0, 0, dummyPic.Picture.Graphic); //DAS sollte gedruckt werden
    printer.Enddoc; //Und los gehts. Ab jetzt sollte sich was blicken lassen.
    dummyPic.Free; //dummyPic brauche ich ja nicht mehr

    Vielleicht hat ja jemand Lust mir darauf eine Antwort zu geben.
    Schon mal danke im voraus.

    Gunter
    Tags: None
  • #2
    <html>

    <head>
    <title>Neue Seite 1</title>
    <meta http-equiv="Content-Type" content="text/html; charset=ISO-8859-1">
    </head>

    <body>

    <p>Druckt man SO direkt aus der Zwischenablage?<br>
    <br>
    Ich nochmal,<br>
    <br>
    da ich gerade gesehen habe, dass mein Textkram unleserlich ist, habe ich es nochmal neu
    geschrieben. Diesmal hoffentlich mit mehr Erfolg.<br>
    <br>
    <br>
    <br>
    Hallo,<br>
    <br>
    da ich es sehr gut gebrauchen kann, habe ich mir ein Programm zurecht gebastelt, das
    Grafiken, die <br>
    in die Windows-Zwischenablage wandern, direkt ausdruckt.<br>
    Funktioniert bei allen Rechnern hier bei mir ausgezeichnet. Ich kopiere eine Grafik in die
    <br>
    Zwischenablage und schon kommt sie mir aus dem Drucker entgegen geflogen.<br>
    So weit so gut.<br>
    Aber auf allen anderen PCs scheint es nicht zu funktionieren. Es kommen bloss leere
    Blätter aus den <br>
    Druckern. Ich kann mir darauf absolut keinen Reim machen.<br>
    <br>
    Ich habe hier deshalb mal kurz das Herzstück des Programms hingeschrieben, in der
    Hoffnung, dass mir <br>
    jemand sagen kann, ob das so grundsätzlich vielleicht Quatsch ist und nicht richtig
    funktionieren <br>
    kann.<br>
    <br>
    <br>
    dummyPic: TImage;&nbsp;&nbsp;&nbsp; //dummyPic ist vom Typ TImage<br>
    <br>
    .<br>
    .<br>
    <br>
    dann im Programm<br>
    <br>
    .<br>
    .<br>
    <br>
    dummyPic := TImage.Create(nil);&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;& nbsp;&nbsp; //dummyPic
    erzeugen<br>
    dummyPic.Picture.Assign(Clipboard);&nbsp;&nbsp;&nb sp; //Grafik aus Zwischenablage zuweisen<br>
    <br>
    .<br>
    .<br>
    <br>
    dann kommt etwas zur Druckereinrichtung und danach<br>
    <br>
    .<br>
    .<br>
    <br>
    printer.Begindoc;<br>
    printer.Canvas.draw(0, 0, dummyPic.Picture.Graphic);&nbsp;&nbsp;&nbsp; //DAS sollte
    gedruckt werden<br>
    printer.Enddoc;&nbsp;&nbsp;&nbsp; //Und los gehts. Ab jetzt sollte sich was blicken
    lassen.<br>
    dummyPic.Free;&nbsp;&nbsp;&nbsp; //dummyPic brauche ich ja nicht mehr<br>
    <br>
    <br>
    <br>
    Vielleicht hat ja jemand Lust mir darauf eine Antwort zu geben.<br>
    Schon mal danke im voraus.<br>
    <br>
    <br>
    <br>
    <br>
    Gunter</p>
    </body>
    </html&gt

    Comment

    • #3
      Ich glaube, es liegt an der Art wie du deine Bilder auf dem Drucker ausgibst (Drucken von Bildern ist überhaupt eine komplizierte Sache.) Die Zeile <b>"printer.Canvas.draw(0, 0, dummyPic.Picture.Graphic); //DAS sollte gedruckt werden"</b> ist nicht ganz korrekt, stattdessen muß man auf kompliziertere Routinen ausweichen. Schau mal unter http://homepages.borland.com/efg2lab/ImageProcessing/SlideShow.htm und such auf der Seite nach der Funktion <b>PrintBitmap</b>. Mit dieser Funktion sollte dann alles klappen...<p>
      Viel Erfolg,<br>
      bernhar

      Comment

      Previous template Next
      Working...
      X