Vorheriges Thema anzeigen :: Nächstes Thema anzeigen |
Autor |
Nachricht |
Kai Bareis
Anmeldungsdatum: 10.09.2004 Beiträge: 545 Wohnort: Baden Würtemberg
|
Verfasst am: 05.06.2005, 21:25 Titel: |
|
|
Ich habs grad eben nochmal probiert jetzt klappt es komischerweise. _________________ MfG Kai Bareis
Es ist noch kein Meister vom Himmel gefallen! Warum einfach wens auch umständlich geht! |
|
Nach oben |
|
|
volta
Anmeldungsdatum: 04.05.2005 Beiträge: 1874 Wohnort: D59192
|
Verfasst am: 06.06.2005, 09:39 Titel: Systemtreiber bei Neustart oder Benutzerwechsel nicht aktiv? |
|
|
Hallo,
wenn ich die Beschreibung der inpout32.dll richtig interpretiere, dann wird geprüft unter welcher Windowsversion sie arbeiten soll.
1. unter 95,98,ME verzweigen die inp32/out32 Routinen auf einfache inlineASM - Anweisungen, wie ich sie oben auch erstellt habe.
2. unter NT, W2k, XP wird ein Systemtreiber installiert (daher notwendigerweise als Admin) der zwischen Kernelebene und Benutzerebene Daten austauschen kann.
Ist dieser Systemtreiber, der in der DLL versteckt ist, einmal installiert, kann er auch ohne Admin - Rechte benutzt werden.
Das Letztere hat, nach meinen Erfahrungen, leider nicht immer funktioniert.
Möglicherweise wird der Systemtreiber bei Neustart oder Benutzerwechsel nicht aktiviert?
Gruß
Volta _________________ Warnung an Choleriker:
Dieser Beitrag kann Spuren von Ironie & Sarkasmus enthalten.
Zu Risiken & Nebenwirkungen fragen Sie Ihren Therapeuten oder Psychiater. |
|
Nach oben |
|
|
Mr_T aka FtFanmaster
Anmeldungsdatum: 26.12.2004 Beiträge: 103 Wohnort: Speyer
|
Verfasst am: 08.06.2005, 14:07 Titel: |
|
|
Hallo,
bei mir läuft das mit der inpout32.dll nicht. Obwohl sie im gleichen Verzeichnis wie FB sowie in sämtlichen Windows Ordnern liegt bekomme ich die Fehlermeldung "Die erforderliche .DLL-Datei C:FREEBASICINPOUT32.DLL wurde nicht gefunden".
Hat irgendwer eine Lösung? Ich nutze Win98 sowie WinXP. |
|
Nach oben |
|
|
Mr_T aka FtFanmaster
Anmeldungsdatum: 26.12.2004 Beiträge: 103 Wohnort: Speyer
|
Verfasst am: 08.06.2005, 14:07 Titel: |
|
|
Hallo,
bei mir läuft das mit der inpout32.dll nicht. Obwohl sie im gleichen Verzeichnis wie FB sowie in sämtlichen Windows Ordnern liegt bekomme ich die Fehlermeldung "Die erforderliche .DLL-Datei C:FREEBASICINPOUT32.DLL wurde nicht gefunden".
Hat irgendwer eine Lösung? Ich nutze Win98 sowie WinXP.
Mfg
FtFanmaster |
|
Nach oben |
|
|
volta
Anmeldungsdatum: 04.05.2005 Beiträge: 1874 Wohnort: D59192
|
Verfasst am: 08.06.2005, 21:04 Titel: |
|
|
Hallo,
die Fehlermeldung
Zitat: | "Die erforderliche .DLL-Datei C:FREEBASICINPOUT32.DLL wurde nicht gefunden". |
deutet auf fehlende Zeichen, wenn du sie nicht nur hier vergessen hast aufzuschreiben.
Es sollte sonst Zitat: | C:\FREEBASIC\INPOUT32.DLL | lauten.
Schau noch einmal genau danach.
Gruß
Volta _________________ Warnung an Choleriker:
Dieser Beitrag kann Spuren von Ironie & Sarkasmus enthalten.
Zu Risiken & Nebenwirkungen fragen Sie Ihren Therapeuten oder Psychiater. |
|
Nach oben |
|
|
Mr_T aka FtFanmaster
Anmeldungsdatum: 26.12.2004 Beiträge: 103 Wohnort: Speyer
|
Verfasst am: 09.06.2005, 06:35 Titel: |
|
|
Hallo.
Nein, nach dem Pfad und den einzelnen Zeichen hab ich auch schon gesucht (eben gerade erneut). Bringt leider alles nix.
Mfg
FtFanmaster |
|
Nach oben |
|
|
volta
Anmeldungsdatum: 04.05.2005 Beiträge: 1874 Wohnort: D59192
|
Verfasst am: 09.06.2005, 11:46 Titel: Fehlermeldung? |
|
|
Hallo,
woher bekommst du die Fehlermeldung?
Von FBC bei der Compilierung?
Von dem erstellten eigenen Programm (XYZ.EXE)?
Wenn möglich, mach mal nähere Angaben.
Gruß
Volta _________________ Warnung an Choleriker:
Dieser Beitrag kann Spuren von Ironie & Sarkasmus enthalten.
Zu Risiken & Nebenwirkungen fragen Sie Ihren Therapeuten oder Psychiater. |
|
Nach oben |
|
|
Mr_T aka FtFanmaster
Anmeldungsdatum: 26.12.2004 Beiträge: 103 Wohnort: Speyer
|
Verfasst am: 09.06.2005, 13:40 Titel: |
|
|
Direkt bei der Kompilierung deines Beispielprogramms und bei einer EXE von Selbigem:
Code:
Option Explicit
'$inclib: 'inpout32'
declare function InPort cdecl alias "Inp32" (byval PortAddress as integer) as integer
declare sub OutPort cdecl alias "Out32" (byval PortAddress as integer, byval data as integer)
Dim Old As UByte, LSB As UByte, MSB As UByte, PPort As UByte
Dim herz As Short
Dim Divisor As Integer
Dim Zeit As Double, sec As Double
sec = 2 'Tondauer
herz = 440 'Frequenz
Divisor = 1193180 / herz
LSB = Divisor MOD 256
MSB = Divisor \ 256
Old = InPort(&H61) '8255 PPI chip. Save the original.
OutPort (&H43, 182) '8253 Timer chip. 10110110b Channel 2, mode 3
PPort = InPort(&H61) 'get the 8255 port contents.
OutPort (&H61, PPort OR 3)'enable the speaker and use channel 2.
OutPort (&H42, LSB) 'Output Frequency Lo and Hi Byte
OutPort (&H42, MSB)
Zeit = TIMER 'Wait until Zeit elapsed
While Timer < Zeit + sec
Wend
OutPort (&H61, Old) 'turn it off.
sleep
'
Mfg
FtFanmaster |
|
Nach oben |
|
|
volta
Anmeldungsdatum: 04.05.2005 Beiträge: 1874 Wohnort: D59192
|
Verfasst am: 09.06.2005, 23:08 Titel: |
|
|
Hallo,
wenn ich das richtig lese, dann wird eine XYZ.exe erstellt, die beim Aufruf die DLL nicht findet und eine Fehlermeldung Zitat: | C:FREEBASICINPOUT32.DLL wurde nicht gefunden | ausgibt.
Da die XYZ.exe erstellt wird, ist wohl der Quellcode richtig.
Wenn die DLL im gleichen Verzeichnis wie die XYZ.exe sich befindet, sucht sie evtl die falsche Datei?
Darauf deutet die Fehlermeldung, evtl. wird eine Datei "FREEBASICINPOUT32.DLL " gesucht und natürlich nicht gefunden?
Aber wo liegt da bei dir der Fehler????
Gruß
Volta _________________ Warnung an Choleriker:
Dieser Beitrag kann Spuren von Ironie & Sarkasmus enthalten.
Zu Risiken & Nebenwirkungen fragen Sie Ihren Therapeuten oder Psychiater. |
|
Nach oben |
|
|
Mr_T aka FtFanmaster
Anmeldungsdatum: 26.12.2004 Beiträge: 103 Wohnort: Speyer
|
Verfasst am: 10.06.2005, 06:21 Titel: |
|
|
Zitat: | evtl. wird eine Datei "FREEBASICINPOUT32.DLL " gesucht |
Das war der interessante Punkt!
Ich habe jetzt die inpout32.dll umbenannt in freebasicinpout32.dll und das Programm läuft.
Vielen Dank!
Mfg
FtFanmaster |
|
Nach oben |
|
|
volta
Anmeldungsdatum: 04.05.2005 Beiträge: 1874 Wohnort: D59192
|
Verfasst am: 10.06.2005, 12:05 Titel: |
|
|
Prima,
dann weist du ja schon mal das es läuft.
Aber für zukünftige Programme kannst du das ja so nicht lassen.
Von irgendwo muß die XYZ.exe doch diese falsche Bezeichnung her haben.
Mit welchem Editor/IDE arbeitest du?
Sind in den Optionen dieser IDE irgendwo Pfadangaben einzustellen?
Fehlt dort evtl. ein "\" ? zB. C:FREEBASIC statt C:\FREEBASIC\ ???
Gruß
Volta _________________ Warnung an Choleriker:
Dieser Beitrag kann Spuren von Ironie & Sarkasmus enthalten.
Zu Risiken & Nebenwirkungen fragen Sie Ihren Therapeuten oder Psychiater. |
|
Nach oben |
|
|
Mr_T aka FtFanmaster
Anmeldungsdatum: 26.12.2004 Beiträge: 103 Wohnort: Speyer
|
Verfasst am: 10.06.2005, 12:55 Titel: |
|
|
Hallo.
Ich benutze "FBIde33a+FBC012" und der Editor verlangt keine Optionen oder Pfadeinstellungen und die "\" hab ich auch nirgendwo vergessen. Ich habe alles mehrfach geprüft.
Mfg
FtFanmaster |
|
Nach oben |
|
|
Kai Bareis
Anmeldungsdatum: 10.09.2004 Beiträge: 545 Wohnort: Baden Würtemberg
|
Verfasst am: 10.06.2005, 19:10 Titel: |
|
|
Hast du etwa bei dem Inclib freebasicinpout32 stehen?
Eventuell mag der den Backslash nicht. _________________ MfG Kai Bareis
Es ist noch kein Meister vom Himmel gefallen! Warum einfach wens auch umständlich geht! |
|
Nach oben |
|
|
Mr_T aka FtFanmaster
Anmeldungsdatum: 26.12.2004 Beiträge: 103 Wohnort: Speyer
|
Verfasst am: 11.06.2005, 08:43 Titel: |
|
|
Zitat: | Hast du etwa bei dem Inclib freebasicinpout32 stehen?
|
Nein. Da steht ganz einfach "inpout32".
Mfg
FtFanmaster |
|
Nach oben |
|
|
Mr_T aka FtFanmaster
Anmeldungsdatum: 26.12.2004 Beiträge: 103 Wohnort: Speyer
|
Verfasst am: 13.06.2005, 21:47 Titel: |
|
|
Nächstes Problem: Ich kann InPort und OutPort nur je 54 mal in einem Programm aufrufen (z.B. in einer For-Next-Schleife). Beim Nächsten Aufruf gibt er die Fehlermeldung: Diese Anwendung wird aufgrund eines ungültigen Vorganges eschlossen.
Code: |
Option Explicit
'$inclib: 'inpout32'
declare function InPort cdecl alias "Inp32" (byval PortAddress as integer) as integer
declare sub OutPort cdecl alias "Out32" (byval PortAddress as integer, byval data as integer)
Dim lp as Long
Dim bt as Long
For lp = 1 to 10
For bt = 0 to 200
OutPort (888, bt)
Sleep 20
Locate 1, 1: Print "Bit Output: "; bt; " "
If inkey$ <> "" then End
Next bt
Next lp
Sleep
End
|
Mfg
FtFanmaster |
|
Nach oben |
|
|
Kai Bareis
Anmeldungsdatum: 10.09.2004 Beiträge: 545 Wohnort: Baden Würtemberg
|
Verfasst am: 13.06.2005, 22:08 Titel: |
|
|
Oh das ist mir letztens auch aufgefallen als ich meine LCD software umschreiben wollte dort brach das Programm auch nach ein paar Outputs ab und dann hab ich noch festgestellt das das ganze irgentwie Variablen verändert hat bzw dadurch die For Next schleife nicht mehr richtig funktioniert hat funktioniert. _________________ MfG Kai Bareis
Es ist noch kein Meister vom Himmel gefallen! Warum einfach wens auch umständlich geht! |
|
Nach oben |
|
|
volta
Anmeldungsdatum: 04.05.2005 Beiträge: 1874 Wohnort: D59192
|
Verfasst am: 15.06.2005, 22:39 Titel: |
|
|
Sch.....ade
stimmt, das Programm bricht nach mehrfachen Aufrufen der Funktion/Sub mit Fehlermeldung ab.
Kann nur an der Deklaration liegen, dieses cdecl lag mir immer quer im Magen aber ohne lief es nicht. In VB wurde es nicht benutzt und damit sollte es in FB auch nicht nötig sein.
Aber bei allen Experimenten ohne cdecl bekam ich schon beim Kompilieren Fehler angezeigt. Einmal kam dann unerwartet das "inp32@4" und "out32@8" nicht gefunden wurden ???
Warum nicht? Die def-Datei falsch?
Versuch: "inpout32.dll.def" Code: | LIBRARY "inpout32.dll"
EXPORTS
Inp32@4
Out32@8 |
Neue Batch: Code: | C:\Freebasic\bin\win32\dlltool.exe -k -d C:\Freebasic\inpout32.dll.def -D C:\Freebasic\inpout32.dll -l C:\Freebasic\libinpout32.dll.a |
(Das ist eine Zeile!!) Dlltool bekommt die Option -k wie für win32-DLLs.
Code: | Option Explicit
'$inclib: 'inpout32'
declare function InPort alias "Inp32" (byval PortAddress as integer) as integer
declare sub OutPort alias "Out32" (byval PortAddress as integer, byval data as integer)
Dim lp as Long
Dim bt as Long
For lp = 1 to 10
For bt = 0 to 200
OutPort (888, bt)
Sleep 20
Locate 1, 1: Print "Bit Output: "; bt; " "
If inkey$ <> "" then End
Next bt
Next lp
Sleep |
Und ohne cdecl läuft es jetzt.
Jedenfalls unter w2k, XP konnte ich noch nicht testen.
Gruß
Volta _________________ Warnung an Choleriker:
Dieser Beitrag kann Spuren von Ironie & Sarkasmus enthalten.
Zu Risiken & Nebenwirkungen fragen Sie Ihren Therapeuten oder Psychiater. |
|
Nach oben |
|
|
Mr_T aka FtFanmaster
Anmeldungsdatum: 26.12.2004 Beiträge: 103 Wohnort: Speyer
|
Verfasst am: 16.06.2005, 19:34 Titel: |
|
|
Shit! Bei mir läuft es immer noch nicht: "Undefinied reference to Out32@8".
Ich weiß langsam nicht mehr was ich noch tun soll...
Mit verzweifelten Grüßen
FtFanmaster |
|
Nach oben |
|
|
code
Anmeldungsdatum: 19.01.2005 Beiträge: 154
|
Verfasst am: 17.06.2005, 13:33 Titel: |
|
|
ich hab nochmal eine andere frage. wenn ich funktionen aus einer dll einbinde, werden dann die funktionen beim compilen direkt in den code der exe eingebunden, oder muss die dll immer noch vorliegen? |
|
Nach oben |
|
|
PeterHarder
Anmeldungsdatum: 27.03.2005 Beiträge: 45 Wohnort: Deutschland
|
Verfasst am: 17.06.2005, 17:24 Titel: |
|
|
Die DLL muss in dem Fall immer mitgegeben werden, es sei denn, du bindest Funktionen aus einer Windowseigenen System-DLL ein, die zu Windows gehört und somit sowieso bei jeder Windows-Installation vorliegt, in dem Fall brauchst du die DLL natürlich nicht mitgeben. Systemeigene DLL's liegen in der Regel im Windows-Ordner "System" oder "System32", dort findet das Programm die DLL's dann automatisch. Selbst mitgegebene DLL's hingegen können auch im Installationsordner liegen bleiben, dann gibt es keine Versionskonflikte (könnte sonst passieren, wenn man sie in den Systemordner umkopiert und dort schon eine andere Version der gleichen DLL liegt).
Liebe Grüße
Peter _________________ Deutsche Mailingliste für freeBASIC: de.groups.yahoo.com/group/free-basic.
Zum Anmelden einfach eine leere E-Mail an free-basic-subscribe@yahoogroups.de senden. |
|
Nach oben |
|
|
|