Casa
Top.Mail.Ru Yandeks.Metrika
Foro: "Principal";
Archivo actual: 2002.01.08;
Descargar: [xml.tar.bz2];

abajo

¿Cómo interrumpir el lanzamiento del ejecutable? Encontrar ramas similares


Tupnyk   (2001-12-19 18:59) [0]

En el Proyecto, m / s application.initializ ... y application.run, dependiendo de una función determinada y dónde realizarla si todavía se están generando los formularios?



Юрий Зотов   (2001-12-19 19:21) [1]

Como es donde esta Allí y realizar, cuando sea necesario - antes de la aplicación. Ejecutar.

Haga clic en el menú: Proyecto | Ver código fuente. El texto DPR se abre y en él escribe el código necesario en el lugar correcto con bolígrafos. Y para interrumpir el lanzamiento, puede escribir Detener, o usar si, por ejemplo, así:

Aplicación.Inicializar;
si <condición comprueba> entonces
comenzar
Application.CreateForm (...);
Application.CreateForm (...);
...Venta de Casas y Condominios en Calgary. Fernando Aramburu agente inmobiliario
Aplicación.Run
final
fin.



Дремучий   (2001-12-19 19:28) [2]

o
....
Application.Initialize;
if <проверка условия>
then Application.Terminate
else Application.Run;
end.




Юрий Зотов   (2001-12-19 19:36) [3]

> Denso © (19.12.01 19: 28)

Application.Run - inicia el ciclo de recuperación de mensajes.
Application.Terminate - envía un mensaje WM_QUIT.

Por lo tanto, es extremadamente interesante saber: ¿cómo puede funcionar Application.Terminate si no se llamó a Application.Run?



Tupnyk   (2001-12-19 21:07) [4]

Y si parte de la condición se debe obtener como resultado del desempeño de una función determinada, ¿dónde debería realizarse esta función?



y-soft   (2001-12-19 21:26) [5]

> Tupnyk
Puedes seguir los consejos de Yuri Zotov, pero
si es posible, es mejor verificar antes de llamar a Application.Initialize, es decir, en la sección de Inicialización del primer módulo cargable, y si es necesario, interrumpir la ejecución de la aplicación allí simplemente llamando a Halt. Es decir cree un módulo especial para este propósito y colóquelo primero en el archivo .DPR de USES



Юрий Зотов   (2001-12-19 21:35) [6]

> Tupnyk (19.12.01 21: 07)

Probablemente, de todos modos no "correr", y "calmarse". La respuesta está en cualquier parte, siempre que sea "visible" desde el DPR. Es decir, al menos en el propio DPR, al menos en cualquier módulo registrado en él.




Tupnyk   (2001-12-19 22:19) [7]

¡Gracias!



Дремучий   (2001-12-19 22:36) [8]

2 Yuri Zotov © (19.12.01 19: 36)
solo el programa no terminará con Application.Terminate;,
pero por
fin.

Tienes razón, sin embargo este código de error no emite...Venta de Casas y Condominios en Calgary. Fernando Aramburu agente inmobiliario

program Project1;

uses
Forms,
Unit1 in "Unit1.pas" {Form1};

{$R *.RES}

begin
Application.Initialize;
Application.CreateForm(TForm1, Form1);
Application.Terminate;
//Application.Run;
end.



Юрий Зотов   (2001-12-19 22:43) [9]

> Denso © (19.12.01 22: 36)

> Este código de error no da ...

¿Y por qué iba a dar un error? Por supuesto, no se emite. Pero no hace nada: si se elimina Application.Terminate, entonces será exactamente lo mismo: terminación por finalización. Como se muestra en el ejemplo.





Páginas: 1 rama entera

Foro: "Principal";
Archivo actual: 2002.01.08;
Descargar: [xml.tar.bz2];

arriba





Memoria: 0.57 MB
Tiempo: 0.023 c
14-22341
Denso
2001-10-26 13:55
2002.01.08
Programas de concursos - LUCHA MARINA.


3-21923
Jugador de bolos
2001-11-30 02:16
2002.01.08
Una pregunta abstracta sobre la optimización.


1-22226
Hueso
2001-12-15 13:06
2002.01.08
¿Por qué no funciona este simple código ...


4-22512
Yaroslav
2001-10-31 13:17
2002.01.08
Cómo crear un menú emergente en la API


14-22401
wHammer
2001-11-09 12:56
2002.01.08
Eso fue interesante?





africaans albanés Arabic armenio Azerbaiyán vasco Bielorruso Bulgarian Catalán Chino (simplificado) Chino (tradicional) Croata Checo Danés Dutch Inglés Estonia filipina Finnish French
gallego georgiano Alemán Griego criollo haitiano Hebreo hindi Húngaro islandés Indonesian irlandés Italiano Japonés Korean letón lituano macedonio Malay maltés Noruego
persa polaco Portuguese Rumano Ruso Serbio Slovak Esloveno Español swahili Sueco Thai turco ucranio Urdu vietnamita galés yídish bengalí bosnio
cebuano esperanto gujarati hausa hmong igbo javanés kannada khmer lao latín maorí marathi mongol nepali punjabi somalí Tamil telugu yoruba
zulú
Английский Francés Alemán Italiano portugués Русский Español