בית
Top.Mail.Ru Yandeks.Metrika
פורום: "ראשי";
ארכיון נוכחי: 2002.01.08;
הורדה: [xml.tar.bz2];

למטה

כיצד להפסיק את ההשקה של ההפעלה? מצא סניפים דומים


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

בפרוייקט m / y application.initializ ... ו- application.run בהתאם לפונקציה מסוימת והיכן לבצע אותה אם הטפסים עדיין נוצרים?



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

איך זה איפה? שם ולבצע במידת הצורך - לפני יישום. הפעלה.

לחץ על התפריט: פרויקט | צפה במקור. הטקסט DPR נפתח ובתוכו עם עטים כתוב את הקוד הרצוי במקום הנכון. וכדי להפריע את ההשקה, אתה יכול לכתוב Halt, או להשתמש אם - לדוגמה, כך:

Application.Initialize;
אם <תנאי לבדוק> אז
להתחיל
Application.CreateForm (...);
Application.CreateForm (...);
...
Application.Run
סוף
הסוף.



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

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




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

> עמוק © (19.12.01 19: 28)

Application.Run - מפעיל את מחזור אחזור ההודעות.
יישום. סיום - שולח הודעת WM_QUIT.

לכן, מעניין ביותר לדעת כיצד יישום. Termine עשוי לעבוד אם היישום לא נקרא Application.Run?



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

ואם יש להשיג חלק מהתנאי כתוצאה מביצוע של פונקציה מסוימת, אז היכן יש לבצע פונקציה זו עצמה?



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

> טופניק
אתה יכול לעקוב אחר עצתו של יורי זוטוב, אבל
במידת האפשר, עדיף לבדוק לפני שאתה מתקשר לאפליקציה. לאתחל, כלומר, בסעיף אתחול במודול הניתן לטעון הראשון, ובמידת הצורך, להפריע לשם את היישום על ידי פשוט להתקשר אל עצור. כלומר צרו מודול מיוחד למטרה זו והכניסו אותו לראשונה לקובץ USES .DPR



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

> Tupnyk (19.12.01 21: 07)

כנראה שעדיין לא "לרוץ", אלא "להתיישב". התשובה היא בכל מקום, ולו היא "גלויה" מ- DPR. כלומר, לפחות ב- DPR עצמו, לפחות בכל מודול שנקבע בו.




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

תודה!



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

2 יורי זוטוב © (19.12.01 19: 36)
רק שהתוכנית לא תסתיים ביישום. קבע ;,
ועל ידי
הסוף.

בכל זאת אתה צודק קוד שגיאה כזה אינו מייצר...

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]

> © צפופה (19.12.01 22: 36)

> קוד שגיאה זה אינו מייצר ...

ולמה הוא יטעה? ברור שזה לא. אבל זה לא עושה דבר: אם יישום.Terminate פשוט ייזרק, זה יהיה בדיוק אותו דבר - סיום סיום. שהוצג בדוגמה.





עמודים: 1 ענף שלם

פורום: "ראשי";
ארכיון נוכחי: 2002.01.08;
הורדה: [xml.tar.bz2];

למעלה





זיכרון: 0.57 MB
זמן: 0.026 c
6-22281
ורונה
2001-10-04 12:22
2002.01.08
שולח הודעות לדואר אלקטרוני


1-22140
Serg5
2001-12-20 10:17
2002.01.08
השאלה האם ניתן להפחית את הגופן ל- 4 פיקסלים, הוא משתנה, הוא משתנה (התוכנית לא נשבעת), אך על המסך (Canvas.Font) הוא עדיין מציג את 8 (המינימלי ביותר)


14-22320
אלכסנדר
2001-11-14 14:13
2002.01.08
וואו


4-22455
Mamed
2001-10-31 10:13
2002.01.08
הפעל חלון תוכנית אחר


4-22499
יוס
2001-10-31 20:51
2002.01.08
FindWindow





אפריקאנס אלבני ערבי אַרְמֶנִי אזרביג'אן הבסקים בלארוסית בולגרי קטלאנית הסיני (פשוט) סינית (מסורתית) קרואטית צ'כיה דני הולנדי אנגלית אסטוני פיליפיני פיני צרפתית
גליציה גאורגיה גרמני יווני קריאולית האיטית עברי הינדי הונגרי איסלנדי אינדונזי אירי איטלקי יפני קוריאני לטבי ליטאי מקדוניה מלאית מלטזית נורבגי
פרסי פולני פורטוגזי רומנית רוסי סרבית סלובקי סלובני ספרדי סוואהילית שבדי תאילנדי תורכי אוקראיני אורדו ויאטנמית וולשית יידיש בנגלית בוסנית
קבואנו אספרנטו גוג'ראטית האוסה המונג איגבו יָאוָנִי קנאדה לחמר לאו הלטינית מאורים מרתי מונגולי נפאלית פונג'בית סומליה טמילית טלוגו יורובה
זולו
Английский Французский Немецкий Итальянский Португальский Русский Испанский