als .exe oder .scr ausgeführt?
Übersicht

chiBetreff: als .exe oder .scr ausgeführt? |
![]() Antworten mit Zitat ![]() |
|
---|---|---|
hi,
hat jemand ne ahnung wie ich (am besten einzeilig) in blitz3d herausfinden kann, ob mein programm gerade als .exe oder als .scr ausgeführt wird? wenn ich denn screensaver mit /C starte kommt (bei mir) immer der selbe screen als hätte ich die exe gestartet... habs im moment mit " if appdir = windowsdir" gelöst, muss aber dazu den screensaver immer ins windir kopieren. ich hätts halt gern pfadunabhängig ![]() vielen dank im voraus, chi |
||
![]() |
aMulSieger des Minimalist Compo 01/13 |
![]() Antworten mit Zitat ![]() |
---|---|---|
Solange niemand deine exe/scr umbennent, kannst du das Verzeichnis abfragen in dem die Datei liegt und mit FileType() ermitteln ob es eine "xyz.exe" oder eine "xyz.scr" gibt. Diese Methode ist allerdings nicht viel sicherer als deine... | ||
Panic Pong - ultimate action mashup of Pong and Breakout <= aktives Spiele-Projekt, Downloads mit vielen bunten Farben!
advASCIIdraw - the advanced ASCII art program <= aktives nicht-Spiele-Projekt, must-have für ASCII/roguelike/dungeon-crawler fans! Alter BB-Kram: ThroughTheAsteroidBelt - mit Quelltext! | RGB-Palette in 32²-Textur / Farbige Beleuchtung mit Dot3 | Stereoskopie in Blitz3D | Teleport-Animation Screensaver |
![]() |
Arrangemonk |
![]() Antworten mit Zitat ![]() |
---|---|---|
probiers mit commandline
oder so |
||
ingeneur |
![]() |
Shogo |
![]() Antworten mit Zitat ![]() |
---|---|---|
Wenn ein Prog als .scr startet uebergibt dir Windows nee meldung die du mit Commandline abfangen kannst.
Die Meldung sagt dir auch wie dein Programm gestartet wurde. Also: 1. Screensaver gestartet 2. Optionen aufgerufen 3. Vorschau bei Screensaver einstellungen Die genauen uebergabe werde kenne ich nicht da musst du mal googeln oder die Forumssuche benutzen. Da gab es mal nee schoene Dll fuer. Mfg Shogo |
||
![]() |
FreetimeCoder |
![]() Antworten mit Zitat ![]() |
---|---|---|
Da brauch man keine Dll für:
Code: [AUSKLAPPEN] Com$=CommandLine()
If Lower(Mid(Com,2,1))="c" RuntimeError "Einstellungen" ElseIf Lower(Mid(Com,2,1))="p" RuntimeError "Vorschau" Else RuntimeError "Normal" EndIf So geht's auch ![]() Edit: es werden auch noch mehr Zeichen mitgeliefert, aber ich weiß nicht was die zu bedeuten haben xD |
||
"Wir haben keine Chance, aber wir werden sie nutzen!"
Projekte: Dexterity Ball (100%) Aquatic Atmosfear (22 % ca 4700 Zeilen) eingefrohren mangels OOP Fähigkeiten von Blitz (ehemals Uboot) PC: Intel D 3 GHz | NVidiaGforce 6700 256 Mb | 1024 Mb DDR RAM 400 Mhz | 2x160 GB S-ATA |
![]() |
Shogo |
![]() Antworten mit Zitat ![]() |
---|---|---|
@ Freetime Coder
Sorry hab mich etwas bloed ausgedrueckt Mit der Dll kann man zum beispiel ein Bild im Vorschaufenster von Win anzeigen lasen. Und wie ich das verstanden habe hat er das gleiche prog einmal als .exe und einmal als .scr und das Programm soll nun rausfinden als was es gestartet worden ist. Also eher so Code: [AUSKLAPPEN] Com$=CommandLine()
If Lower(Mid(Com,2,1))="c" or Lower(Mid(Com,2,1))="p" then modus = 1; screensaver else modus = 0; normale .exe end if |
||
chi |
![]() Antworten mit Zitat ![]() |
|
---|---|---|
hey danke leute! scheint aber leider an etwas anderem zu liegen...
wenn ich folgenden code als .scr speicher und rechtsklick / konfigurieren gehen... dann kommt bei mir immer der Exe Start ohne Commandline. wenn man im code *if SystemProperty ("appdir") ... aktiviert und das file ins windows verzeichnis kopiert, dann funktionierts. allerdings nur in diesem ordner. und falls man dort die .scr wieder in .exe ändert und startet, dann kommt man in den config mode ;-( ... scheint als würde bei rechtsklick/ konfigurieren auf einer .scr datei kein command weitergegeben ?!? cheers, chi Code: [AUSKLAPPEN] ChangeDir SystemProperty$("appdir") txt$=CommandLine$() If CommandLine$() <> "" If Upper(Left$(CommandLine$(),2)) = "/P" Then end If Upper(Left$(CommandLine$(),2)) = "/C" Then gosub config If Upper(Left$(CommandLine$(),2)) = "/S" Then gosub start If Upper(Left$(CommandLine$(),2)) = "/p" Then end If Upper(Left$(CommandLine$(),2)) = "/c" Then gosub config If Upper(Left$(CommandLine$(),2)) = "/s" Then gosub start endif ;if SystemProperty ("appdir") = SystemProperty("windowsdir") then gosub config gosub normalstart .config graphics 640,480,0,2 text 320,20,"Config mode",1 text 320,40,txt,1 flip waitmouse() end return .start graphics3d 1024,768,0,1 text 512,20,"Screensaver mode",1 text 512,40,txt,1 flip waitmouse() end return .normalstart graphics3d 640,480,0,2 text 320,20,"Exe Start",1 text 320,40,txt,1 flip waitmouse() end return end |
||
Übersicht


Powered by phpBB © 2001 - 2006, phpBB Group