Notifikationer

Markér alle som læst Log ud

lifeweb Nybegynder

11. oktober 2007 - 15:54 Der er 12 kommentarer

Fade form frem

Hej

Jeg forestillede mig at jeg kunne fade en form frem ved at have en timer der blev aktiveret og plussede 15 til - eksempelvis:

form1.AlphaBlendValue := form1.AlphaBlendValue+15;

jeg oplever dog at det, når computeren er belastet, bliver en meget langsom fading (trods det at intervallet er sat til 5)

Det er garanteret nemt for jer genier - men ikke for mig ;)
Så jeg glæder mig til et svar

Synes godt om

stone Forsker

11. oktober 2007 - 18:23 #1

Jeg har før brugt det her eksempel og har ikke haft nogen problemer ved belastning..

http://delphi.about.com/od/formsdialogs/a/fadeinmodalform.htm

Synes godt om

mtj111 Novice

13. oktober 2007 - 19:02 #2

Der er en færdig funktion til det :-)
AnimateWindow:
http://www.swissdelphicenter.ch/en/showcode.php?id=838

Eksempel:
AnimateWindow(Form2.Handle, 3000, AW_BLEND);

Synes godt om

lifeweb Nybegynder

15. oktober 2007 - 11:39 #3

hey

mtj111: jeg har svært ved at få den til at virke

har du et kodeeksempel - eller et bud på hvorfor den ikke fader frem?

Synes godt om

mtj111 Novice

15. oktober 2007 - 16:24 #4

Ja da:

procedure TForm1.FormCreate(Sender: TObject);
begin
Form1.BringToFront;
AnimateWindow(Form1.Handle, 500, AW_BLEND);
Form1.Show;
end;

Synes godt om

mtj111 Novice

15. oktober 2007 - 16:25 #5

Og så kræver AnimateWindow Windows 98 eller nyere :-)

Synes godt om

stone Forsker

15. oktober 2007 - 17:42 #6

nej den vil virke i fra win95.....

Synes godt om

mtj111 Novice

15. oktober 2007 - 17:54 #7

Jeg skal ikke kunne sige det med sikkerhed, men swissdelphicenter siger:
Requirements:
Windows NT/2000/XP: Included in Windows 2000 and later.
Windows 95/98/Me: Included in Windows 98 and later.

Men det er vel også underordnet... hvor mange er det egentlig lige, der bruger 95/98 mere? :P

Synes godt om

stone Forsker

15. oktober 2007 - 20:18 #8

Du vil korse dig, der er faktisk ret mange der bruger win98 stadigvæk...."SS"

Synes godt om

mtj111 Novice

16. oktober 2007 - 00:07 #9

Synes godt om

lifeweb Nybegynder

16. oktober 2007 - 09:35 #10

tror jeg har fået det til at virke

hvordan får jeg den så til at fade væk?

Synes godt om

mtj111 Novice

16. oktober 2007 - 10:01 #11

procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction);
begin
AnimateWindow(Form1.Handle, 4000, AW_BLEND + AW_HIDE);
end;

:-)

Synes godt om

borrisholt Novice

03. januar 2008 - 16:23 #12

Brug TJBform : http://www.torry.net/vcl/forms/other/tjbform.zip

Den er skrevet af den dygtigste programmør her på eksperten ..... .... .... I hverfald som hedder borrisholt :D

Synes godt om

Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Følg dette spørgsmål

Opret Preview

Programmeringssprog kurser

Kurser inden for grundlæggende programmering

Se alle Programmeringssprog kurser

Flere spørgsmål fra Andet programmering kategorien

Titel	Indlæg	Oprettet	Seneste aktivitet
Bat file. Af johnnylassen i Andet programmering	4	23/04/202616:10	24/04/202609:43
Hjælp til Api.asmx Af lurup i Andet programmering	1	17/03/202609:27	17/03/202614:12
burgermenu til hjemmeside - hjælp! Af SabrinaL i Andet programmering	2	12/11/202514:10	02/12/202520:42
Hjælp til programmering af website Af hamdenlange i Andet programmering	16	17/08/202522:26	19/08/202515:53
Kan man registrere hvis folk lukker en side ned Af KurtG i Andet programmering	8	24/07/202513:06	28/07/202517:03

Se alle spørgsmål i kategorien Opret spørgsmål

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester

Alle kategorier på Eksperten

Seneste artiklerRSS