Das deutsche QBasic- und FreeBASIC-Forum Foren-Übersicht Das deutsche QBasic- und FreeBASIC-Forum
Für euch erreichbar unter qb-forum.de, fb-forum.de und freebasic-forum.de!
 
FAQFAQ   SuchenSuchen   MitgliederlisteMitgliederliste   BenutzergruppenBenutzergruppen  RegistrierenRegistrieren
ProfilProfil   Einloggen, um private Nachrichten zu lesenEinloggen, um private Nachrichten zu lesen   LoginLogin
Zur Begleitseite des Forums / Chat / Impressum
Aktueller Forenpartner:

Umwandlung einer UDT-Variable zu STRING oder BYTE-Array

 
Neues Thema eröffnen   Neue Antwort erstellen    Das deutsche QBasic- und FreeBASIC-Forum Foren-Übersicht -> Allgemeine Fragen zu FreeBASIC.
Vorheriges Thema anzeigen :: Nächstes Thema anzeigen  
Autor Nachricht
Sebastian
Administrator


Anmeldungsdatum: 10.09.2004
Beiträge: 5969
Wohnort: Deutschland
BeitragVerfasst am: 11.08.2006, 19:54    Titel: Umwandlung einer UDT-Variable zu STRING oder BYTE-Array Antworten mit Zitat
Hallo,

ich suche eine Möglichkeit, eine Variable selbstdefinierten Typs in einen String oder ein Byte-Array umzuwandeln (Binärdaten), um dann daraus eine Prüfsumme zu berechnen. Man könnte natürlich manuell alle Werte des Typs einzeln in einen String speichern (z.B. testen$=var.foo+var.bar+var.xy+...), aber geht das nicht eleganter (z.B. test$=UDT2STR$(var))? Ich steh momentan irgendwie auf dem Schlauch. traurig

Viele Grüße!
Sebastian
_________________

Die gefährlichsten Familienclans | Opas Leistung muss sich wieder lohnen - für 6 bis 10 Generationen!
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden E-Mail senden Website dieses Benutzers besuchen
MisterD



Anmeldungsdatum: 10.09.2004
Beiträge: 3071
Wohnort: bei Darmstadt
BeitragVerfasst am: 11.08.2006, 21:39    Titel: Antworten mit Zitat
String dürfte eventuell schwierig werden, nen UDT wandelst du am besten in n byte ptr um:


Code:
function prüfsumme( var as myudt ) as integer
 dim summe as integer
 dim bytes as ubyte ptr
 bytes=cptr(ubyte ptr, @var)
 for n = 0 to len(myudt)-1
  summe+=bytes[n]
 next n
 return summe
end function


achtung: Funktioniert nur wenn der UDT keine Strings mit dynamischer länge enthält wobei es da eh compilerwarnungen hageln sollte..
_________________
"It is practically impossible to teach good programming to students that have had a prior exposure to BASIC: as potential programmers they are mentally mutilated beyond hope of regeneration."
Edsger W. Dijkstra
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden
Sebastian
Administrator


Anmeldungsdatum: 10.09.2004
Beiträge: 5969
Wohnort: Deutschland
BeitragVerfasst am: 11.08.2006, 21:44    Titel: Antworten mit Zitat
Danke, funktioniert wunderbar! lächeln
_________________

Die gefährlichsten Familienclans | Opas Leistung muss sich wieder lohnen - für 6 bis 10 Generationen!
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden E-Mail senden Website dieses Benutzers besuchen
Beiträge der letzten Zeit anzeigen:   
Neues Thema eröffnen   Neue Antwort erstellen    Das deutsche QBasic- und FreeBASIC-Forum Foren-Übersicht -> Allgemeine Fragen zu FreeBASIC. Alle Zeiten sind GMT + 1 Stunde
Seite 1 von 1

 
Gehe zu:  
Du kannst keine Beiträge in dieses Forum schreiben.
Du kannst auf Beiträge in diesem Forum nicht antworten.
Du kannst deine Beiträge in diesem Forum nicht bearbeiten.
Du kannst deine Beiträge in diesem Forum nicht löschen.
Du kannst an Umfragen in diesem Forum nicht mitmachen.

 Impressum :: Datenschutz