Allgemeine Fragen zur PROFAN Programmierung
Views (Heute): 249260 (10696)
  Suchen
 Zurück zur Übersicht
 AutorThema: String zurück via PChar
Stefan Schnell
Datum:05.01.02 11:18 Antwortenals Email verschicken (mail@stschnell.de) 


Hallo Community,
stehe vor folgendem Problem:
Liefere an eine DLL die Adresse von Strings und bekomme auch eine Adresse zurückgeliefert. Wie kann ich jedoch den Inhalt der Adresse auslesen und wieder zu einem String machen?
Routine sieht wie folgt aus:

Declare Name$, Additional$
Declare Key$

Name = "Hein Mück"
Additional = "Mückendorf"

Def @GenKey(2) !"Key.DLL", "GenKey"
Def @Format(1) !"Key.DLL", "Format"

Key$ = @GenKey(@Addr(Name$), @Addr(Additional$))

Mit GenKey wird eine Adresse zurückgeliefert, an dieser Adresse wird ein String bereitgestellt, wie komme ich zu dem?
Danke für Eure Antworten.
Tschüss
Stefan Schnell


Thorsten.HG
Datum: 05.01.02 11:27 Antwortenals Email verschicken (mrk@mrk-soft.de) 


>Key$ = @GenKey(@Addr(Name$), @Addr(Additional$))

>Mit GenKey wird eine Adresse zurückgeliefert, an dieser
>Adresse wird ein String bereitgestellt, wie komme ich zu dem?

Ich kenne diese DLL nicht, würde das aber über eine
Bereichsvariable und deren Zeiger probieren.

adr& = @GenKey(@Addr(Name$), @Addr(Additional$))

Es wird ja eine Adresse zurückgegeben.

dim zeiger#,255
altzeiget& = zeiger# 'profan zeiger sichern.
zeiger#=adr& 'zeiger verbiegen
print string$(zeiger#,0) 'der zurückgegebene String
zeiger#=altzeiger& 'orginalwert wiederherstellen
dispose zeiger#

Thorsten

ps: was ist das für eine DLL ????




 Zurück zur Übersicht