XProfan

Español

Detlef
Tussing

Posesiones el Karte soeben obtener, y bin ya al probieren.
Doch así ungeduldig Yo bin komme I, con el XProfan Ayuda no correcto más.
Posesiones folgendes probiert
Kompilieren Marca Separación

Declare DLL%
DLL%=@UseDLL(K8055D.DLL)
def open device(dll%,0)
def clearanalogchannel(dll%,1)
def clearanalogchannel(dll%,0)
def clearalldigital(dll%)

pero passiert nichts.
Der Fehler liegt en me. Ist porque DEF übehaupt el richtige Befehl a Karte anzusprechen ????

El Karte es Haga clic en Aceptar, como una Testprogramm esta es, y yo todos Características así testen podría.

Gruß Detlef Tussing
Windows XP, XProfan 10

14.06.2007 ▲

Vollständiges Zitat

Absatzweise Cita Zeilenweise Cita

- Página 1 -

Sí aber auch falso - Su DEF ha a viele Parámetro.

14.06.2007 ▲

Vollständiges Zitat

Absatzweise Cita Zeilenweise Cita

Detlef
Tussing

¡Hola IF, habe probiert
Kompilieren Marca Separación

Declare DLL%,mydll&
DLL%=@UseDLL(K8055D.DLL)
print dll%
waitinput
def OpenDevice(0) !K8055D.DLL,OpenDevice
def clearalldigital !K8055D.DLL,clearalldigital
var mydll&=usedll(K8055D.DLL)
def namederfunktion(anzahl_der_parameter) !K8055D.DLL,namederfunktion
cls
var mydll&=usedll(K8055D.DLL)
print namederfunktion(blub)
print mydll&
w

bekomme el Fehlermeldung VAR unbekannt

Gruß Detlef Tussing
Windows XP, XProfan 10

14.06.2007 ▲

Vollständiges Zitat

Absatzweise Cita Zeilenweise Cita

Detlef
Tussing

Dank a deine Geduld con me, pero va no

como war el todavía con el [Code] ?
Kompilieren Marca Separación

Declare mydll%,device%
def OpenDevice(0) !K8055D_C.DLL,OpenDevice
cls
def SearchDevice !K8055D_C.DLL,SerachDevice
def ClearAllDigital !K8055D_C.DLL,ClearAllDigital
mydll%=usedll(K8055D_C.DLL)
def namederfunktion(anzahl_der_parameter) !K8055D.DLL,namederfunktion
cls
var mydll&=usedll(K8055D.DLL)
print namederfunktion(blub)
print device%
print mydll%
w

Gruß Detlef Tussing
Windows XP, XProfan 10

14.06.2007 ▲

Vollständiges Zitat

Absatzweise Cita Zeilenweise Cita

Detlef Tussing

Dank a deine Geduld con me, pero va no

Es a wenig a Informationen en Usted helfen a puede.

14.06.2007 ▲

Vollständiges Zitat

Absatzweise Cita Zeilenweise Cita

Detlef
Tussing

Gracias, aber en mi Alter vergisst mann así manches,

Hier el Descripción el DLL con Code en Visual Basic el vom Hersteller esta war. Vieleicht hilft el, y yo hoffe el el no zuviel verlangt es.

MAN_D_K8055_DLL.pdf	49 kB

Hochgeladen:	14.06.2007

Ladeanzahl:
		Descargar

Gruß Detlef Tussing
Windows XP, XProfan 10

14.06.2007 ▲

Vollständiges Zitat

Absatzweise Cita Zeilenweise Cita

Scheint doch bastante simplemente con el DLL - obwohl ego bastante affig finde el el Hersteller el Kopieren de Texto de el PDF untersagt. Yo Así que una Bild angehangen - a diesem pequeño Ejemplo zeig Yo veces en como Usted lo traducir kannst.

Kompilieren Marca Separación

def opendevice(1) !k8055d.dll,OpenDevice
def closedevice(0) !k8055d.dll,CloseDevice
def readanalogchannel(1) !k8055d.dll,ReadAnalogChannel
def readallanalog(2) !k8055d.dll,ReadAllAnalog
declare dllh&
dllh&=usedll(k8055d.dll)

