Vorheriges Thema anzeigen :: Nächstes Thema anzeigen |
Autor |
Nachricht |
arduno
Anmeldungsdatum: 12.05.2011 Beiträge: 252
|
Verfasst am: 31.05.2011, 12:55 Titel: Ein Dos-Fenster verstecken..., wie geht das? |
|
|
Wie kann man hier beim Shell-Aufruf das Dos-Fenster verstecken?
Es soll nur der Screen von Freebasic erscheinen.
Gruss
Code: |
Screen 19,3
Shell "WGET.exe -k ftp://gds36967:abcd@ftp-outgoing2.dwd.de/gds/OBS/SYN/"
sleep
|
Zuletzt bearbeitet von arduno am 01.06.2011, 14:51, insgesamt 5-mal bearbeitet |
|
Nach oben |
|
 |
ThePuppetMaster

Anmeldungsdatum: 18.02.2007 Beiträge: 1839 Wohnort: [JN58JR]
|
|
Nach oben |
|
 |
arduno
Anmeldungsdatum: 12.05.2011 Beiträge: 252
|
Verfasst am: 02.06.2011, 13:29 Titel: |
|
|
Jup habe eine Lösung in der win\shellapi.bi gefunden mit der ShellExecute, wo man dann als Parameter 0=nicht sichtbar und 1= sichtbar, 2= nur das Icon in der Statusleiste, die Entscheidung treffen kann.
Wunderbar.
Gruss
Code: |
#Include "windows.bi"
#Include "win\shellapi.bi"
#include "fbgfx.bi"
Declare Function Key ( ByVal K As UByte ) As Integer
Declare Function RunProgram(ByVal Filename As String, ByVal Parameter As String, _
ByVal WorkingDirectory As String, ByVal Flags As String,ByVal ShowCmd As integer) As HINSTANCE
#Define KEY_UP &H01
#Define KEY_DOWN &H02
#Define KEY_PRESSED &H03
Screen 19,32
Do
Sleep 1,1
Select Case Key(16)
Case KEY_DOWN
runprogram("WGET.exe","k ftp://gds36967:ABCDE@ftp-outgoing2.dwd.de/gds/OBS/SYN/", _
"d:\zornslemma\synopdateien","",NIS_HIDDEN)
End Select
Loop Until InKey = Chr(255)+"k"
Function Key ( ByVal K As UByte ) As Integer
Static State(0 To 255) As Byte
Dim Ke As Integer
Function = 0
Ke = MultiKey(K)
If Ke Then
If State(K) Then
Function = KEY_PRESSED
Else
Function = KEY_DOWN
EndIf
Else
If State(K) Then
Function = KEY_UP
EndIf
EndIf
State(K) = Ke
End Function
Function RunProgram(ByVal Filename As String, ByVal Parameter As String, _
ByVal WorkingDirectory As String, ByVal Flags As String,ByVal ShowCmd As integer) As HINSTANCE
Return ShellExecute(0,@flags , @Filename,cast(LPCSTR,@Parameter),@WorkingDirectory ,ShowCmd)
End Function
|
|
|
Nach oben |
|
 |
Emporea1997
Anmeldungsdatum: 07.07.2011 Beiträge: 58
|
Verfasst am: 07.07.2011, 17:14 Titel: |
|
|
du musst den programm mit windwos gui ausführen. dann wird das dos fenster versteckt. ganz eionfach |
|
Nach oben |
|
 |
Jojo alter Rang

Anmeldungsdatum: 12.02.2005 Beiträge: 9736 Wohnort: Neben der Festplatte
|
Verfasst am: 07.07.2011, 17:15 Titel: |
|
|
... die Frage hat absolut nix mit -s gui zu tun. _________________ » Die Mathematik wurde geschaffen, um Probleme zu lösen, die es nicht gäbe, wenn die Mathematik nicht erschaffen worden wäre.
 |
|
Nach oben |
|
 |
Emporea1997
Anmeldungsdatum: 07.07.2011 Beiträge: 58
|
Verfasst am: 07.07.2011, 18:49 Titel: |
|
|
mit was denn? |
|
Nach oben |
|
 |
ThePuppetMaster

Anmeldungsdatum: 18.02.2007 Beiträge: 1839 Wohnort: [JN58JR]
|
Verfasst am: 07.07.2011, 18:52 Titel: |
|
|
das dort unerwünschte DOS fenster bezieht sich vermutlich auf die Shell Ausführung des WGET.exe kommandos, welches standardmässig via sichtbarer DOS-Konsole gestartet wird.
MfG
TPM _________________ [ WebFBC ][ OPS ][ ToOFlo ][ Wiemann.TV ] |
|
Nach oben |
|
 |
|