Delphi-PRAXiS
Seite 1 von 2  1 2      

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Win32/Win64 API (native code) (https://www.delphipraxis.net/17-win32-win64-api-native-code/)
-   -   GetDC, Canvas, bsclear (https://www.delphipraxis.net/95464-getdc-canvas-bsclear.html)

simjoh 6. Jul 2007 23:48


GetDC, Canvas, bsclear
 
Hi,

ich sende per

Code:
Canvas.Handle := GetDC(FremdesFenster.Handle);
und
Code:
Canvas.TextRect(TheRect,x,y,Str);
einen String Str an ein FemdesFenster. Den Hintergrund des Canvas mache ich mit
Code:
C.brush.style:=bsclear;
transparent. Nun wird alle paar Sekunden was Neues auf das fremde Fenster geschrieben.
Nun würde ich gerne den vorher geschriebenen Text löschen, weil der sonst immer auf dem fremden Fenster bleibt und nur vom neuen Text überschrieben wird, der Hintergrund wird ja nicht neu gezeichnet. Ne Idee, wie man sowas machen kann?

Schanke Dön!!

bitsetter 7. Jul 2007 03:13

Re: GetDC, Canvas, bsclear
 
Hi,

du kannst ja mal versuchen ob ein RedrawWindow() hilft.
Mit Hier im Forum suchenInvalidateRect könntest du es ansonsten auch noch versuchen.

SirThornberry 7. Jul 2007 12:25

Re: GetDC, Canvas, bsclear
 
oder du speicherst dir den Hintergrund und malst ihn auch immer mit zurück.

simjoh 7. Jul 2007 22:08

Re: GetDC, Canvas, bsclear
 
Hm, beides klingt gut, ich hab aber keine Ahnung, wie ich das umsetzen soll. :oops:

bitsetter 7. Jul 2007 23:04

Re: GetDC, Canvas, bsclear
 
Für InvalidateRect():
Delphi-Quellcode:
var
  Rect: TRect;
begin
  GetWindowRect(FremdesFenster.Handle, Rect);
  Rect.Bottom:= Rect.Bottom- Rect.Top;
  Rect.Right:= Rect.Right- Rect.Left;
  Rect.Top:= 0;
  Rect.Left:= 0;
  invalidateRect(FremdesFenster.Handle, @Rect,true);
Die Größe des Bildausschnitts welcher aktualisiert werden soll, kannst du selber noch verkleinern.

Für RedrawWindow():
Delphi-Quellcode:
   RedrawWindow(FremdesFenster.Handle, nil, 0, RDW_ERASE or RDW_FRAME or RDW_INVALIDATE or RDW_UPDATENOW or RDW_ALLCHILDREN);
Da wird gleich das gesamte Fenster sowie allen WinControls darauf neugezeichnet.

_frank_ 7. Jul 2007 23:16

Re: GetDC, Canvas, bsclear
 
kleine Bemerkung am Rande...
Zitat:

Zitat von bitsetter
Für InvalidateRect():
Delphi-Quellcode:
invalidateRect(FremdesFenster.Handle, @Rect,true);
Die Größe des Bildausschnitts welcher aktualisiert werden soll, kannst du selber noch verkleinern.

dazu ist mir beim Screencanvas (GetDC(0)) aufgefallen, dass scheinbar der gesamte Screen refresht wird (trotz kleinerem bereich via Rect) => flackernde Desktopsymbole.

ich habe das gebaucht, um ein gitter, welches über ein form inkl. aller darauf befindlichen Controls gemalt (konnte also das form.canvas nicht verwenden) wurde, wieder zu löschen.
in dem Fall gings nur mit RedrawWindow sauber...invalidaterect auf das form-Handle angewand, hat nur das form, aber nicht die Controls darauf neu gezeichnet...

hing da auch ne Weile dran :)

Gruß Frank

simjoh 8. Jul 2007 21:20

Re: GetDC, Canvas, bsclear
 
Hi,

danke für die Tipps, aber beim Test gerade flackert bei beiden Versionen der Bildschirm, weil offensichtlich ständig das gesamte Fenster refresht wird. Bei
Delphi-Quellcode:
RedrawWindow(FremdesFenster.Handle, nil, 0, RDW_ERASE or RDW_FRAME or RDW_INVALIDATE or RDW_UPDATENOW or RDW_ALLCHILDREN);
wie wird denn da das refreshen auf das Rect beschränkt? Oder is das ne dumme Frage?

Gruß

bitsetter 8. Jul 2007 21:42

Re: GetDC, Canvas, bsclear
 
Hi,

Delphi-Quellcode:
var
  Rect: TRect;
begin
  GetWindowRect(Handle, Rect);
  Rect.Bottom:= Rect.Bottom- Rect.Top;
  Rect.Right:= Rect.Right- Rect.Left;
  Rect.Top:= 0;
  Rect.Left:= 0;
  RedrawWindow(FremdesFenster.Handle, @Rect, 0, RDW_ERASE or RDW_FRAME or RDW_INVALIDATE or RDW_UPDATENOW or RDW_ALLCHILDREN);
Den Bildausschnitt müsstest du dann noch anpassen;

Du sagst das flackert, hast du etwa versucht den Desktop neu zu zeichnen oder etwa ein anderes Fenster? Wenn der ganze Bildschirm flackert wird meistens der Desktop neugezeichnet. Normalerweise wird aber nur ein Ausschnitt vom fremden Fenster aktualisiert.

Zitat:

Zitat von simjoh
wie wird denn da das refreshen auf das Rect beschränkt?

Da war kein Rect angegeben, also würde das komplette Fenster neu gezeichnet werden.

_frank_ 8. Jul 2007 23:11

Re: GetDC, Canvas, bsclear
 
wie ich schon sagte, ich hab das Screen-Canvas (getDC(0)) verwendet und InvalidateRect mit der Position meines zu refreshenden Fensters gefüttert...
mit RedrawWindow hats dann super funktioniert...

pseudocode (wo die Symbole geflackert haben):
Delphi-Quellcode:
GetWindowRect(Handle, Rect);
invalidateRect(GetDC(0), @Rect,true);
gruß Frank

bitsetter 8. Jul 2007 23:27

Re: GetDC, Canvas, bsclear
 
Hi,

bei deinem Code passiert bei mir gar nichts. Müsste es nicht eher so gehen
Delphi-Quellcode:
invalidateRect(WindowFromDC(0), @Rect, true);
dann flackert jedoch garantiert der ganze Bildschirm kurz auf.


Alle Zeitangaben in WEZ +1. Es ist jetzt 15:51 Uhr.
Seite 1 von 2  1 2      

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz