String in Char konvertieren

[Chemiker]

Hallo,
ich habe ein Problem mit der Umwandlung von Zeichen aus einem String in eine Char Variable.

Delphi-Quellcode:

var
  strZeichen: String;
  caZ: Char;
begin
  strZeichen:= copy(strNormalText,i,1);
  caZ:= strZeichen[1]; // hier kommt eine Fehlermeldung.

Woran kann das liegen? Ist mit BDS 2006 kompiliert unter Win 7 64Bit.

Bis bald Chemiker

[Mithrandir]

Mit einem Typecast könnte es klappen:

Delphi-Quellcode:

var
  strZeichen: String;
  caZ: Char;
begin
  strZeichen:= copy(strNormalText,i,1);
  caZ:= Char(strZeichen[1]); // hier kommt eine Fehlermeldung.

[Namenloser]

Was ist i? Bist du sicher, dass i initialisiert ist? Eine andere Möglichkeit ist, dass strNormalText leer ist.
Edit: Ich würd den Code einfach mal mit dem Debugger durchsteppen, dabei immer auf die werte der Variablen achten.

[SirThornberry]

Warum nicht gleich:

Delphi-Quellcode:

strZeichen:= strZeichen[i];

Und welcher Fehler kommt? Eigentlich sollte das ohne Fehler compilieren. Und wann kommt der Fehler? beim compilieren oder beim ausführen?

[Chemiker]

Hallo Daniel G,

hatte ich schon probiert, funktioniert auch nicht.

Bis bald Chemiker

[alleinherrscher]

Hast du ganz sicher auch genug Zeichen im String gespeichert? Bei mir klappt dein Code wunderbar...(delphi 2005)

[Mithrandir]

DAnn wäre in der Tat mal die Fehlermeldung interessant zu wissen. ;)

[Wolfgang Mix]

Vielleicht klappt
Zeichen:= copy(strZeichen(1,1);

[Chemiker]

Hallo SirThornberry,

beim Ausführen.

Bis bald Chemiker

[Aphton]

Zitat:

Zitat von Wolfgang Mix

Vielleicht klappt
Zeichen:= copy(strZeichen(1,1);

:shock:
:roll:

Chemiker, probier das mal aus:

Delphi-Quellcode:

var
  i: Integer;
  strNormalText, strZeichen: String;
  caZ: Char;
begin
  i := 1;
  strNormalText := 'ABCD';
  strZeichen:= copy(strNormalText,i,1);
  caZ:= strZeichen[1]; // hier kommt eine Fehlermeldung.
  ShowMessage( strNormalText + '[' + IntToStr(i) + '] = ' + caZ );

Ein paar Hinweise:
- Die Indizierung bei Strings fängt bei 1 an und nicht bei 0;
- i könnte bei dir nicht initialisiert / außerhalb des Wertebereiches (i < 1 oder i > Length(Str)) sein
- strZeichen könnte nach copy leer sein (Grund: voriger Hinweis ODER auch strNormalText ist leer)

MfG

[Chemiker]

Hallo,

danke an alle ist gelöst.

Habe jetzt eine Stunde daran rumgefummelt. Problem ist gewesen das ich eine Fehlerhafte Anweisung im Editor hatte, außerhalb des Sichtbereiches.

Bis bald Chemiker

[Wolfgang Mix]

... dann zeige doch 'mal jetzt bitte Deine Lösung

danke

Wolfgang

[SirThornberry]

Die bisherigen Dinge waren doch die Lösung laut seiner Aussage. Denn das Problem trat durch eine Anweisung außerhalb des gezeigten/sichtbaren Bereiches auf.

[Wolfgang Mix]

verpennt :)