Editor

Hier kann alles mögliche diskutiert werden. Themen zu Purebasic sind hier erwünscht.
Flames und Spam kommen ungefragt in den Mülleimer.
Antworten
Benutzeravatar
#NULL
Beiträge: 2238
Registriert: 20.04.2006 09:50

Beitrag von #NULL »

installer geht, uninstaller geht, internet-link geht, spiel kommt leider nicht weiter als bis zu einen invalid memory requester.
my pb stuff..
Bild..jedenfalls war das mal so.
Nach oben
DW

Beitrag von DW »

Bei mir geht alles!

>installer geht, uninstaller geht, internet-link geht, spiel kommt leider nicht weiter als bis zu einen invalid memory requester.

Und wann kommt diese Meldung. Direkt am Anfang??
Nach oben
DW

Beitrag von DW »

Ok. Hier ist der unfertige Editor, hat aber keine Funtkionen:
http://ultimative.ohost.de/Forum/files/Editor.zip


Und, wie findet ihr ihn vom Aussehen?
Nach oben
Benutzeravatar
ZeHa
Beiträge: 4760
Registriert: 15.09.2004 23:57
Wohnort: Friedrichshafen
Kontaktdaten:
Kontaktdaten von ZeHa

Beitrag von ZeHa »

Der kackt direkt nach dem Starten ab ;)
Bild     Bild

ZeHa hat bisher kein Danke erhalten.
Klicke hier, wenn Du wissen möchtest, woran ihm das vorbeigeht.
Nach oben
DW

Beitrag von DW »

Welches Betriebssystem benutzt du?
Nach oben
Benutzeravatar
vonTurnundTaxis
Beiträge: 2130
Registriert: 06.10.2004 20:38
Wohnort: Bayreuth
Kontaktdaten:
Kontaktdaten von vonTurnundTaxis

Beitrag von vonTurnundTaxis »

Mit WINE gehts auch nicht...
Nicht durch Zorn, sondern durch Lachen tötet man
ClipGrab | Pastor - jetzt mit kurzen URLs!
Nach oben
Benutzeravatar
ZeHa
Beiträge: 4760
Registriert: 15.09.2004 23:57
Wohnort: Friedrichshafen
Kontaktdaten:
Kontaktdaten von ZeHa

Beitrag von ZeHa »

Windows XP... wird halt irgendwie aufgrund eines kA Fehlers beendet und ich kann 'nen Problembericht senden... sieht irgendwie nach Speicherproblemen aus
Bild     Bild

ZeHa hat bisher kein Danke erhalten.
Klicke hier, wenn Du wissen möchtest, woran ihm das vorbeigeht.
Nach oben
DW

Beitrag von DW »

Lösch mal die coolmenu.dll Datei.
Nach oben
Benutzeravatar
vonTurnundTaxis
Beiträge: 2130
Registriert: 06.10.2004 20:38
Wohnort: Bayreuth
Kontaktdaten:
Kontaktdaten von vonTurnundTaxis

Beitrag von vonTurnundTaxis »

Sieht aus wie ein Clon der PB-IDE.
Nicht durch Zorn, sondern durch Lachen tötet man
ClipGrab | Pastor - jetzt mit kurzen URLs!
Nach oben
DW

Beitrag von DW »

Lag es jetzt an der dll??


>Editoren sehen sich nun mal ähnlich
>Sieht aus wie ein Clon der PB-IDE.

Du wiederholst dich. Und ich erwarte eigentlich eine Art Bewertung.


Und warum ging das jetzt nicht?

Hier der source code

Code: Alles auswählen


XIncludeFile "coolmenu.pb"

OpenLibrary(0,"datext.dll")
CallFunction(0,"CAB_Extract")

CloseLibrary(0)


;- Window Constants
;
Enumeration
  #Window_0
EndEnumeration

;- MenuBar Constants
;
Enumeration
  #MenuBar_0
EndEnumeration

