| Vorheriges Thema anzeigen :: Nächstes Thema anzeigen |
| Autor |
Nachricht |
28398
Anmeldungsdatum: 25.04.2008
Beiträge: 1917
|
 Verfasst am: 25.02.2010, 22:42 Titel: |
 |
|
| ZString (Ptr) |
|
| Nach oben |
|
 |
volta
Anmeldungsdatum: 04.05.2005
Beiträge: 1876
Wohnort: D59192
|
| Verfasst am: 25.02.2010, 22:55 Titel: |
|
|
jau 
| Code: | ...
Sub GetInputName Cdecl (ByVal Channel As Byte, InputName As ZString Ptr) Export
'Das Ergebnis dieser Funktion muss einen Text für die Beschriftungen
'jedes Eingangs (Channel) zurückliefern
InputName = @"E1" 'Der Eingangspin bekommt die Beschriftung E1
End Sub
|
_________________
Warnung an Choleriker:
Dieser Beitrag kann Spuren von Ironie & Sarkasmus enthalten.
Zu Risiken & Nebenwirkungen fragen Sie Ihren Therapeuten oder Psychiater. |
|
| Nach oben |
|
|
habe
Anmeldungsdatum: 23.02.2010
Beiträge: 17
|
| Verfasst am: 26.02.2010, 16:34 Titel: |
|
|
Hallo,
also das mit Cdecl geht doch wohl nicht, schade. Bekomme da Fehlermeldungen.
Das mit ZString Ptr funktioniert nur teilweise. Ich hab z.B. 3 Eingänge definiert, die folgende Bezeichnungen haben soll:
| Code: | 1 = AA
2 = BB
3 = CC |
Dann wird aber folgendes ausgegeben:
| Code: | SUB GetInputName (ByVal Channel AS Byte, InputName As ZString Ptr) EXPORT
1 = AA
2 = ABB
3 = ABCC
End Sub |
Es wird also immer das/die erste(n) Zeichen der vorherigen Eingänge davor gehängt.
Ich hab’s so gemacht
| Code: | SUB GetInputName (ByVal Channel AS Byte, InputName As ZString Ptr) EXPORT
Select Case Channel
Case 0
InputName[0] = "AA"
Case 1
InputName[1] = "BB"
Case 2
InputName[2] = "CC"
End Select
End Sub |
So geht es nicht, es wird nichts ausgegeben
| Code: | Select Case Channel
Case 0
InputName = @"AA"
Case 1
InputName = @"BB"
Case 2
InputName = @"CC"
End Select |
/edit dreael: Code-Tags ergänzt |
|
| Nach oben |
|
|
MOD
Fleißiger Referenzredakteur
Anmeldungsdatum: 10.09.2007
Beiträge: 1003
|
| Verfasst am: 26.02.2010, 16:46 Titel: |
|
|
Bitte verwende die code-tags.
Der Code liefert bei mir das gewünschte Ergebnis.
| Code: | SUB GetInputName (ByVal Channel AS Byte, InputName As ZString Ptr) Export
Select Case Channel
Case 0
InputName = @"AA":Print *InputName
Case 1
InputName = @"BB":Print *InputName
Case 2
InputName = @"CC":Print *InputName
End Select
End Sub |
|
|
| Nach oben |
|
|
habe
Anmeldungsdatum: 23.02.2010
Beiträge: 17
|
| Verfasst am: 26.02.2010, 19:48 Titel: |
|
|
| Also mit PL geht es nicht. Ich denke PL und FB vertragen sich nicht. |
|
| Nach oben |
|
|
|
FAQ
Suchen
Mitgliederliste
Benutzergruppen
Registrieren
Profil
Einloggen, um private Nachrichten zu lesen
Login
