Die Suche ergab 12 Treffer

von interfind
21.11.2023 17:32
Forum: Anfänger
Thema: AddWindowTimer Zeit bis zum nächsten #PB_Event_Timer Ereignis
Antworten: 5
Zugriffe: 344

Re: AddWindowTimer Zeit bis zum nächsten #PB_Event_Timer Ereignis

Hallo juergenkulow und Danke für dein Beispiel.

Aber müsste nicht auch der WindowTimer irgendwo die Restlaufzeit zwischenspeichern
bis er das Timer Ereignis auslöst?
von interfind
18.11.2023 17:23
Forum: Anfänger
Thema: AddWindowTimer Zeit bis zum nächsten #PB_Event_Timer Ereignis
Antworten: 5
Zugriffe: 344

AddWindowTimer Zeit bis zum nächsten #PB_Event_Timer Ereignis

Hallo, wenn ich mit AddWindowTimer(0, 1, 60000) einen Timer erstelle bekomme ich alle 60 Sekunden ein #PB_Event_Timer Ereignis. Soweit so gut. Kann ich auch irgendwie ermitteln wieviele Millisekunden es bis zum nächsten #PB_Event_Timer Ereignis noch sind? Wo speichert die Funktion den aktuellen Stan...
von interfind
21.12.2022 15:34
Forum: Allgemein
Thema: Procedure Parameter Typ
Antworten: 6
Zugriffe: 706

Re: Procedure Parameter Typ

Ich habe folgende Lösung gefunden:

Code: Alles auswählen

Procedure.q Versuch(Parameter1.q, Parameter2.q)

  Debug "Speicheradresse: " + @Parameter1
  Debug Parameter1
  Debug Parameter2

  Parameter1|Parameter2<<$20

  ShowMemoryViewer(@Parameter1, 8)

EndProcedure

a=49
b=6
Versuch (a, b)
von interfind
20.12.2022 16:51
Forum: Allgemein
Thema: Procedure Parameter Typ
Antworten: 6
Zugriffe: 706

Re: Procedure Parameter Typ

Ich möchte die Parameter an die Funktion CVTDQ2PD xmm1, mem64 , übergeben.
Also in der Form CVTDQ2PD xmm1, [p.v_Parameter1].
Die beiden Werte sollen als zwei Packed DWORD's in XMM1 (LOW) stehen.
Was aber irgendwie so nicht funktioniert.
von interfind
20.12.2022 16:21
Forum: Allgemein
Thema: Procedure Parameter Typ
Antworten: 6
Zugriffe: 706

Procedure Parameter Typ

Wie kann ich den Parameter Typ (Byte, Word, DWord, Quad) bei einer Procedure beeinflussen. Bei der nachfolgenden Procedure werden die übergebenen Werte immer als Quadwert im Speicher abgelegt. Für meine Funktion brauche ich die beiden Parameter als DWORD. Procedure Versuch(Parameter1.l, Parameter2.l...
von interfind
27.04.2022 13:51
Forum: Anfänger
Thema: Stop Thread
Antworten: 10
Zugriffe: 1001

Re: Stop Thread

Hallo,

ich habe jetzt folgende Variante verwendet, die funktioniert.
Danke an alle.

Code: Alles auswählen

Procedure StopThreads()
Repeat
  threadcounter=0
    For th=1 To CPU_Cores
      If IsThread(mythread(th)): threadcounter+1: EndIf
    Next th
  While WindowEvent() : Wend
Until threadcounter=0
EndProcedure
von interfind
26.04.2022 21:22
Forum: Anfänger
Thema: Stop Thread
Antworten: 10
Zugriffe: 1001

Re: Stop Thread

Select WaitWindowEvent(0) Case #PB_Event_CloseWindow If MessageRequester ("","Programm beenden?", #PB_MessageRequester_YesNo) = #PB_MessageRequester_Yes state=0 ;MessageRequester ("OK","Programm beendet") Define temp_counter Repeat temp_counter=0 Delay(100) F...
von interfind
26.04.2022 21:14
Forum: Anfänger
Thema: Stop Thread
Antworten: 10
Zugriffe: 1001

Re: Stop Thread

Ich konnte das Problem weiter eingrenzen. in meinen Thread werden einige "SetGadgetText" Befehle ausgeführ. Dies führt anscheinend zum hängen. Wenn ich die SetGadgetText auskommentiere , werden die Thread korrekt beendet. Wenn ich die Befehle aber aus dem Thread auslagere dann werden die T...
von interfind
26.04.2022 12:18
Forum: Anfänger
Thema: Stop Thread
Antworten: 10
Zugriffe: 1001

Stop Thread

Hallo, ich habe folgendes Problem. In meiner Event Schleife habe ich das Flag state=0. Hiermit sollen meine laufenden Threads beendet werden. Wenn ich aber jetzt mit WaitThread und IsThread das ganze überprüfe laufen die Threads weiter bis meine Event-Schleife beendet ist. Mach ich nach den state=0 ...
von interfind
05.02.2022 11:06
Forum: Anfänger
Thema: Custom ListIconGadget
Antworten: 3
Zugriffe: 669

Re: Custom ListIconGadget

Guten Morgen, hab es jetzt selbst rausgefunden und was zusammengebastelt. Seht ihr hier noch Optimierungsmöglichkeiten? Global FontStd = LoadFont(0, "Arial", 8) Global FontBold = LoadFont(1, "Arial", 8, #PB_Font_Bold) ;Textfarbe, Hintergrund, Fontstyle bei ListView Zeilen und Spa...