Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Yogu,
12. Apr 2009
Genial, die Eigenschaft kannte ich noch gar nicht: csOpaque. Klar, wenn man die Deckkraft abstellt, dann ist das Control transparent.
Leider zeichnet das Transparente Panel nur den Rahmen und den Caption, nicht jedoch einen transparenten Inhalt. Ich hab mal was in der Richtung versucht (siehe Anhang), aber leider ist 1. Canvas.Pixels viel zu langsam (und ich kenne nichts à la ScanLine eines...
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Yogu,
11. Apr 2009
Mist. Daran hab ich nicht gedacht.
Weil die PaintBox ein GraphicControl ist, und das Edit ein WinControl. Anders ist es leider nicht möglich, einen Transparenteffekt zu erzeugen.
Du kannst mit der PaintBox zum Beispiel ein Image verschleiern, oder ein Label. Aber so gut wie alles andere geht nicht. Du könntest die Methode Paint des Formulars überschreiben:
procedure TForm1.Paint;
begin...
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Yogu,
11. Apr 2009
Versuche es mal mit einer PaintBox. Die ist von TGraphicControl abgeleitet, also könnte das folglich klappen:
Zeichne im OnPaint einfach folgendes Raster:
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 := clBlack;