PureBoard

Der Befehl "ShowGen(1)" startet das Programm "FGU.exe"



Global FGULINK_hDLL.i

;- Prototype
Prototype.i GenReady()
Prototype.i SetLibWave(freq.f, ampl.f, offset.f, filter.i, FileName.p-ascii)
Prototype.i SetSweep(freq1.f, freq2.f, ampl.f, offset.f, time.f, form.i)
Prototype.i SetGen(func.i, freq ...

Bei MLG_PUT bekomme ich auch einen Fehler "Ungültiger Speicherzugriff".

Mit MLG_PUTZ funktioniert es:
(For non Power Basic languages that do not reference BSTRs see the PutZ function.)



Prototype.i MLG_PUTZ(hGrid.l, ROW.l, COL.l, *mystr, refresh.l, sheetnum.l = 0)

....

*buffer = AllocateMemory ...

Die ersten Versuche mit MyLittleGrid:



;http://shop.powerbasic.com/products/my-little-grid

#IDC_MLGGRID = 100

;#MLG_STYLE = 1353711616
#MLG_STYLE = #WS_VISIBLE | #WS_BORDER | #WS_CHILD | #WS_CLIPCHILDREN | #WS_CLIPSIBLINGS

Global MLG_hDLL.i

;- Prototype
Prototype.i MLGHSIZERPROC()
Prototype.i ...

Das Funktioniert bei mir nur mit Unicode

; https://msdn.microsoft.com/en-us/library/windows/desktop/ms686832%28v=vs.85%29.aspx

EnableExplicit

Global Kernel32_hDLL.i

Prototype.i CloseHandle(hObject.i)
Prototype.i CreateToolhelp32Snapshot(dwFlags.l, th32ProcessID.l)
Prototype.i Process32First(hSnapshot.i, *lppe)
Prototype.i ...

Until Thread32Next_(Snapshot, @ThE32)

Da fehlt das #False

Bei "Or #False" ist die Bedingung nie erfüllt.

Bei "Or #True" wird die Repeat Schleife sofort verlassen

Hier kommt ohne PrototypeC:

"[15:30:23] [ERROR] Ungültiger Speicherzugriff. (Lesefehler an der Adresse 0)"



EnableExplicit

IncludeFile "AHid.pbi"

Global *parm1

*parm1 = AllocateMemory(1024)
If *parm1 = 0
End
EndIf

Procedure init()

Protected res.i, hwnd.i

PokeS(*parm1, "012345678", -1 ...

#AHID_LICENSE_ERROR wird zurück gegeben wenn die 30 Tage abgelaufen sind.