Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Gráficos (https://www.clubdelphi.com/foros/forumdisplay.php?f=8)
-   -   Se puede hacer un splashscreen transparente ? (https://www.clubdelphi.com/foros/showthread.php?t=31230)

ilichhernandez 02-05-2006 23:41:08

Se puede hacer un splashscreen transparente ?
 
Hola, tengo una duda que someter, tengo un splashscreen en mi aplicacion que es un cuadro con un dibujo y un mensaje, ahora bien, no se si se puede hacer un splashscreen transparente, me refiero a que si tengo por ejemplo un dibujo, una esfera con un logo y un texto , al mostrar el splashscreen que se muestre solo la esfera...... me explico ??..... bueno ojala alguien sepa si se puede hacer......

gracias......

Northern 03-05-2006 00:07:44

Este código lo saqué de algún sitio pero ahora no me acuerdo :confused:

Código Delphi [-]
procedure TFormSplash.FormActivate(Sender: TObject);
var
  HRGN: LongWord;
begin
  Label1.Caption := Chr(169)+' Tus Credenciales u otro texto ';
  HRGN := CreateEllipticRgn(0, 0, FormSplash.Width-4, FormSplash.Height-6);
  //HRGN := CreateEllipticRgn(32, 0, FormSplash.Width-26, FormSplash.Height);
  SetWindowRgn(FormSplash.Handle, HRGN, True);
end;

espero que te sirva :)

ilichhernandez 03-05-2006 00:12:38

ytap, voy a intentar con este..... pero (disculpa la ignorancia) donde meto este codigo ??

ElKurgan 03-05-2006 08:42:14

Pues si te fijas en la primera línea de código, evidentemente en el método "OnFormActivate" del Splash... :)

Un saludo

Lepe 03-05-2006 08:54:49

Al menos en delphi 6 y superior las cosas son más fáciles:

- añades un mapa de bits.
- Form.Color := clgreen
- Form.TransparentColor := clgreen
- Form.Transparent := true;


Saludos

ilichhernandez 05-05-2006 04:34:04

Gracias a to2....


La franja horaria es GMT +2. Ahora son las 09:08:46.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi