Vorheriges Thema anzeigen :: Nächstes Thema anzeigen |
Autor |
Nachricht |
Mark
Anmeldungsdatum: 02.05.2006 Beiträge: 37
|
Verfasst am: 22.07.2006, 11:50 Titel: prog beenden ? |
|
|
hi
nachdem ich mich seit ner weile net mehr gemeldet habe , hab ich mal wieder ne frage
mein prog , lässt sich nur am ende beenden durch tastendruck ...
jetzt wollt ich fragen , wie bekomm ich hin , dass sich das prog auch während des prozesses über das "X" beenden lässt . denn momentan , kannste bei mir draufklicken , und es passiert nichts . _________________ gewinn nen pc oder 1000€ in bar !!!
http://mark.schenkt-dir-einen-pc.de
(ist nen gutes gewinnspiel ) |
|
Nach oben |
|
 |
ytwinky

Anmeldungsdatum: 28.05.2005 Beiträge: 2624 Wohnort: Machteburch
|
Verfasst am: 22.07.2006, 13:03 Titel: |
|
|
Bau 'ne Abfrage ein.. _________________
v1ctor hat Folgendes geschrieben: | Yeah, i like INPUT$(n) as much as PRINT USING.. | ..also ungefähr so, wie ich GOTO.. |
|
Nach oben |
|
 |
jb

Anmeldungsdatum: 14.01.2005 Beiträge: 2010
|
Verfasst am: 22.07.2006, 13:06 Titel: |
|
|
Code: |
E$ = INKEY$
IF E$ = CHR$(255) + "k" THEN END
|
Damit sollte das klappen. Wenn das immer abgefragt werden sollte, solltest du dir die Befehle
THREADCREATE und THREADWAIT anschauen, damit kannst du eine Art Multitasking erreichen...
jb _________________ Elektronik und Programmieren |
|
Nach oben |
|
 |
Michael Frey

Anmeldungsdatum: 18.12.2004 Beiträge: 2577 Wohnort: Schweiz
|
Verfasst am: 22.07.2006, 13:57 Titel: |
|
|
jb hat Folgendes geschrieben: | Wenn das immer abgefragt werden sollte, solltest du dir die Befehle
THREADCREATE und THREADWAIT anschauen, damit kannst du eine Art Multitasking erreichen...
jb |
Nein, das ist dann echtes Multitasking.
Kann der Zweite Thread überhaupt der ersten beenden?
Ich probiere es gleich aus.
Edit:
Code: | dim x
dim y
declare sub ender()
threadcreate(@ender)
do
getmouse x,y
locate 1,1
? x;y;" "
loop
sub ender()
IF INKEY$ = CHR$(255) + "k" THEN END
sleep 20
end sub |
Ja, es geht also. _________________ http://de.wikibooks.org/wiki/FreeBasic Jede Hilfe für dieses Buch ist Willkommen!
http://de.wikibooks.org/wiki/FreeBasic:_FAQ FAQ zu Freebasic (im Aufbau, hilfe Willkommen)
Neu mit Syntax Highlight |
|
Nach oben |
|
 |
Mark
Anmeldungsdatum: 02.05.2006 Beiträge: 37
|
Verfasst am: 22.07.2006, 15:00 Titel: |
|
|
hi danke für die antowrten ,
nur ich kappier net ganz wie das jetzt geht .
kann man nicht einfach machen das man einfach wie es üblich ist , das programm über das kreuzchen bei windows oben rechts beenden ?
ich hab auch mal diesen code kopiert , aer wenn ichs starten will , kommt nen fehler .
danke _________________ gewinn nen pc oder 1000€ in bar !!!
http://mark.schenkt-dir-einen-pc.de
(ist nen gutes gewinnspiel ) |
|
Nach oben |
|
 |
