Announcement

Collapse
No announcement yet.

Screenshots

Collapse
X
  • Filter
  • Time
  • Show
Clear All
new posts

  • Screenshots

    Hy,
    ich hab ml ne frage die mich im Moment sehr beschäftigt:
    Wie kann ich mit dem builder Screenshots machen und diese Abspeichern bzw. in einem image anzeigen.
    Danbke im vorraus:
    mfg.: Andre

  • #2
    Ein TBITMAP-Objekt anglegen und den gewünschten Ausschnitt mit CopyRect einfügen. Mit der Canvas Eigenschaft des TBITMAP-Objekts kann gezeichnet werden, "SaveToFile" speichert es und mit den Zuriff auf die Canvas Eigenschaft des Bildschirms kann das ganze ausgegeben werden
    Christian

    Comment


    • #3
      Danke für deinen Komentar Christian Marquardt<br>
      könntest du mir ein kleines Beispiel Posten<br>
      Dank

      Comment


      • #4
        Neues Objekt

        Graphics::TBitmap *sh=new Graphics::TBitmap;

        Größe festlegen

        sh->Width=700;

        sh->Height=600;

        Eine Linie malen

        sh->Canvas->LineTo(20,20)

        Alles speichern

        sh->SaveToFile("c:\\test.bmp");

        Alles in das Formular kopieren

        Form1->Canvas->Draw(0,0,sh);

        Objekt löschen
        delete sh
        Christian

        Comment


        • #5
          Danke für deine antwort ich mach das so:<br><br>
          HDC dc = GetDC(NULL);C
          TRect rect = Rect(0,0 ,Screen->Width, Screen->Height);<br>
          Graphics::TCanvas *ScreenCanvas = new Graphics::TCanvas();<br>
          ScreenCanvas->Handle = dc;<br>
          Image1->Center = true;<br>
          Image1->Picture->Bitmap->Width = Screen->Width;<br>
          Image1->Picture->Bitmap->Height= Screen->Height;<br>
          Image1->Picture->Bitmap->Canvas->CopyRect(rect, ScreenCanvas, rect);<br>
          Image1->Picture->SaveToFile("c:\\client.bmp");<br><br> mfg: Andre

          Comment


          • #6
            Fein, finde ich eine gute Idee mit GetDC(null) den Screen zu holen.

            Christia
            Christian

            Comment

            Working...
            X