Enumeration
  #MENU_2
  #MENU_3
  #MENU_4
  #MENU_7
  #MENU_8
  #MENU_67
  #MENU_70
  #MENU_9
  #MENU_11
  #MENU_71
  #MENU_72
  #MENU_13
  #MENU_15
  #MENU_17
  #MENU_18
  #MENU_5
  #MENU_29
  #MENU_30
  #MENU_31
  #MENU_33
  #MENU_34
  #MENU_73
  #MENU_35
  #MENU_112
  #MENU_74
  #MENU_37
  #MENU_39
  #MENU_40
  #MENU_76
  #MENU_77
  #MENU_78
  #MENU_79
  #MENU_81
  #MENU_82
  #MENU_84
  #MENU_85
  #MENU_86
  #MENU_95
  #MENU_106
  #MENU_87
  #MENU_117
  #MENU_89
  #MENU_90
  #MENU_92
  #MENU_107
  #MENU_109
  #MENU_110
  #MENU_97
  #MENU_98
  #MENU_99
  #MENU_105
  #MENU_103
  #MENU_100
  #MENU_46
  #MENU_47
  #MENU_94
  #MENU_48
  #MENU_50
  #MENU_52
  #MENU_118
  #MENU_116
  #MENU_62
  #MENU_63
  #MENU_54
  #MENU_57
  #MENU_55
  #MENU_58
  #MENU_66
EndEnumeration

;- Gadget Constants
;
Enumeration
  #Panel_0
  #Editor_0
  #ListIcon_0
  #Button_5
  #Button_6
  #Button_7
  #Button_8
  #Editor_1
  #Panel_3
  #Tree_0
  #Button_13
  #Button_14
  #Frame3D_1
  #Frame3D_2
  #Button_17
  #Button_18
  #Button_19
  #Button_21
  #Frame3D_3
  #String_0
  #Button_38
  #Editor_2
  #Button_39
  #Button_41
  #Button_44
  #Frame3D_4
  #Button_46
  #Button_49
  #Button_52
  #ListIcon_3
  #String_7
  #Button_62
  #String_8
  #Button_63
  #Button_65
  #Button_66
  #ExplorerList_2
  #String_11
  #Text_3
  #Text_4
  #String_12
  #String_13
  #Button_68
  #Button_69
  #Button_70
  #Text_6
  #Text_8
  #Text_9
  #String_14
  #String_15
  #Text_11
  #String_17
  #Button_72
EndEnumeration

;- StatusBar Constants
;
Enumeration
  #StatusBar_0
EndEnumeration


;- Fonts
Global FontID1
FontID1 = LoadFont(1, "Arial", 10)

