Strings sind doch auch nur Arrays

[teks]

Nabend PB gemeinde,

Ich habe folgende Frage:
Ist es in PB möglich sowie in C++ eine Zeichenkette Char für Char auszulesen?
z.b. habe ich den String,

Test$="Das ist ein Test"

und möchte nun das Symbol an Position 2 des Strings ausgeben.
Also in etwa so:

Debug(Test[2])

Würde es funktionieren,würde man im Debugger nun lesen können:
"s"
(0=D,1=a,2=s!!)

Ich weiss, dass das nicht funktioniert aber mich würde interessieren ob es eine Möglichkeit gibt das zu erreichen?

danke

[ts-soft]

Reicht den

Code: Alles auswählen

Debug Mid(Test$, 2, 1)

nicht?

[Kaeru Gaman]

yo, natürlich geht auch was mit pointern...
aber wenn es nicht unbedingt nötig ist, sollte man lieber native stringfunktionen verwenden.

[teks]

jo danke hab das inzwischen einfach mid Mid gemacht auch wenn ich das nicht sooo bequem finde, aber besser als nix
danke

[marco2007]

Ich glaube, da könnte das Beispiel von NTQ weiterhelfen:

http://www.purebasic.fr/german/viewtopi ... chnapszahl

[Kaeru Gaman]

also, ich finde es bequemer,
als einen mit Char strukturierten, als Array angelegten Pointer mit dem Stringpointer gleichzuschalten,
um darüber auf einzelne Zeichen zuzugreifen.

in C ist ein string nativ ein Chararray.
in Basic ist ein String ein nativer Typ, und man muss rumschrauben, um auf ihn als Chararray zuzugreifen.

[marco2007]

Geb Dir vollkommen recht. Mir ist nur das Beispiel eingefallen, weil ich mal probierte, eine schnellere Variante zu machen.

zur Info: Meine war die langsamste

[hjbremer]

ich glaube du meinst so etwas

wegen der unterschiedlichen internen Stringverwaltung von C zu PB funktioniert das so nur mit Fixstrings

im folgenden Beispiel sollte der Zugriff über text\c[ ] den Index 99 nicht überschreiten.

Code: Alles auswählen

Structure stringfeld
 StructureUnion
 s.s{100}
 c.c[0]    ;0 - 99 = 100 in diesem Fall
 EndStructureUnion
EndStructure 

text.stringfeld

text\s = "Hallo"
Debug text\c[4]  ;ergibt 111 für das o in Hallo, ab null gezählt

text\s = "Alles Banane"
Debug text\c[7]

das folgende Beispiel funktioniert zwar, aber nur solange korrekt, wie der String von PB intern nicht verschoben wird !!!
Da ich nicht weiß, wie die interne Stringverwaltung genau funktioniert, sind die folgenden beiden Methoden wohl recht unsicher.

Code: Alles auswählen

Structure stringfeld2
 c.c[0]
EndStructure


txt$ = "Hallo"

*t.stringfeld2 = @txt$
Debug *t\c[4]

*t.stringfeld2 = @"Hallo"
Debug *t\c[4]

Vielleicht kann ja mal einer der PB-Gurus uns die Stringverwaltung nahebringen

Das einfachste ist aber folgendes

Code: Alles auswählen

txt$ = "Hallo"

Debug PeekC(@txt$+4)

[Kaeru Gaman]

> wegen der unterschiedlichen internen Stringverwaltung von C zu PB funktioniert das so nur mit Fixstrings

nein, das ist so nicht richtig....

man kann einen strukturierten pointer mit nem array erzeugen,
und den dann auf den String verbiegen, das funktioniert, da bin ich sicher.

...aber ich weiß nicht genau wie, und finde mal ein stückchen code über die forensuche....

irgendwie so was ähnliches:

Code: Alles auswählen

*chararray.c[0] = a$
Debug *chararray[12]

aber das hier funktioniert eben nicht...

das muss so ähnlich funktionieren, wie ein strukturierter pointer auf einen allocierten speicherbereich...

[hjbremer]

Fixstrings sind im Prinzip nix anderes als allocierter Speicher

also im Grunde folgendes

Code: Alles auswählen

Structure charfeld
 c.c[0]
EndStructure

a.s{100}

a = "Hallo hier bin ich"

*chararray.charfeld = @a 
Debug *chararray\c[12]

und einen Pointer, egal ob strukturiert oder nicht auf einen String verbiegen, funktioniert nur 100 prozentig wenn es ein Fixstring ist, denn die werden nicht verschoben, soviel ich weiß. Aber das verbiegen, siehe oben, macht selten Sinn finde ich, außer für die unter uns, die es von C gewohnt sind. Urbasicer nehmen PeekC.