Mostrar mensajes previos
Ordenar por
por Pain-Hack Sin sí­ntomas
Hola ^^, aqui yo de vuelta :B, esta vez tengo una duda, es posible crear una pantalla de presentacion del programa?
qe se abra unos segundos, y luego se cierra, y se habra el Form principal?

Por ejemplo:
La pantalla de presentacion del Dev C++
Imagen


Esto se debe hacer con un timer? :P, son pequeñas dudas qe siemrpe me surgen xD

Gracias!

Salu2
Imagen
por D@rB-15 Se conecta desde un manicomio
Si se puede :), con un TTimer, en el primer Formulario(Pantalla de bienvenida) tienes que poner el nombre de la Unit del Formulario dos(Pantalla del programa) junto con todas las demas Unit's en "Uses"
por ejemplo seria mas o menos asi:
Uses
SysUtils, Classes, OtraUnit, Etc, Unit2; //Unit 2 nombre de la Unit del Formulario dos.
y luego para llamarlo desde el timer:
Form2.Show;
Form1.Hide;
Timer1.Enabled := False;
Imagen

"Me saltó el avira cuando estaba mirando la foto de slandg... ¿como puedo modearlo? " - Skillmax
por ps1c0s1s Se conecta desde un manicomio
D@rB-15 bueno no esta mal pensando , yo convertiria la presentacion del formulario en una funcion seria una funcion modal algo asi :

Código: Seleccionar todo

function ShowDevCForm: integer;
var
FDevCForm: TForm;
try
FDevCForm := TForm.Create(nil);
FDevCForm.ShowModal;
finally
FDevCForm.Freen;
end;
end;
luego tendrias que programa FDevCForm para que no contenga ningun boton que lo cierre y que lo cierre un timer

Código: Seleccionar todo

procedure FDevcForm.ontimer(Sender: TObject);
begin
if getticcount -> ??? then Close
end;
end;
algo asi seria la idea exitos
<Josh> y bueno hermano,tu hermana q me dijo q estaba cansada de tenerle el orto como la bandera de japon y bueno la pobre me quizo hacer un masaje prostatico nada mas pero era tanto su recelo y venganza acumulada q se esmero un poco mas de lo normal,pero bue,estuivo bien amorizado por la de dias horas años y lagrimas q echo la pobre de tanto culearla
por abeloki Sin sí­ntomas
Cierto como te acaban decir aqui los compañeros ps1c0s1s y D@rB-15 esas serían dos posibles modos de realizarlo.Ahora tu eliges, lo mejor en estos casos esque te adaptes al modelo u opción que mas se acerque a tu nivel de programación y que una vez que tengas la idea lo hagas por ti MISMO, asi aprenderás un monton !

Aún asi, si ya controlas un poco creo que seria mas eficiente la manera de ps1c0s1s.

ABel
por WindHack Se medica
Eso se llama SplashForm, aquí te dejo un código sencillo para que lo hagas.

1º - Crea el formulario y ponle la propiedad "BorderStyle" en "bsNone".
2º - En el código del proyecto pones esto:

Código: Seleccionar todo

program MySplash;

uses
  Forms,
  Unit1 in 'Unit1.pas' {Form1},
  Unit2 in 'Unit2.pas' {SplashForm},
  SysUtils;

{$R *.res}

begin
//SplashForm es elnombre de tu formulario...
  SplashForm := TSplashForm.Create(Application);
  SplashForm.Show;
  Application.Initialize;
  SplashForm.Update;
  Application.Title := 'MySplash';
  Application.CreateForm(TForm1, Form1);
  Sleep(2000);
  SplashForm.Hide;
  SplashForm.Free;
  Application.Run;
end.
Prueba y listo, ;)

Saludos,
Imagen

Imagen

Imagen

"The only thing they can't take from us are our minds."
Temas similares
Duda Metasploitable 2 por Goleman en Mensajes Entre Nosotros
Links sobre el tema
Variantes de tema
Responder

Volver a “Delphi”