Das deutsche QBasic- und FreeBASIC-Forum

[Dominik]

Hi, du sagst folgendes funktioniert ohne Probleme?

[tom_verbatim]

hi,

also

[Jojo]

Sein Code ist vollkommen richtig. zeige mal den rest von der datei...
_________________
» Die Mathematik wurde geschaffen, um Probleme zu lösen, die es nicht gäbe, wenn die Mathematik nicht erschaffen worden wäre.

[tom_verbatim]

Hi,

es erscheint immerwieder folgende Fehlermeldung



c:\Programme\FreeBASIC\bin\dlltool.exe: Syntax error in def file testdll.def:1

, wenn ich in der Eingabeaufforderung in
c:\Programme\FreeBASIC\fbc.exe testdll.bas -dylib eingebe


REM FREEBASIC TESTPROGRAMM testdll.bas
#include "windows.bi"

Sub FunktionInLib(Text As String)
Dim txt As String = Text
Screen 20
Print txt
End Sub


;-(

[Dominik]

Hallo,

das ist wirklich merkwürdig...
Die gleiche Fehlermeldung erscheint auch bei mir.
Diese kann zwar dadurch behoben werden, dass man "EXPORT" hinter
"Sub FunktionInLib(Text As String)" schreibt, aber das ist doch nicht Sinn der Sache!?

Hat jemand eine Ahnung was diesen Fehler hervorruft?
Komisch ist auch, dass jede andere Funktion, die man noch hinzufügt, kein EXPORT mehr benötigt.

@tom_verbatim
Funktioniert es jetzt bei dir, wenn du EXPORT hinzufügst?
Ggf. musst du auch noch den "-export"-Parameter bei der Kompilierung an fbc.exe übergeben.

Gruß
Dominik

[tom_verbatim]

hi dominik,

ja compilieren läßt sich das jetzt, aber irgendwie bekomme ich jetzt unter visual basic 5 eine fehlermeldung, daß er den dll einstiegsprung nicht findet...

wie sollte man das denn jetzt im modul deklarieren ?
ich weiß irgendwie was mit alias @ aber keine ahnung wohin damit ??

[volta]

Hi,
ich habe das mal als dll erstellt (EXPORT ist dabei notwendig) und mangels VB nur mit FB ausprobiert.
(alles unter ME und FB0.16b getestet)
1. Version mit MessageBox funktioniert.
2. Version mit SCREEN hängt sich auf.
Was mir dabei auffiel war, wie wird das mit SCREEN erstellte Fenster gesteuert/geschlossen?
3. Version

[tom_verbatim]

hi volta,



danke für deine mühe...

hat jemand eine idee, wie man die sub in visual basic declarieren muß???

das ist jedenfalls quark und läuft nicht, findet keinen einstiegspunkt; wie schon erwähnt....


arrrrggggg....... man das wäre so genial, wenn das laufen würde......

und wenn nicht, kaufe ich mir ein zx81 und programmiere denn

[volta]

Vorschlag (aber ungetestet):
die SUB in der dll so deklarieren

[tom_verbatim]

hi volta,


ja, so läuft das, NUR, nachdem die dll aufgerufen wurde und der text im fenster gezeichnet wurde, verabschiedet sich die ide+prg nach dem sleep
;-((( kommt zwar keine fehlermeldung oder hänger aber alles sauber beendet....aaarrgggh das programm soll doch weiterlaufen...
okay, habe dann mal das end weggenommen
und folgendes probiert

[PMedia]

hm.
Andere Idee: (denk ich ma funzt wesentlich besser)

Stell von VB ein Fenster bereit, und zeichne per WinAPI aus FreeBasic in das HDC des VB-Fensters.
Die (übrigens in ASM geschriebene DLL) ProSpeed.DLL macht das so und funzt einwandfrei in jeder Sprache...

[volta]

'Bad DLL calling convention' hmm...

[tom_verbatim]

@Volta
ich sag nur:
Run-time error "453"
Can?t find Dll entry point FunktioninLib in c:\testdll.dll


@PMedia

hast du dafür evtl. einen beispielcode ?
bin da etwas überfragt; ich dachte ja jetzt wauuuhhh, freebasic wie einfach doch, daß in die dll und alles (naja fast alles) ist EASY machbar...

aber easy wandelt sich langsam zu frusty


gruß tom

[PMedia]

Einen Beispielcode habe ich nicht, aber ich kann dich zum Programmierer der ProSpeed weiterleiten. Der kann dir sicher weiterhelfen.

Frank Abbing (Website)
mail@frabbing.de - Frank Abbing (E-Mail)

[Xardas]

wenn mich nicht alles täuscht musst du die vb-fenster unsichtbar machen bevor du die screen-function aus fb nutzt.
also formx.visible=false

[tom_verbatim]

@Xardas
visible oder not visible hat KEINEN EINFLUß
;-(

@PMedia
Danke für den Link ProSpeed.dll wauuuhhhhh, würde ich jetzt gerne in visual basic einbauen; nur wie deklarieren? hast du da zufällig die ahnung von?
hab zwar schon eine email raus an herrn abbing, aber man weiß ja nie, wie lange da da eine antwort auf sich warten läßt ;-(


gruß tom

[PMedia]

Wieso denn das?
Es ist doch ein eigenständiges Fenster, und die HWnd-Variable wird sich schon nicht überschreiben. Oder?

[tom_verbatim]

@PMedia
??? hääää ich glaube irgendwie steh ich auf dem schlauch oder ist das jetzt einfacher als gedacht ?

jedenfalls die prodll muß ich doch als ersten schritt erstmal declarieren oder nicht ?
so in etwa oder nicht ? Public Declare Sub FunktionInLib Lib "c:\ProSpeed.dll" ()

so, die ganzen funktionen der Prospeed Lib muß ich doch auch noch deklarieren oder nicht?
kann doch nicht so einfach drauf los programmieren ?

habe im beispielcode der lib in der anleitung zu stehen für profan wohl
Beispiel:

exhdc&=CreateExtBmp(breite&,hoehe&) 'Leere Bitmap in der Größe des
'Bildschirms erzeugen
CopyExtBmp(exhdc&,0,0,breite&,hoehe&,%HDC,0,0,0) 'Inhalt des Profanfensters hierhin kopieren
array&=InitExtFX(exhdc&) 'Handle (Byte-Array) zu einer Bitmap 'erzeugen
...
FreeExtFX(array&) 'später wieder freigeben

???wie soll ich das denn in vb5 umsetzen ?

gruß thomas

[PMedia]

Jo, des is ganz einfach, da ich früher in Profan programmiert hab
Sämtliche Funktionen die du da siehst gehören zu der ProSpeed.dll (welche übrigens endlich kostenlos ist)
Soll heißen, du solltest ersteinmal die ProSpeed_Funktionen.inc umsetzen nach VB. Der Rest sollte mit dem Handbuch ein Kinderspiel sein.
Ich wollt schon längst ne Include für FB schreiben, war bisher aber immer zu faul.

Fest steht, die ProSpeed.dll funktioniert, und zwar mit jeder Programmiersprache die DLL's nutzt.
Ich kann kein VB, kann dir aber sagen, dass wenn du die ProSpeed zur Grafikgenerierung nimmst, damit fast so glücklich wirst, wie mit DirectDraw, 3D wird leider nicht unterstützt (aber dafür gibs ja PSA3D ), und fast auch nur weil es nicht Hardwarebeschleunigt ist.

Es war ein Vorschlag, wenn du 2Dimensionales machen willst.
Für 3D empfehle ich dir, es ganz in einer Sprache zu machen.
OpenGL müsste auch in VB möglich sein.
Wenn nicht: so schwer ist FB nu auch wieder nich

//Edit:
Für alles ist jedoch wichtig, das HDC deines Hauptfensters zu kennen.
In Profan ist dies möglich durch die Systemvariable %HDC, welches aber auch nur den Wert einer API-Funktion zurückliefert. Ich empfehle dir, Frank Abbing anzuschreiben, er wird dir sicher genaue Auskunft geben.

[volta]