raph ael
Anmeldungsdatum: 12.04.2006 Beiträge: 472
|
Verfasst am: 22.07.2006, 15:08 Titel: |
|
|
Welcher Fehler denn?
Wie meinst du, dass das Programm nicht beendet wird, wenn du auf das X klickst?
MfG Raphael _________________
Zitat: | 1000 Yottabytes sind absurd. 640 Yottabytes sollten genug für jeden sein. |
|
|
Nach oben |
|
 |
Michael Frey

Anmeldungsdatum: 18.12.2004 Beiträge: 2577 Wohnort: Schweiz
|
Verfasst am: 22.07.2006, 18:24 Titel: |
|
|
Mark hat Folgendes geschrieben: | ich hab auch mal diesen code kopiert , aer wenn ichs starten will , kommt nen fehler .
danke |
Ich habe Freebasic 0.16 Beta, welche hast du?
raph ael hat Folgendes geschrieben: | Wie meinst du, dass das Programm nicht beendet wird, wenn du auf das X klickst? |
Windows hat oben rechts bei Freebasic Fenstern so ein Lustiges X.
Normalle Programme beenden sich, wenn du drauf klickst, FB Programme normallerweisse nicht.
Zum Fehler: Vielleicht geht es so?
Code: | dim x
dim y
declare sub ender()
threadcreate(@ender)
screen 12
do
getmouse x,y
locate 1,1
? x;y;" "
loop
sub ender()
IF INKEY$ = CHR$(255) + "k" THEN END
sleep 20
end sub |
_________________ http://de.wikibooks.org/wiki/FreeBasic Jede Hilfe für dieses Buch ist Willkommen!
http://de.wikibooks.org/wiki/FreeBasic:_FAQ FAQ zu Freebasic (im Aufbau, hilfe Willkommen)
Neu mit Syntax Highlight |
|
Nach oben |
|
 |
raph ael
Anmeldungsdatum: 12.04.2006 Beiträge: 472
|
Verfasst am: 22.07.2006, 18:39 Titel: |
|
|
*genervt*
ICH WEISS WAS DER X KNOPF IST!
Ich geb' dir den guten rat:
Versteck dich Frey, versteck dich gut!
Wenn man dich kommende Woche beim Fragen "Was ist der X Knopf oben rechts?" erwischt, wirst du mich zutiefst betrübt sehen, denn ich will das meine Männer dich finden. Und wenn sie das tun, übergeben wir dich nicht den Admins!
Also geb ich dir nochmal den rat: Versteck dich gut!
Und bisjetzt hab' ich jedes Programm mit dem X beenden können! _________________
Zitat: | 1000 Yottabytes sind absurd. 640 Yottabytes sollten genug für jeden sein. |
|
|
Nach oben |
|
 |
volta
Anmeldungsdatum: 04.05.2005 Beiträge: 1876 Wohnort: D59192
|
Verfasst am: 22.07.2006, 20:14 Titel: |
|
|
Hi Mark,
kann es sein, daß du mit einem Konsolefenster arbeitest?
Wenn du mit Screen - Anweisung arbeitest (-s gui nicht vergessen) lässt sich jedes Fenster mit dem X-Button schließen.
Gruß Volta _________________ Warnung an Choleriker:
Dieser Beitrag kann Spuren von Ironie & Sarkasmus enthalten.
Zu Risiken & Nebenwirkungen fragen Sie Ihren Therapeuten oder Psychiater. |
|
Nach oben |
|
 |
Mark
Anmeldungsdatum: 02.05.2006 Beiträge: 37
|
Verfasst am: 22.07.2006, 20:33 Titel: |
|
|
@volta : ich arbeite mit dem IDE oder wie das heißt . und da benutzt ich auch s gui , aber es lässt sich nichts schließen .
@raph ael : ja das meine ich .
@Michael Frey : jetzt gehts , aber wie beendet man jetzt das prog ?
- ich muss doch irgendeine taste + k drücken oder ?
achso wenn ich das dann einbauen würde , kann man das dann jederzeit während das prog läuft anwenden ?
danke für eure antworten . _________________ gewinn nen pc oder 1000€ in bar !!!
http://mark.schenkt-dir-einen-pc.de
(ist nen gutes gewinnspiel ) |
|
Nach oben |
|
 |
