![]() |
Licht wie Blitz auf Form erzeugen
Hallo,
ich möchte ein Licht Effekt auf Form erzeugen Es soll das Form kurz und ganz schnell mit Licht (helles Farbe) beleuchtet, als wäre das Form mit Kamera-Blitz photographiert Hat jemand eine Idee? mein Versuch mit Farben hat nicht gelohnt :
Delphi-Quellcode:
[edit=Phoenix]PBlitz auf Userwunsch korrigiert. Mfg, Phoenix[/edit]
procedure TForm1.Button1Click(Sender: TObject);
begin //form1.Color:=225; Form1.Color:=$FFFFFF; sleep(300); Form1.Color:=$FFFF00; sleep(300); Form1.Color:=$FFFFFF; end; |
Re: Licht wie Plitz auf Form erzeugen
stichwort
Delphi-Quellcode:
application.ProcessMessages
|
Re: Licht wie Plitz auf Form erzeugen
Wie wär's mit einer Epilepsie-Warnung auf der Verpackung? :zwinker:
|
Re: Licht wie Plitz auf Form erzeugen
Bitte bring das Bild, wenn überhaupt, im Anhang unter. Ich denke hier können sich alle unter einem Blitz etwas vorstellen. Sonst passiert es nämlich wie jetzt gerade, dass der Server mit dem Bild drauf nicht erreichbar ist und das ganze unschön aussieht.
|
Re: Licht wie Plitz auf Form erzeugen
Zitat:
Ich bin nun fast zufrieden mit diesem Code :mrgreen:
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
begin //form1.Color:=225; Form1.Color:=$FFFFFF; Delay(200); Form1.Color:=clBtnFace; Delay(200); Form1.Color:=$FFFFFF; end; |
Re: Licht wie Plitz auf Form erzeugen
schreib doch clWhite anstatt irgendwelchen HexCodes
also ich würde das so machen: (meist blitzt eine Kamera ja mehrmals)
Delphi-Quellcode:
(Delay wäre auch möglich...)
var
color: TColor; begin color := Form1.Color; Form1.Color:=clWhite; Application.ProcessMessages; sleep(100); Form1.Color := color; Application.ProcessMessages; sleep(50); Form1.Color:=clWhite; Application.ProcessMessages; sleep(100); Form1.Color := color; end; |
Re: Licht wie Plitz auf Form erzeugen
Zitat:
Ich habe sie nie verwendet |
Re: Licht wie Plitz auf Form erzeugen
![]() |
Re: Licht wie Plitz auf Form erzeugen
Zitat:
Die professionelle Lösung wäre natürlich die Warnung zusätzlich einzustanzen, das hat die beste Wirkung. |
Re: Licht wie Plitz auf Form erzeugen
Zitat:
---------------- Danke@fLaSh11 Das hat den Effekt genauso wie mit delay |
Re: Licht wie Plitz auf Form erzeugen
Zitat:
Wäre es nicht vlt. schöner und einfacher ein GIF, AVI, etc. zu machen und es einfach ab zu spielen?! :wink: |
Re: Licht wie Plitz auf Form erzeugen
Zitat:
Aber man kann den Kamerainternen Bitz auch sehr sinnvoll einsetzen. Bspw., wenn man bei grellem Sonnelicht Personen in seiner Nähe photographiert. So vermeidet man die starken, idR. unschönen und ungewollten Schlagschatten. Dafür schleppe ich normalerweise nicht extra meinen Aufsteckblitz mit. Es geht ja auch bei soetwas nicht darum eine Szene auszuleuchten. Daher: Ich finde den internen Blitz recht praktisch. Um etwas größeres Auszuleuchten ist er natürlich meistens zu schwach und man sollte sich überlegen, ob man nicht einen externen einsetzt. Auch sollte man in vielen Fällen überlegen, ob man überhaupt einen Blitz einsetzen braucht, oder ob das gegebene Licht ausreicht. Aber ob der einsatz eines Bitzes sinnvoll oder nicht ist, hängt nicht von der Art des Blitzes ab. Da ist es egal, ob intern oder extern. |
Re: Licht wie Blitz auf Form erzeugen
Auch bei Portraiaufnahmen um mal kurz ein Motiv aufzublitzen taugt der normale Kamerablitz in der Regel sehr gut.
Man, ich brauch endlich mal ne gescheite Kamera. |
Re: Licht wie Blitz auf Form erzeugen
Langsam wird es aber mächtig OT, oder nicht? :zwinker:
|
Re: Licht wie Blitz auf Form erzeugen
Nur ein klein wenig ;-)
|
Alle Zeitangaben in WEZ +1. Es ist jetzt 07:02 Uhr. |
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz