Einzelnen Beitrag anzeigen

PeterPanino

Registriert seit: 4. Sep 2004
1.465 Beiträge
 
Delphi 10.4 Sydney
 
#14

Re: Halb-durchsichtiges Panel?

  Alt 11. Apr 2009, 22:19
Zitat von Yogu:
Versuche es mal mit einer PaintBox. Die ist von TGraphicControl abgeleitet, also könnte das folglich klappen:

Zeichne im OnPaint einfach folgendes Raster:

Delphi-Quellcode:
var i, j: Integer;
begin
  for i := 0 to PaintBox1.Width div 2 do
    for j := 0 to PaintBox1.Height div 2 do
    begin
      PaintBox1.Canvas.Pixels[i*2, j*2] := clBlack;
      PaintBox1.Canvas.Pixels[i*2+1, j*2+1] := clBlack;
    end;
end;
Das sieht zwar nicht so ganz professionell aus, weil man eben doch ein Raster erkennt, aber so geht es am einfachsten.
Vielen Dank, Yogu! Die PaintBox sieht zwar recht hübsch aus, aber sie wird immer HINTER den anderen Steuerelementen gezeichnet:

http://img264.imageshack.us/img264/5942/paintbox.gif

Natürlich habe ich im Designfenster der IDE die Funktion "Nach vorne bringen" für die PaintBox bzw. "Nach hinten bringen" für das andere Steuerelement verwendet, aber es half nichts. Die PaintBox soll ja nun die anderen Elemente verdecken.

Wieso wird denn nun die PaintBox hinter dem Edit gezeichnet?
  Mit Zitat antworten Zitat