Nach Hause
Top.Mail.Ru Yandeks.Metrika
Forum: "Haupt";
Aktuelles Archiv: 2002.01.08;
Herunterladen: [xml.tar.bz2];

Nach unten

Wie kann ich den Start der Datei unterbrechen? Finden Sie ähnliche Zweige


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

Im Projekt m / s application.initializ ... und application.run, abhängig von einer bestimmten Funktion und wo, wenn die Formulare noch generiert werden?



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

Wie ist es wo? Dort und bei Bedarf durchführen - vor dem Application.Run.

Klicken Sie auf das Menü: Projekt | Quelltext anzeigen. Der Text DPR öffnet sich und darin schreiben Sie den notwendigen Code mit Stiften an die richtige Stelle. Und um den Start zu unterbrechen, können Sie Halt schreiben oder if verwenden - zum Beispiel so:

Application.Initialize;
Wenn <Zustandsprüfung> dann
beginnen
Application.CreateForm (...);
Application.CreateForm (...);
...
Application.Run
Ende
Ende.



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

oder
....
Application.Initialize; if <Bedingungsprüfung> dann Application.Terminate sonst Application.Run; ende.



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

> Dichtes © (19.12.01 19: 28)

Application.Run - Startet den Nachrichtenabrufzyklus.
Application.Terminate - sendet eine WM_QUIT-Nachricht.

Daher ist es äußerst interessant zu wissen, wie Application.Terminate funktionieren kann, wenn Application.Run nicht aufgerufen wurde.



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

Und wenn ein Teil der Bedingung als Ergebnis der Ausführung einer bestimmten Funktion erhalten werden soll, wo soll dann diese Funktion selbst ausgeführt werden?



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

> Tupnyk
Sie können dem Rat von Yuri Zotov folgen, aber
Wenn möglich, überprüfen Sie dies am besten, bevor Sie Application.Initialize aufrufen, und zwar im Abschnitt Initialization des allerersten ladbaren Moduls. Unterbrechen Sie gegebenenfalls die Ausführung der Anwendung, indem Sie einfach Halt aufrufen. Dh Erstellen Sie ein spezielles Modul für diesen Zweck und platzieren Sie es zuerst in der USES .DPR-Datei



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

> Tupnyk (19.12.01 21: 07)

Wahrscheinlich, egal nicht "rennen", und "sich niederlassen". Die Antwort ist überall, solange sie vom DPR „sichtbar“ ist. Das heißt, zumindest in der DVR selbst, zumindest in einem darin registrierten Modul.




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

DANKE!



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

2 Yuri Zotov © (19.12.01 19: 36)
nur das Programm endet nicht mit Application.Terminate ;,
aber von
Ende.

Sie haben dennoch Recht Dieser Fehlercode wird nicht ausgegeben...

Programm Project1; verwendet Formulare, Unit1 in "Unit1.pas" {Form1}; {$ R * .RES} beginne Application.Initialize; Application.CreateForm (TForm1, Form1); Application.Terminate; //Application.Run; ende.



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

> Dichte © (19.12.01 22: 36)

> Dieser Fehlercode gibt nicht ...

Und warum sollte er einen Fehler machen? Natürlich nicht ausstellen. Aber es tut nichts: Wenn Application.Terminate einfach weggeworfen wird, ist es genau das Gleiche - Fertigstellung bis zum Ende. Wie im Beispiel gezeigt.





Seiten: 1 ganze Branche

Forum: "Haupt";
Aktuelles Archiv: 2002.01.08;
Herunterladen: [xml.tar.bz2];

nach oben









Speicher: 0.84 MB
Zeit: 0.046 c
14-22403
Burmistroff
2001-11-11 20:13
2002.01.08
Super Delphi-Referenz -2. Ihre Meinung bitte.


14-22319
iea
2001-11-02 13:34
2002.01.08
Jeder, der eine (l) Brille trägt! Die Frage ist nicht untätig


1-22025
- = DeD = -
2001-12-18 11:20
2002.01.08
Installieren Sie ActiveX


6-22289
Kirill
2001-10-03 18:33
2002.01.08
IE Kontextmenü


14-22399
Mcsimm
2001-11-11 12:01
2002.01.08
Formatierung in den Antworten





Afrikanisch albanisch Arabic Armenisch Aserbaidschanisch Baskisch Weißrusse Bulgarian katalanisch Chinesisch (vereinfacht) Chinesische Tradition) kroatisch Tschechisch Dänisch Dutch Englisch estnisch Philippinisch Finnish Französisch
Galicisch Georgisch Deutsch Griechisch haitian Creole hebräisch Hindi ungarisch isländisch Indonesian irisch Italian Japanisch Koreanisch lettisch litauisch Makedonisch Malay Maltesisch Norwegian
persisch Polnisch Portugiesisch rumänisch Russisch serbisch Slovak Slowenisch Spanisch swahili Swedish Thai Türkisch Ukrainisch Urdu Vietnamesisch Walisisch Jiddisch Bengalisch bosnisch
cebuano Esperanto Gujarati Hausa Hmong igbo Javanisch kannada khmer Laotisch Lateinisch Maorisch Marathi Mongolisch nepali Pandschabi Somalisch Tamilisch Telugu yoruba
Zulu
Английский Französisch Deutsch Italienisch Португальский Russisch Spanisch