XProfan

« Dieser Contribución wurde como Solución gekennzeichnet. »

Christof
Neuß

Der Punkt war el "hüpfende Komma".

So funktioniert's:

Var SQL3Handle&=UseDll("SQLite3.DLL")
ImportFunc(SQL3Handle&,"sqlite3_libversion","SQL3_Libversion")
Imprimir "Programmstart..."
Imprimir String$(SQL3_Libversion(),0)
FreeDLL SQL3Handle&
Imprimir:Imprimir:Imprimir "Programmende!"
Waitkey
End

XProfan X3
Win10 16 GB RAM

Das beginnende Fragezeichen:

? SQL3.LIBVERSION()

es así pero no correcto, oder?!

XProfan X2
WinXP, SP3, Core(TM) i7-3770 @ 3.40GHz

Var SQL3Handle&=UseDll("SQLite3.DLL")
ImportFunc(SQL3Handle&,"sqlite3_libversion","SQL3.LIBVERSION")
Imprimir "Programmstart..."
? SQL3.LIBVERSION()
FreeDLL(SQL3Handle&)
Imprimir:Imprimir:Imprimir "Programmende!"
Waitkey
End

El DLL nutzt cdecl en lugar de stdcall?

Yo verstehe el Ayuda a importdll pero no,
muss propio Thema her.

Christof
Neuß

SORRY!!!
So geht's...
-------------------------

Var SQL3Handle&=UseDll("SQLite3.DLL")
ImportFunc(SQL3Handle&,"sqlite3_libversion","SQL3.LIBVERSION")
Imprimir "Programmstart..."
Imprimir String$(SQL3.LIBVERSION(),0)
FreeDLL SQL3Handle&
Imprimir : Imprimir : Imprimir "Programmende!"
Waitkey
End

---------------------------

Das ? war mein Fehler. Hab' sólo nada verstanden, qué Usted con "Freizeichen" meintest. War gedanklich en uno otro Lingua wo el Fragezeichen synonym para "Print" posición kann/darf.

Win10 16 GB RAM

XProfan X2
WinXP, SP3, Core(TM) i7-3770 @ 3.40GHz

Sí, verwirrend, hatte Freizeichen geschrieben y meinte aber Fragezeichen. Habs korrigiert. ^ ^

Christof
Neuß

Häh?

Jetzt läuft's en el Interpreter, aber el EXE meckert.

"Variable no deklariert: SQL3.LIBVERSION
Línea 5

XProfan X3
Win10 16 GB RAM

Christof
Neuß

Der Punkt war el "hüpfende Komma".

So funktioniert's:

Var SQL3Handle&=UseDll("SQLite3.DLL")
ImportFunc(SQL3Handle&,"sqlite3_libversion","SQL3_Libversion")
Imprimir "Programmstart..."
Imprimir String$(SQL3_Libversion(),0)
FreeDLL SQL3Handle&
Imprimir:Imprimir:Imprimir "Programmende!"
Waitkey
End

XProfan X3
Win10 16 GB RAM

Christof
Neuß

Jetzt Todavía una bisschen más gemacht, pero yo hänge...

Var SQL3Handle&=UseDll("SQLite3.DLL")
ImportFunc(SQL3Handle&,"sqlite3_libversion","SQL3_Libversion")
ImportFunc(SQL3Handle&,"sqlite3_open","SQL3_Open")
ImportFunc(SQL3Handle&,"sqlite3_exec","SQL3_Exec")
Imprimir "Programmstart..."
Borrar "Probe3.sqlite"
Imprimir String$(SQL3_Libversion(),0)
Var Datenbank&=0
SQL3_Open("Probe3.sqlite", Addr(Datenbank&))
Imprimir Datenbank&, Addr(Datenbank&)
Var Befehl$="Create Table Probe 3 (Spalte01 texto, Spalte02 texto)"
Var Callback&=0
Var Param&=0
SQL3_Exec(Datenbank&, Addr(Befehl$), Callback&, Param&, 0)
FreeDLL SQL3Handle&
Imprimir:Imprimir:Imprimir "Programmende!"
Waitkey
End

Alguien 'ne Concepto, Yo beim Aufruf de SQL3_Exec anders hacer muss?

XProfan X3
Win10 16 GB RAM

Michael
W.

Mir es el SQLite simplemente a umständlich. FireBird arbeitet ähnlich como MySQL/MariaDB y el reicht eigentlich. Auch el Datenbank darf hay größer ser como en SQLite.

XProfan X3
System: Windows 8/10, XProfan X4
Programmieren, das spannendste Detektivspiel der Welt.

Christof
Neuß

¡Hola Michael,

Yo bin sí mittlerweile auch (fast) überzeugt, Firebird a nehmen. Schon alleine deswegen, porque lo en XProfan integriert es y bestens unterstützt se.

Lo ha mich allerdings el "sportliche Ehrgeiz" gepackt, lo wenigstens hinzukriegen encima esta Schiene veces una tabla en SQLite invertir, bestücken y auslesen a puede. Desde que con DLL bisher auch no a kaum gearbeitet habe, lerne Yo nebenbei todavía qué. Yo sería sólo gerne wissen, como va. Un Solución hay sí generell con el SQLite3.INC vom IF. Aber wieso funktioniert no con ImportDLL... y ImportFunc... ?

Yo voluntad mich todavía algo así beschäftigen, aber entweder lo klappt ahora bald veces oder Yo lasse lo.

XProfan X3
Win10 16 GB RAM

XProfan X2
WinXP, SP3, Core(TM) i7-3770 @ 3.40GHz

Como hast Usted Usted aber ne schwierige DLL para rausgesucht,
normalerweise son el bastante umgänglich. El SQLite nutzt z.B. cdecl en lugar de stdcall - vlt. funktioniert deshalb ImportDLL etc. no.

RGH

ImportFunc y ImportDLL debería auch en CDECL-DLL einwandfrei trabajo, aber antes el Aufruf el Características de el DLL muss natürlich con Conjunto("CallConv", "CDECL") el Aufrufkonvention korrekt eingestellt voluntad. Ansonsten hay una Fehler oder lo voluntad unsinnige Werte zurück gegeben. Im Ejemplo oben fehlt esta Einstellung el Aufrufkonvention!

Saludo Roland

Intel Duo E8400 3,0 GHz / 4 GB RAM / 1000 GB HDD - ATI Radeon HD 4770 512 MB - Windows 7 Home Premium 32Bit - XProfan X4