ifnot dllh&

    messagebox dll nicht geladen error,,0
    end

endif

declare kartenadresse&
kartenadresse&=opendevice(0)
print kartenadresse:,kartenadresse&
print was wird angezeigt?
waitinput
closedevice()
freedll dllh&
end

clipboard01_177[1].png	8 kB

Hochgeladen:	14.06.2007

Ladeanzahl:
		Descargar

14.06.2007 ▲

Vollständiges Zitat

Absatzweise Cita Zeilenweise Cita

Detlef
Tussing

High erster Erfolg
el Kartenadresse se erkannt, auch después de ändern el selben.
Haste bien gemacht, todos achtung sin Karte.
Probier ahora veces una bischen, komme aber determinado en dich zurück.

Relacionado con la Bild tener Yo no bastante verstanden, oder falso gelesen`??

Gruß Detlef Tussing
Windows XP, XProfan 10

14.06.2007 ▲

Vollständiges Zitat

Absatzweise Cita Zeilenweise Cita

- Página 2 -

juut

14.06.2007 ▲

Vollständiges Zitat

Absatzweise Cita Zeilenweise Cita

Detlef
Tussing

Lo funktioniert, dank IF
Hier el Testversion, el vieleicht para GDL interessant es.
Wer mehr wissen möchte kann mich gerne ansprechen
Kompilieren Marca Separación

declare a%,b%,c%,d%,e%
a%=1  Kartenadresse
b%=2 Digitalkanaleingang
c%=1 Analogkanaleingang
d%=4 Digitalkanalausgang
e%=2 Analogkanalausgang
def opendevice(1) !k8055d.dll,OpenDevice
def closedevice(0) !k8055d.dll,CloseDevice
def readdigi(1) !k8055d.dll,ReadDigitalChannel
def readanalog(1) !k8055d.dll,ReadAnalogChannel
def ClearAllDigital(0) !K8055d.dll,ClearAllDigital
def setdigi(1) !K8055d.dll,SetDigitalChannel
def analogout(1) !K8055d.dll,SetAnalogChannel
def clearallanalog(0) !K8055d.dll,ClearAllAnalog
declare dllh&
dllh&=usedll(k8055d.dll)

ifnot dllh&

    messagebox dll nicht geladen error,,0
    end

endif

declare kartenadresse&,readdigi&,schreibdigi&,readanalog&,schreibanalog&
kartenadresse&=opendevice(a%) Initialisierung der Karte

while readanalog&<125

    readanalog&=readanalog(c%)
    locate 10,10
    print Analogkanaleingang,c%, = ,readanalog&
    readdigi&=readdigi(b%)
    locate 14,10
    print Digitalkanaleinganggang,b%, = ,readdigi&
    schreibdigi&=setdigi(d%)
    locate 18,10
    print Digitalkanalausgang,d%, = ,schreibdigi&
    locate 22,10
    print Kartenadresse:,kartenadresse&
    waitinput
    schreibanalog&=analogout(e%)

endwhile

waitinput
clearalldigital()
clearallanalog()
closedevice()
freedll dllh&
../funktionsreferenzen/XProfan/end/'>end

Gruß Detlef Tussing
Windows XP, XProfan 10

15.06.2007 ▲

Vollständiges Zitat

Absatzweise Cita Zeilenweise Cita

Uwe
Skärke

... Yo el Ver código fuente de David veces ausprobiert, habe el gleiche Problema como en mi eignen Programa, en el Intgerpretermodus se ejecuta alles bestens, (voluntad con el Karte media Atennenrotor steuern), pero si Yo ne EXE draus mache, va garnichts, o. kommt como Portadresse -2 (minus zwei) ?????

Uwe

TOSHIBA TECRA S1 / PROFAN 7.0

24.11.2007 ▲

Vollständiges Zitat

Absatzweise Cita Zeilenweise Cita

◄