AT() bzw. $ Problem [erledigt]

Alle Fragen um die Programmierung, die sich sonst nicht kategorisieren lassen. Von Makro bis Codeblock, von IF bis ENDIF

Moderator: Moderatoren

Antworten
Benutzeravatar
Wolfgang_B
Rekursionen-Architekt
Rekursionen-Architekt
Beiträge: 484
Registriert: Do, 14. Jun 2007 18:22
Wohnort: 94065 Waldkirchen
Hat sich bedankt: 14 Mal
Danksagung erhalten: 5 Mal

AT() bzw. $ Problem [erledigt]

Beitrag von Wolfgang_B »

Hi,
warum funktioniert der Code nicht? Ich lese 1 Zeichen aus der Textdatei aus (ist garantiert ein Wert von 0-9). Bei IF AT() bekomme ich aber immer 0, warum? Das gleiche passiert wenn ich statt AT() IF cBuffer $ "0123456789" verwende. Ich versteh's nicht :(

Code: Alles auswählen

	 nBytes := FREAD(nHandle, @cBuffer, 1)
         IF AT(cBuffer, "0123456789") > 0
  	         wert := wert+ALLTRIM(cBuffer)
         ELSE
        	FSEEK( nHandle, -1, FS_RELATIVE)
            	EXIT
	 ENDIF
Zuletzt geändert von Wolfgang_B am Mo, 20. Apr 2020 17:47, insgesamt 1-mal geändert.
Beste Grüße
Wolfgang

Mitglied des Deutschsprachigen Xbase-Entwickler e. V.
Mitglied der XUG Osnabrück
Benutzeravatar
Wolfgang_B
Rekursionen-Architekt
Rekursionen-Architekt
Beiträge: 484
Registriert: Do, 14. Jun 2007 18:22
Wohnort: 94065 Waldkirchen
Hat sich bedankt: 14 Mal
Danksagung erhalten: 5 Mal

Re: AT() bzw. $ Problem

Beitrag von Wolfgang_B »

Problem gelöst!

cBuffer war mit Space(10) init. Ein ALLTRIM(cBuffer) hat geholfen :D
Beste Grüße
Wolfgang

Mitglied des Deutschsprachigen Xbase-Entwickler e. V.
Mitglied der XUG Osnabrück
Antworten