Seite 2 von 3
Verfasst: 26.03.2007 22:55
von Kaeru Gaman
der aufruf des Programms müßte da aber trotzdem noch rein.
@AlbertH
ist 1.pb ein komplettes eigenständiges programm?
dann kompiliere es getrennt als exe und starte es mit RunProgram als reaktion auf den Button.
wenn du es an den anfang setzt, sollte es eine procedure sein, die du vom button aufrufst.
wenn du es direkt als button reaktion einbinden willst, muss es von code her komplett passen, mit allen variablen und drum und dran.
IncludeFile arbeitet so, als würdest du den code mit kopieren/einfügen direkt hineinsetzen.
Verfasst: 27.03.2007 00:12
von AlbertH
Hmm kann ich es alles unter einem Repeat - Untile Tag einfügen?
Code: Alles auswählen
Repeat
Event = WaitWindowEvent()
If Event = #PB_Event_Gadget
If EventGadget()=#ButtonImage_6
IncludeFile("1.pb")
EndIf
EndIf
Until Event = #PB_Event_Gadget
EndIf
Repeat
Event = WaitWindowEvent()
If Event = #PB_Event_Gadget
If EventGadget()=#ButtonImage_0
IncludeFile("HPViewer.pb")
EndIf
EndIf
Until Event = #PB_Event_CloseWindow
End
Verfasst: 27.03.2007 00:19
von ts-soft
In einem IncludeFile solltest Du nur Structuren, Interfaces,
Variablendeklarationen, Macros und Prozeduren hinein tun. Das Includieren in
einer Schleife ist auf jedem Fall falsch!
Verfasst: 27.03.2007 15:45
von AlbertH
ok... was empfielst du mir dann zum ausführen eines programms?
Verfasst: 27.03.2007 15:50
von Kaeru Gaman
Kaeru Gaman hat geschrieben:@AlbertH
ist 1.pb ein komplettes eigenständiges programm?
dann kompiliere es getrennt als exe und starte es mit RunProgram als reaktion auf den Button.
bitte lies auch alle antworten auf deine fragen!
Verfasst: 27.03.2007 19:08
von AlbertH
Kaeru Gaman hat geschrieben:Kaeru Gaman hat geschrieben:@AlbertH
ist 1.pb ein komplettes eigenständiges programm?
dann kompiliere es getrennt als exe und starte es mit RunProgram als reaktion auf den Button.
bitte lies auch alle antworten auf deine fragen!
aber dann wird es doch nicht in die eine hauptexe eingebunden?
Verfasst: 27.03.2007 19:13
von Kaeru Gaman
nein, wird es nicht.
also wie sieht dein code der include denn aus?
du musst ihn auch programmlogisch einbinden.
am besten machst du eine Procedure draus, und rufst die auf als reaktion auf einen button.
wenn es ein komplett eigenstämdiges programm ist, dann kannst du es in eine Procedure verpacken, und in einem extra thread starten.
aber bitte erzähl uns doch erst einmal ein wenig mehr was du eigentlich vorhast....
jedes spezifische problem hat nun einmal spezifische lösungen.
ohne genaue kenntnis über die umstände können wir auch keinen genauen rat erteilen.
Verfasst: 27.03.2007 21:50
von AlbertH
ich wollte ein generelles eingebundes shortcut-programm machen machen. das heißt, dass ich meine am meisten benutzen programme, die ich nachdem ich mein computer fomatiert habe, benutze, wie z.b. mozilla, icq, etc., in eine schicke .exe einbinden und mit einer panell mit buttons aufrufen.
aber jetzt habe ich dank eurer hilfe gelöst
Code: Alles auswählen
Repeat
Quit = 0
EventID = WaitWindowEvent()
If EventID=#PB_Event_CloseWindow
Quit=1
EndIf
If EventID=#PB_Event_Gadget
Gadget = EventGadget()
If Gadget = 1
MessageRequester("1", "2.", #PB_MessageRequester_Ok)
EndIf
EndIf
If EventID=#PB_Event_Gadget
Gadget = EventGadget()
If Gadget = 2
MessageRequester("2", "1.", #PB_MessageRequester_Ok)
EndIf
EndIf
Until Quit = 1
Verfasst: 27.03.2007 22:38
von Kiffi
Dein Code ist aufgrund überflüssiger If-Abfragen nicht so ganz das Gelbe vom Ei:
Code: Alles auswählen
Quit = 0
Repeat
EventID = WaitWindowEvent()
Select EventID
Case #PB_Event_CloseWindow
Quit = 1
Case #PB_Event_Gadget
Select EventGadget()
Case 1
MessageRequester("1", "2.", #PB_MessageRequester_Ok)
Case 2
MessageRequester("2", "1.", #PB_MessageRequester_Ok)
EndSelect
EndSelect
Until Quit = 1
AlbertH hat geschrieben:ich wollte ein generelles eingebundes shortcut-programm machen machen.
das heißt, dass ich meine am meisten benutzen programme, die ich
nachdem ich mein computer fomatiert habe, benutze, wie z.b. mozilla, icq,
etc., in eine schicke .exe einbinden und mit einer panell mit buttons
aufrufen.
nette Idee. Leider wird das so nicht funktionieren. Die wenigsten
Programme bestehen aus nur einer Exe. Meist benötigen sie noch externe
Dateien (z.B. DLLs) oder Daten (z.B. Registry-Einträge), um korrekt zu
funktionieren. Da reicht es also nicht, lediglich die Exe zu includieren.
Grüße ... Kiffi
Verfasst: 27.03.2007 23:22
von AlbertH
Kiffi hat geschrieben:Dein Code ist aufgrund überflüssiger If-Abfragen nicht so ganz das Gelbe vom Ei:
Code: Alles auswählen
Quit = 0
Repeat
EventID = WaitWindowEvent()
Select EventID
Case #PB_Event_CloseWindow
Quit = 1
Case #PB_Event_Gadget
Select EventGadget()
Case 1
MessageRequester("1", "2.", #PB_MessageRequester_Ok)
Case 2
MessageRequester("2", "1.", #PB_MessageRequester_Ok)
EndSelect
EndSelect
Until Quit = 1
AlbertH hat geschrieben:ich wollte ein generelles eingebundes shortcut-programm machen machen.
das heißt, dass ich meine am meisten benutzen programme, die ich
nachdem ich mein computer fomatiert habe, benutze, wie z.b. mozilla, icq,
etc., in eine schicke .exe einbinden und mit einer panell mit buttons
aufrufen.
nette Idee. Leider wird das so nicht funktionieren. Die wenigsten
Programme bestehen aus nur einer Exe. Meist benötigen sie noch externe
Dateien (z.B. DLLs) oder Daten (z.B. Registry-Einträge), um korrekt zu
funktionieren. Da reicht es also nicht, lediglich die Exe zu includieren.
Grüße ... Kiffi
[/size]
oh, das mit case kannte ich nicht. danke!
