Inhalt einer ComboBox drucken



  • Hallo,

    in einer Anwendung möchte ich den Dateninhalt einer ComboBox
    direkt als Form über das Printer Objekt drucken. Leider weigert
    sich der das ComboBox Objekt im BCB 5 standhaft. Sowohl Text als
    auch Item Inhalt werden owohl am Bildschirm sichtbar nicht gedruckt.
    Bei allen anderen Objekten (ListBox, Edit usw.) klappt das problemlos.

    Hat jemand hierzu eine Idee wie man den Dateninhalt mitdrucken kann?

    Gruss,

    Deimos



  • Warum verrätst du uns nicht, wie deine Druckversuche aussehen?



  • Gerne! Spreche den Dialog Printer aus BCB 5 an.

    void __fastcall TForm1::BDruckenClick(TObject *Sender)
    {
    (PrintDialog1->Execute());
    Form1->Print();
    }

    und hier aendere ich nur dden angezeigten Text der ComboBox.

    void __fastcall TForm1::ComboBox1Change(TObject *Sender)
    {
    Monat->Caption=(ComboBox1->Text);
    }
    //---------------------------------------------------------------------------

    Gruss,

    Deimos



  • TCanvas* canvas = new TCanvas();
        canvas->Handle = GetWindowDC(Handle);
    
        RECT rcSrc, rcDest;
        GetWindowRect(Handle, (LPRECT)&rcSrc);
        int width = rcSrc.right - rcSrc.left;
        int height = rcSrc.bottom - rcSrc.top;
        rcSrc = Rect(0, 0, width, height);
        rcDest = Rect(0, 0, 2*width, 2*height);
    
        Printer()->BeginDoc();
        Printer()->Canvas->CopyRect(rcDest, canvas, rcSrc);
        Printer()->EndDoc();
    
        delete canvas;
    

    Wenn du's noch etwas anders haben willst, dann schau dir mal TPrinter in der Hilfe an. 🙂


Anmelden zum Antworten