Userlibs

[zigapeda]

so jetzt hab ich es einfach mal ausprobiert und wie ich mir gedacht hab es funktioniert nicht. Ich habe keine ahnung woran es liegen kann. Der code funktioniert wenn ich die Procedur mit einem beispiel teste aber wenn ich dann die lib erstelle und es in einem anderen programm verwenden will funktioniert es nicht. was kann ich tun?

[Danilo]

Code: Alles auswählen

ProcedureDLL ErrorBox(msg$)
  MessageRequester("ERROR",msg$,#MB_ICONERROR)
EndProcedure

Geht das?

[zigapeda]

Ja das hat funktioniert.
wenn ich jetzt eine userlib machen möchte das ein string zurückgegeben wird wie würde das dann aussehen?

Code: Alles auswählen

ProcedureDLL.s
oder ProcedureDLL
oder Procedure.s
oder ???

[NicTheQuick]

Ich will auch mal blind tippen.

Hmm...

Ich nehme [c]ProcedureDLL.s[/c]. Stimmt das?

@zigapeda: Willst du das vielleicht nicht mal selbst ausprobieren?

[zigapeda]

Ja hab ok ProcedurDLL.s funktioniert. Ausprobieren ist immer so eine sache wenn ich einen anderen fehler gemacht habe weiß ich nicht woran es liegt und probier alles möchliche aus und dann liegt der fehler wo anderst.
Trotzdem Danke für eure Hilfe

[zigapeda]

Ich glaube zwar nicht aber ich frage sicherheitshalber nach: Wenn ich in einer userlib in einer ProcedureDLL ein fenster mit der Fensternummer 0 öffne hat das dann auf das fenster im hauptprogramm, das auch die fensternummer 0 hat auswirkungen? bzw. wie ist das mit gadgets?

[ts-soft]

in einer UserLib solltest Du nur #PB_Any verwenden, besser noch nur WinAPI

[zigapeda]

ja ist mir klar aber wenn ich in der userlib ein fenster öffne. Normal macht das nix da die Fensternummern ja nur in PB verwendet werden deshalb muss man auch die ID mit WindowID(Fensternummer) rausfinden aber ich bin mir nicht sicher.

[ts-soft]

Verstehe ich nicht so ganz. also Fenster erstellte so:

Code: Alles auswählen

MeinFenster = OpenWindow(#PB_Any, 100, 100, 200, 200, #PB_Window_SystemMenu, "Testfenster")
If MeinFenster
  Debug MeinFenster           ; PB-Handel
  Debug WindowID(MeinFenster) ;Windows-Handel
  Repeat : Until WaitWindowEvent() = #PB_Event_CloseWindow
EndIf

[zigapeda]

wie kann ich dann eine gadgetlist auf dem fenster erzeugen?

Code: Alles auswählen

creategadgetlist(windowid(#pb_any))

geht doch nicht oder?