Die Suche ergab 310 Treffer

von Lord
26.03.2024 11:58
Forum: Bugs
Thema: Linux Bug bei CanvasGadget mit #PB_Canvas_Container
Antworten: 4
Zugriffe: 147

Re: Linux Bug bei CanvasGadget mit #PB_Canvas_Container

Hallo!

Füge doch mal dem CanvasGadget das Flag #PB_Canvas_Keyboard hinzu,
dann sollten die Mausradevents kommen.
Also z.B.:

Code: Alles auswählen

flags = #PB_Canvas_Container | #PB_Canvas_Keyboard
Zumindest bei Windows hat es so funktioniert.
von Lord
26.01.2024 10:05
Forum: Offtopic
Thema: Purebasic-IDE unter Linux - Schööön :)
Antworten: 5
Zugriffe: 247

Re: Purebasic-IDE unter Linux - Schööön :)

... Ist das nicht schön. Ich könnte weinen vor Freude ... Naja ganz so sehr nun nicht. Aber warum kann das einfach unter Windows nicht so aussehen? ... Naja, egal ob Linux oder Windows, ich fand damals schon das grün auf schwarz bei meinem CBM 3032 absolut häßlich. Mir gefällt die PB-eigene Farbwah...
von Lord
13.10.2023 09:43
Forum: Anfänger
Thema: exe Datei auf MAC laufen lassen?
Antworten: 7
Zugriffe: 442

Re: exe Datei auf MAC laufen lassen?

RSBasic hat geschrieben: 13.10.2023 09:17 Du kannst WINE auf MacOS installieren ...
Aber nur mit Intel CPU.
von Lord
11.07.2023 11:01
Forum: Anfänger
Thema: Bilder mit Executable schicken
Antworten: 7
Zugriffe: 602

Re: Bilder mit Executable schicken

Das funktioniert bei mir im Prinzip so: Dim ImgAdr(6) Procedure ReadImgAdr() Shared ImgAdr() ImgAdr(0)=?Image_flieg ImgAdr(1)=?Image_WF_1 ImgAdr(2)=?Image_WF_2 ImgAdr(3)=?Image_WF_3 ImgAdr(4)=?Image_WF_4 ImgAdr(5)=?Image_WF_5 ImgAdr(6)=?Image_WF_6 EndProcedure Procedure RollDice() Shared ImgAdr() ; ...
von Lord
27.02.2023 11:59
Forum: Grafik & Sound - Programmierung
Thema: Auswahlrechteck mit Maus aufziehen
Antworten: 8
Zugriffe: 744

Re: Auswahlrechteck mit Maus aufziehen

Hier mal ein erster Denkansatz: EnableExplicit Define.i Event Procedure CanvasEvents() Static.i LMB, x1, y1, x2, y2, x2merk, y2merk Protected EventType EventType=EventType() Select EventType Case #PB_EventType_MouseEnter SetGadgetAttribute(1, #PB_Canvas_Cursor, #PB_Cursor_Cross) Case #PB_EventType_M...
von Lord
16.02.2023 11:12
Forum: Anfänger
Thema: Text live ausgeben innerhalb längerer Berechnungen
Antworten: 8
Zugriffe: 697

Re: Text live ausgeben innerhalb längerer Berechnungen

Ich weiß zwar auch nicht, was Dein Beispiel demonstrieren soll, aber hier mal Dein Beispiel umgeschrieben mit einer Eventschleife und einem Thread: EnableExplicit Enumeration #WinMain #GAD_List #GAD_Button EndEnumeration Enumeration #PB_Event_FirstCustomValue #CustomEvent1 #CustomEvent2 EndEnumerati...
von Lord
20.01.2023 12:57
Forum: Allgemein
Thema: Durchlauf von Map mit ForEach
Antworten: 24
Zugriffe: 1734

Re: Durchlauf von Map mit ForEach

Hi! Wenn ich eine Map nutze und wissen muß, ob ein Element mehrfach vorkommt, nutze ich eine Struktur. ein Element der Struktur ist dann ein Counter, welcher bei dem Hinzufügen eines Elements um ein erhöht wird. Bei der Abfrage des Elements wird diese Counter dann auf einen Wert größer als eins gepr...
von Lord
21.08.2022 12:14
Forum: Anfänger
Thema: Fehlermeldung Cannot execute the file
Antworten: 4
Zugriffe: 558

Re: Fehlermeldung Cannot execute the file

%appdatat%
Ein 't' zuviel.
von Lord
12.08.2022 11:28
Forum: Anfänger
Thema: Grafische Oberfläche
Antworten: 13
Zugriffe: 1375

Re: Grafische Oberfläche

Was hat FreeBASIC mit PureBasic zu tun ?
Offenbar falsches Forum.

Ooops, zu langsam.
von Lord
21.07.2022 10:41
Forum: Anfänger
Thema: 123,45 + 100,00 = 223.44999999999999
Antworten: 6
Zugriffe: 738

Re: 123,45 + 100,00 = 223.44999999999999

Kann man z.B. mit Integerrechnung lösen: exp=2; Nachkommastellem d=Pow(10, exp); Devisor Debug d a.s = Chr(34)+"123,45"+Chr(34) b.s = Chr(34)+"100,00"+Chr(34) a = ReplaceString(ReplaceString(a, Chr(34), ""), ",", ".") b = ReplaceString(ReplaceString(...