gDesign - editor plugin v0.95

[Kiffi]

> Bislang wurde die Fenstergröße auch nicht berücksichtigt.

oh, verzeitung! Mir war so, als ob man das in früheren Versionen konnte.
Habe ich mich wohl verguckt

> Aber nun.. Kleines Update:

und hier ein kleiner Bugreport (ist eher ein Schönheitsfehler)

vor dem Aufruf des Designers:

Code: Alles auswählen

Procedure.l OpenWindow_frmMain()
  If OpenWindow(#frmMain, #PB_Ignore, #PB_Ignore, 146, 129, "", #PB_Window_ScreenCentered | #PB_Window_SystemMenu )
    If CreateGadgetList(WindowID(#frmMain))
      ButtonGadget(1, 5, 5, 135, 115, "lala")
      ProcedureReturn #True
    EndIf
  EndIf
EndProcedure

nach dem Aufruf des Designers:

Code: Alles auswählen

Procedure.l OpenWindow_frmMain()
If OpenWindow(#frmMain, #PB_Ignore, #PB_Ignore, 327, 277, "", #PB_Window_ScreenCentered | #PB_Window_SystemMenu )
    If CreateGadgetList(WindowID(#frmMain))
      ButtonGadget(1, 5, 5, 135, 115, "lala")
      ProcedureReturn #True
    EndIf
  EndIf
EndProcedure

man beachte, dass die Einrückung nicht mehr stimmt.

Getestet mit jaPBe (neueste Version)

> In der nächsten Version wird man neue Gadgets erstellen können.

ich freue mich drauf!

Grüße ... Kiffi

[Mischa]

Danke für den Hinweis @Kiffi

Sollte gefixed sein.
(inklusive einiger anderer Kleinigkeiten )

Gruß,
Mischa

[Mischa]

..einige weitere kleine Fehler wurden behoben.
(siehe englisches Forum)

Gruß,
Mischa

[Kiffi]

[Push]

Noch einen kleinen Bug gefunden. gDesign schneidet den 2. Parameter bei
SetGadgetText() weg:

vorher:

Code: Alles auswählen

SpinGadget(#spnCropLeft, 90, 85, 70, 20, 0, 100, #PB_Spin_Numeric) : SetGadgetText(#spnCropLeft, "0")

nachher:

Code: Alles auswählen

SpinGadget(#spnCropLeft, 90, 85, 70, 20, 0, 100, #PB_Spin_Numeric) : SetGadgetText(#spnCropLeft)

und ausserdem wird der letzte Zeilenumbruch des Codes entfernt.

vorher:

Code: Alles auswählen

Repeat
Until WaitWindowEvent()=#PB_Event_CloseWindow

nachher:

Code: Alles auswählen

RepeatUntil WaitWindowEvent()=#PB_Event_CloseWindow

(jaPBe aktuelle Version)

Grüße ... Kiffi

[ABBKlaus]

und noch ein Fehler :

... WindowID(Parent))
wird abgeschnitten :
... WindowID

Code: Alles auswählen

Procedure Open_Window_Wait(ProgressMax,Parent)
  If OpenWindow(#Window_Wait, 0, 0, 200, 100, #Workplacetext, #PB_Window_SystemMenu|#PB_Window_TitleBar|#PB_Window_WindowCentered, WindowID(Parent))
    If CreateGadgetList(WindowID(#Window_Wait))
      TextGadget(#WaitText_1, 10, 10, 180, 30, "Bitte warten", #PB_Text_Center)
      ProgressBarGadget(#WaitProgress_1, 10, 35, 180, 20, 0, ProgressMax)
      ButtonGadget(#WaitButton_1, 60, 70, 80, 20, "Abbrechen")

      AddKeyboardShortcut(#Window_Wait, #PB_Shortcut_Return , 100)
      
      ;SetTimer_(WindowID(#Window_Wait),1,10,0)
      SetActiveGadget(#WaitButton_1)
    EndIf
  EndIf
EndProcedure

wird zu :

Code: Alles auswählen

Procedure Open_Window_Wait(ProgressMax,Parent)
  If OpenWindow(#Window_Wait, 0, 0, 200, 100, #Workplacetext, #PB_Window_SystemMenu|#PB_Window_TitleBar|#PB_Window_WindowCentered, WindowID
    If CreateGadgetList(WindowID(#Window_Wait))
      TextGadget(#WaitText_1, 10, 10, 180, 30, "Bitte warten", #PB_Text_Center)
      ProgressBarGadget(#WaitProgress_1, 10, 35, 180, 20, 0, ProgressMax)
      ButtonGadget(#WaitButton_1, 60, 70, 80, 20, "Abbrechen")

      AddKeyboardShortcut(#Window_Wait, #PB_Shortcut_Return , 100)
      
      ;SetTimer_(WindowID(#Window_Wait),1,10,0)
      SetActiveGadget(#WaitButton_1)
    EndIf
  EndIf
EndProcedure

[rolaf]

*ThreadNachObenHol*

Bevor er auf die zweite Seite rutscht. Mischa wir haben dich und deinen genialen gDesign'er nicht vergessen. Gibts schon was Neues?

[dysti]

Hey,
läuft das Teil nicht mit der Original-IDE von PB4.2?
Stürzt immer ab. Muß den gDesignprozess killen, dann läuft PB wieder.

@TS-SOFT: wo finde ich dieses Teil:

Visual Designer von Benrico

Gruß Dysti

[rolaf]

Hey,
läuft das Teil nicht mit der Original-IDE von PB4.2?
Stürzt immer ab. Muß den gDesignprozess killen, dann läuft PB wieder.

@TS-SOFT: wo finde ich dieses Teil:

Visual Designer von Benrico

Gruß Dysti

Schau mal wie alt der Thread ist, dann weiste warum da nix mehr läuft.

Empfehlung meinerseits:
http://www.purebasic.fr/english/viewtopic.php?t=23529

[dysti]

Hallo Mischa,
wie das mit dieser Mitteilung:

Ihr wißt der alte gDesign ist gestorben, aber..
gDesign wird neu entwickelt.

Nun ja, das war nur ein kleines Flämmchen. Seit 2008 keine Mitteilung mehr.
Wird der Code freigegeben oder traust dich nicht?

[Vera]

*** bumped ***

Hallo,
dank RSBasic's Backup-Page ist gdesign097b2.zip noch erhältlich.

freu ndliche Grüße an alle ~ Vera