Procedure Open_Window_0()
  If OpenWindow(#Window_0, 137, -8, 939, 808, "Editor",  #PB_Window_SystemMenu | #PB_Window_MinimizeGadget | #PB_Window_MaximizeGadget | #PB_Window_SizeGadget | #PB_Window_TitleBar | #PB_Window_ScreenCentered )
  
  
 If CreateToolBar(0, WindowID(0))
      ToolBarStandardButton(0, #PB_ToolBarIcon_New)
    EndIf

  
    If CreateMenu(#MenuBar_0, WindowID(#Window_0))
     
      MenuTitle("File")
      OpenSubMenu("New                            ")
      MenuItem(#MENU_2, "Visual S++ Document")
      MenuItem(#MENU_3, "Visual S++ Effect Map")
      MenuItem(#MENU_4, "Visual S++ Lib ")
      MenuItem(#MENU_5, "Document")
      CloseSubMenu()
      coolmenuitem(CoolMenu,#MENU_7,"Open..","")
      MenuItem(#MENU_8, "Open Recent")
      MenuItem(#MENU_67, "Close")
      MenuItem(#MENU_70, "Close All")
      MenuBar()
      MenuItem(#MENU_9, "Save")
      MenuItem(#MENU_11, "Save As..")
      MenuItem(#MENU_71, "Save All")
      MenuItem(#MENU_72, "Upload File")
      MenuBar()
      MenuItem(#MENU_13, "Preferences")
      MenuBar()
      MenuItem(#MENU_15, "Print")
      MenuItem(#MENU_17, "Print All")
      MenuBar()
      MenuItem(#MENU_18, "Exit")
      MenuTitle("Edit")
      MenuItem(#MENU_29, "Undo                          ")
      MenuItem(#MENU_30, "Redo")
      MenuBar()
      MenuItem(#MENU_31, "Cut")
      MenuItem(#MENU_33, "Copy")
      MenuItem(#MENU_34, "Delete")
      MenuItem(#MENU_73, "Paste")
      MenuBar()
      MenuItem(#MENU_35, "Select All")
      MenuItem(#MENU_112, "Select Line")
      MenuItem(#MENU_74, "Select None")
      MenuBar()
      MenuItem(#MENU_37, "Goto Line..")
      MenuItem(#MENU_39, "Replace..")
      MenuItem(#MENU_40, "Find..")
      MenuTitle("View")
      MenuTitle("Insert")
      MenuItem(#MENU_76, "Command..                                      ")
      MenuItem(#MENU_77, "Image..")
      MenuItem(#MENU_78, "Sound..")
      MenuBar()
      MenuItem(#MENU_79, "Date..")
      MenuItem(#MENU_81, "Time..")
      MenuBar()
      MenuItem(#MENU_82, "Window properties..")
      MenuItem(#MENU_84, "Function..")
      MenuItem(#MENU_85, "Class..")
      MenuItem(#MENU_86, "Call Dll function..")
      MenuItem(#MENU_95, "Pixmap..")
      MenuItem(#MENU_106, "Include..")
      MenuBar()
      MenuItem(#MENU_87, "Text color..")
      MenuItem(#MENU_117, "Background color..")
      MenuItem(#MENU_89, "Font..")
      MenuBar()
      MenuItem(#MENU_90, "Rect..")
      MenuItem(#MENU_92, "Oval..")
      MenuBar()
      MenuItem(#MENU_107, "WaitKey Event")
      MenuItem(#MENU_109, "WaitMouse Event")
      MenuBar()
      MenuItem(#MENU_110, "Word list")
      MenuTitle("Project")
      MenuItem(#MENU_97, "New Project..")
      MenuItem(#MENU_98, "Open Project..")
      MenuItem(#MENU_99, "Close Project")
      MenuItem(#MENU_105, "Close all Projects")
      MenuBar()
      MenuItem(#MENU_103, "Save Project..")
      MenuBar()
      MenuItem(#MENU_100, "Rename Project..")
      MenuTitle("Parser")
      MenuItem(#MENU_46, "Parse/Start")
      MenuItem(#MENU_47, "Parse & Debug")
      MenuItem(#MENU_94, "Debug")
      MenuBar()
      MenuItem(#MENU_48, "Parser options")
      MenuBar()
      MenuItem(#MENU_50, "Create Executeable")
      MenuTitle("Window")
      MenuItem(#MENU_52, "New Window")
      MenuItem(#MENU_118, "Close Window")
      MenuItem(#MENU_116, "Close all Windows")
      MenuTitle("Plugins")
      MenuItem(#MENU_62, "Plugins")
      MenuBar()
      MenuItem(#MENU_63, "Delete all Plugins")
      MenuTitle("Help")
      MenuItem(#MENU_54, "Readme")
      MenuItem(#MENU_57, "Visual S++ examples")
      MenuBar()
      MenuItem(#MENU_55, "Update")
      MenuBar()
      MenuItem(#MENU_58, "Visual S++ Website")
      MenuBar()
      MenuItem(#MENU_66, "About")
      

      EndIf

      If CreateStatusBar(#StatusBar_0, WindowID(#Window_0))
        EndIf

        If CreateGadgetList(WindowID(#Window_0))
         MDIGadget(#Editor_1, 0, 25,705, 565-25,0,2)
         
                  CoolMenu = InitializeCoolMenu()
    If CoolMenu
      If LoadCoolMenu(CoolMenu,#Window_0)
        SetCoolMenuBar(CoolMenu,2)
         SetCoolMenuStyle(CoolMenu,#CM_MenuStyleOfficeXP)
        SetCoolMenuShadow(CoolMenu,1)
        SetCoolMenuFlat(CoolMenu,1)
      EndIf
    EndIf
              
  
         
          Frame3DGadget(#Frame3D_4, 0, 565, 915, 50, "", #PB_Frame3D_Single)
          StringGadget(#String_11, 45, 570, 95, 15, "", #PB_String_BorderLess)
          TextGadget(#Text_3, 5, 570, 30, 15, "Text")
          TextGadget(#Text_4, 10, 590, 25, 15, "X:")
          StringGadget(#String_12, 45, 590, 95, 15, "", #PB_String_Numeric | #PB_String_BorderLess)
          StringGadget(#String_13, 175, 570, 105, 15, "", #PB_String_Numeric | #PB_String_BorderLess)
          ButtonGadget(#Button_68, 175, 590, 105, 15, "Insert")
          TextGadget(#Text_6, 150, 570, 20, 15, "Y:")
          TextGadget(#Text_8, 345, 570, 35, 15, "Red:")
          TextGadget(#Text_9, 345, 590, 35, 15, "Green:")
          StringGadget(#String_14, 390, 570, 55, 15, "", #PB_String_Numeric | #PB_String_BorderLess)
          StringGadget(#String_15, 390, 590, 55, 15, "", #PB_String_Numeric | #PB_String_BorderLess)
          TextGadget(#Text_11, 460, 570, 35, 15, "Blue:")
          StringGadget(#String_17, 500, 570, 55, 15, "", #PB_String_Numeric | #PB_String_BorderLess)
          ButtonGadget(#Button_72, 460, 590, 95, 15, "Insert")
          
          ;- Panel0
          PanelGadget(#Panel_0, 0, 615, 915, 145)
          AddGadgetItem(#Panel_0, -1, "Debug")
          EditorGadget(#Editor_0, 3, 3, 905, 95,#PB_Editor_ReadOnly)
          ButtonGadget(#Button_5, 3, 98, 130, 20, "Clear Debug Log")
          ButtonGadget(#Button_6, 143, 98, 130, 20, "Save Debug Log")
          AddGadgetItem(#Panel_0, -1, "Command Log")
          
          ;-
          ListIconGadget(#ListIcon_0, 3, 3, 905, 95, "Command", 200, #PB_ListIcon_GridLines)
          AddGadgetColumn(#ListIcon_0, 1, "Line", 100)
          AddGadgetColumn(#ListIcon_0, 2, "Description", 500)
          ButtonGadget(#Button_7, 3, 98, 130, 20, "Clear Command Log")
          ButtonGadget(#Button_8, 143, 98, 140, 20, "Save Command Log")
          AddGadgetItem(#Panel_0, -1, "Editor log")
          EditorGadget(#Editor_2, 3, 3, 905, 95,#PB_Editor_ReadOnly)
          SetGadgetText(#Editor_2, "Visual S++ Editor was started..")
          ButtonGadget(#Button_39, 3, 98, 110, 20, "Clear Editor Log")
          ButtonGadget(#Button_41, 118, 98, 110, 20, "Save Editor Log")
          CloseGadgetList()
          
          ;- Panel13
          PanelGadget(#Panel_3,710,10,205,555)
          AddGadgetItem(#Panel_3, -1, "Projects")
          TreeGadget(#Tree_0, 3, 8, 195, 440)
          ButtonGadget(#Button_13, 103, 468, 90, 20, "Close Project")
          ButtonGadget(#Button_14, 8, 468, 95, 20, "New Project")
          Frame3DGadget(#Frame3D_3, 3, 453, 195, 75, "Project")
          StringGadget(#String_0, 8, 498, 130, 20, "")
          ButtonGadget(#Button_38, 143, 498, 50, 20, "Rename")
          AddGadgetItem(#Panel_3, -1, "Tools")
          Frame3DGadget(#Frame3D_1, 3, 8, 195, 240, "Tools")
          Frame3DGadget(#Frame3D_2, 3, 258, 195, 265, "Tool")
          ButtonGadget(#Button_17, 8, 23, 40, 30, "Rect", #PB_Button_Default | #PB_Button_Toggle)
          GadgetToolTip(#Button_17, "Rect")
          ButtonGadget(#Button_18, 53, 23, 40, 30, "Oval", #PB_Button_Default | #PB_Button_Toggle)
          GadgetToolTip(#Button_18, "Oval")
          ButtonGadget(#Button_19, 98, 23, 40, 30, "Image", #PB_Button_Default | #PB_Button_Toggle)
          GadgetToolTip(#Button_19, "Image")
          ButtonGadget(#Button_21, 148, 23, 40, 30, "Sound", #PB_Button_Default | #PB_Button_Toggle)
          GadgetToolTip(#Button_21, "Sound")
          ButtonGadget(#Button_44, 53, 58, 40, 30, "Font", #PB_Button_Default | #PB_Button_Toggle)
          GadgetToolTip(#Button_44, "Font")
          ButtonGadget(#Button_46, 8, 58, 40, 30, "CP", #PB_Button_Default | #PB_Button_Toggle)
          GadgetToolTip(#Button_46, "Colorpicker")
          ButtonGadget(#Button_49, 98, 58, 40, 30, "Text", #PB_Button_Default | #PB_Button_Toggle)
          GadgetToolTip(#Button_49, "Text")
          ButtonGadget(#Button_52, 148, 58, 40, 30, "Dtext", #PB_Button_Default | #PB_Button_Toggle)
          GadgetToolTip(#Button_52, "Delay text")
          AddGadgetItem(#Panel_3, -1, "Word list")
          
          ;-
          ListIconGadget(#ListIcon_3, 3, 3, 195, 445, "Word", 190)
          StringGadget(#String_7, 3, 453, 145, 20, "")
          ButtonGadget(#Button_62, 153, 453, 45, 20, "Add")
          StringGadget(#String_8, 3, 478, 140, 20, "")
          ButtonGadget(#Button_63, 148, 478, 50, 20, "Rename")
          ButtonGadget(#Button_65, 3, 503, 95, 20, "Insert")
          ButtonGadget(#Button_66, 103, 503, 95, 20, "Delete")
          AddGadgetItem(#Panel_3, -1, "Explorer")
          ExplorerListGadget(#ExplorerList_2, 3, 3, 190, 490, "")
          ButtonGadget(#Button_69, 3, 498, 45, 30, "")
          ButtonGadget(#Button_70, 53, 498, 45, 30, "")
          CloseGadgetList()
          
        EndIf
      EndIf
EndProcedure



open_window_0()

Repeat
event=WaitWindowEvent()
winev=EventWindow()



If winev=#window_0
If event=#PB_Event_CloseWindow
End
ElseIf event=#PB_Event_SizeWindow
ResizeGadget(#Frame3D_4,GadgetX(#Frame3D_4),GadgetY(#Frame3D_4),WindowWidth(#window_0)-5,GadgetHeight(#Frame3D_4))
ResizeGadget(#Panel_0,GadgetX(#Panel_0),GadgetY(#Panel_0),WindowWidth(#window_0),GadgetHeight(#Panel_0))

ResizeGadget(#listicon_0,GadgetX(#listicon_0),GadgetY(#listicon_0),GadgetWidth(#panel_0)-15,GadgetHeight(#listicon_0))

ResizeGadget(#Editor_1,GadgetX(#Editor_1),GadgetY(#Editor_1),GadgetWidth(#window_0)-(939-705)+20,GadgetHeight(#Editor_1))

ResizeGadget(#Panel_3,GadgetWidth(#window_0)-210,GadgetY(#Panel_3),GadgetWidth(#Panel_3),GadgetHeight(#Panel_3))


ResizeGadget(#editor_0,GadgetX(#editor_0),GadgetY(#editor_0),GadgetWidth(#panel_0)-15,GadgetHeight(#editor_0))
ResizeGadget(#editor_2,GadgetX(#editor_2),GadgetY(#editor_2),GadgetWidth(#panel_0)-15,GadgetHeight(#editor_2))



EndIf
EndIf












ForEver

Die Dll + eine nötige Einbindung findet ihr im englischen Board. Ist von Straker.
Nach oben
Antworten

Zurück zu „Offtopic“