volta
Anmeldungsdatum: 04.05.2005 Beiträge: 1876 Wohnort: D59192
|
Verfasst am: 22.07.2006, 21:02 Titel: |
|
|
Hmmm,
auch wenn du mit der 'IDE' arbeitest erstellst du eine Konsolenanwendung, wenn du nicht SCREEN, oder SCREENRES benutzt.
Michaels Prog arbeitet mit 'Screen 12', und siehe: da geht es! _________________ Warnung an Choleriker:
Dieser Beitrag kann Spuren von Ironie & Sarkasmus enthalten.
Zu Risiken & Nebenwirkungen fragen Sie Ihren Therapeuten oder Psychiater. |
|
Nach oben |
|
 |
Mark
Anmeldungsdatum: 02.05.2006 Beiträge: 37
|
Verfasst am: 23.07.2006, 00:22 Titel: |
|
|
ich benutze screen 16 .
thx _________________ gewinn nen pc oder 1000€ in bar !!!
http://mark.schenkt-dir-einen-pc.de
(ist nen gutes gewinnspiel ) |
|
Nach oben |
|
 |
Michael Frey

Anmeldungsdatum: 18.12.2004 Beiträge: 2577 Wohnort: Schweiz
|
Verfasst am: 23.07.2006, 09:01 Titel: |
|
|
Mark hat Folgendes geschrieben: | @Michael Frey : jetzt gehts , aber wie beendet man jetzt das prog ? |
Mit dem X oben Rechts.
Mark hat Folgendes geschrieben: | - ich muss doch irgendeine taste + k drücken oder ? |
Code: | IF INKEY$ = CHR$(255) + "k" THEN END |
Das ist Alt und F4, wenn du auf das X oben Rechts klickst, "simuliert" Freebasic die diese Tastenkombination.
Du kannst dein Programm jetzt mit Alt F4 oder dem X oben Rechts beenden.
Ein grosser Nachteil sei noch gesagt:
Das Programm ist ziemlich launisch, verschluckt bei Input eingaben usw.
Code: | dim x
dim y
declare sub ender()
screen 12
threadcreate(@ender)
do
input a$
? a$
loop
sub ender()
do
sleep 20
IF INKEY$ = CHR$(255) + "k" THEN END
loop
end sub |
_________________ http://de.wikibooks.org/wiki/FreeBasic Jede Hilfe für dieses Buch ist Willkommen!
http://de.wikibooks.org/wiki/FreeBasic:_FAQ FAQ zu Freebasic (im Aufbau, hilfe Willkommen)
Neu mit Syntax Highlight |
|
Nach oben |
|
 |
jb

Anmeldungsdatum: 14.01.2005 Beiträge: 2010
|
Verfasst am: 23.07.2006, 11:18 Titel: |
|
|
Also ich hab irgendwo mal gehört, dass threadcreate und Konsorten etwas launisch sein sollen...
Da kann man lieber mit ein bisschen Verstand ein eigenes Pseudo-Multitasking hinbekommen, man
muss halt nur Routinen wie INPUT ersetzen, was allerdings kein allzu großes Problem darstellen sollte.
jb _________________ Elektronik und Programmieren |
|
Nach oben |
|
 |
Mark
Anmeldungsdatum: 02.05.2006 Beiträge: 37
|
Verfasst am: 23.07.2006, 14:25 Titel: |
|
|
Michael Frey hat Folgendes geschrieben: | Ein grosser Nachteil sei noch gesagt:
Das Programm ist ziemlich launisch, verschluckt bei Input eingaben usw.
|
jap .hab es eingebaut und das gefällt mir net so .
gibts da noch ne alternative ?
@jb : sorry bin noch total unerfahren , und weiß net was du damit meinst
Danke für die vielen Antworten ! _________________ gewinn nen pc oder 1000€ in bar !!!
http://mark.schenkt-dir-einen-pc.de
(ist nen gutes gewinnspiel ) |
|
Nach oben |
|
 |
volta
Anmeldungsdatum: 04.05.2005 Beiträge: 1876 Wohnort: D59192
|
Verfasst am: 23.07.2006, 14:40 Titel: |
|
|
Mark hat Folgendes geschrieben: | ich benutze screen 16 .
thx |
Es würde mich sehr wundern wenn es ein FB-prog mit
Code: | '...
Screen 16
'...
Sleep
End | gibt, dass nicht auf den X-Knopf reagiert. _________________ Warnung an Choleriker:
Dieser Beitrag kann Spuren von Ironie & Sarkasmus enthalten.
Zu Risiken & Nebenwirkungen fragen Sie Ihren Therapeuten oder Psychiater. |
|
Nach oben |
|
 |
Mark
Anmeldungsdatum: 02.05.2006 Beiträge: 37
|
Verfasst am: 30.07.2006, 15:47 Titel: |
|
|
ne es reagiert auch nicht auf den x- knopf . _________________ gewinn nen pc oder 1000€ in bar !!!
http://mark.schenkt-dir-einen-pc.de
(ist nen gutes gewinnspiel ) |
|
Nach oben |
|
 |
ytwinky

Anmeldungsdatum: 28.05.2005 Beiträge: 2624 Wohnort: Machteburch
|
Verfasst am: 30.07.2006, 18:35 Titel: |
|
|
Du könntest dich mit deiner Frage an v1ctor wenden..
Aber der reagiert ungehalten, wenn er nicht eine einzige Zeile Quellcode sieht..
..außerdem müßtest du in englisch schreiben.
Also poste den fraglichen Quellcode hier, dann kannste auch in deutsch schreiben
Gruß
ytwinky _________________
v1ctor hat Folgendes geschrieben: | Yeah, i like INPUT$(n) as much as PRINT USING.. | ..also ungefähr so, wie ich GOTO.. |
|
Nach oben |
|
 |
Michael Frey

Anmeldungsdatum: 18.12.2004 Beiträge: 2577 Wohnort: Schweiz
|
Verfasst am: 30.07.2006, 18:58 Titel: |
|
|
volta hat Folgendes geschrieben: | Mark hat Folgendes geschrieben: | ich benutze screen 16 .
thx |
Es würde mich sehr wundern wenn es ein FB-prog mit
Code: | '...
Screen 16
'...
Sleep
End | gibt, dass nicht auf den X-Knopf reagiert. |
mark hat Folgendes geschrieben: | ne es reagiert auch nicht auf den x- knopf . |
Machen wir wieder das Spiel, welche FB und welche Windows Version .
Code: | screen 16
do
sleep 1
loop |
compiliert mit -s gui
Windows XP SP 2, Freebasic 0.16. x-Knopf beendet das Programm nicht. _________________ http://de.wikibooks.org/wiki/FreeBasic Jede Hilfe für dieses Buch ist Willkommen!
http://de.wikibooks.org/wiki/FreeBasic:_FAQ FAQ zu Freebasic (im Aufbau, hilfe Willkommen)
Neu mit Syntax Highlight |
|
Nach oben |
|
 |
ytwinky

Anmeldungsdatum: 28.05.2005 Beiträge: 2624 Wohnort: Machteburch
|
Verfasst am: 30.07.2006, 20:06 Titel: |
|
|
Hi,
bei Hardwareausstattung wie bei Michel Frey funktioniert das Prog einwandfrei(mit einer kleinen Änderung): Code: | screen 16
do
a$=inkey
Sleep 1
loop until a$<>"" | ..und es reagiert auf den x-Knopf..
Gruß
ytwinky _________________
v1ctor hat Folgendes geschrieben: | Yeah, i like INPUT$(n) as much as PRINT USING.. | ..also ungefähr so, wie ich GOTO.. |
|
Nach oben |
|
 |
|