[gelöst] LF oder CR entfernen

Programmierung unter AOO/LO (StarBasic, Python, Java, ...)

Moderator: Moderatoren

erikafuchs
******
Beiträge: 690
Registriert: Di, 13.02.2007 17:38
Wohnort: Büttelborn

[gelöst] LF oder CR entfernen

Beitrag von erikafuchs »

ich brauche mal wieder Eure Hlfe:
(Mein Rechentrainer geht jetzt ganz gut, jetzt sitze ich am Physiktrainer.)
Ich habe ein Texteingabefeld und möchte den Inhalt dort mit einer vorgegebenen Lösung vergleichen. Im Texteingabefeld ist das Ereignis "Taste gedrückt" mit dem Code:

Code: Alles auswählen

Private Sub Auswertung(oEvt)
	If oEvt.keycode=1280 Then    
		eing = oDialog.getControl( "fld_Antwort" ).Text
    	if (eing)<>"" then 
			right_wrong
    	end if	
	Endif
End Sub
verbunden und right_wrong hat den Code

Code: Alles auswählen

	if (trim(eing)) = trim(oSheet.getCellByPosition(spalte,zeile).string) then richtig=1
... das funktioniert solange das Texteingabefeld nur einzeilig ist, wenn ich es auf mehrzeilig umstelle, klappt das nicht mehr.
Nach der Eingabe meiner Antwort in das Textfeld klicke ich auf Enter und erzeuge damit eine neue Zeile im Textfeld und die steht wahrscheinlich als LF oder CR in der Variablen (eing) - hat jemand eine Idee wie ich dies loswerde?

Nachtrag:
ich hätte noch dies:

Code: Alles auswählen

function LeerzeichenLoeschen (oWort as string)
   do while InStr(oWort," ")>0
      mid(owort,InStr(oWort," "),1,"")
   loop
   	end function
... aber was setze ich anstelle von " " ein?

Ach ja, bei

Code: Alles auswählen

print LeerzeichenLoeschen("hier sind Leerzeichen" 
bekomme ich keinen Rückgabewert?
Zuletzt geändert von erikafuchs am Di, 25.08.2020 21:51, insgesamt 2-mal geändert.
erikafuchs
******
Beiträge: 690
Registriert: Di, 13.02.2007 17:38
Wohnort: Büttelborn

Re: LF oder CR entfernen

Beitrag von erikafuchs »

Ok, ich habe es:

Code: Alles auswählen

function LFLoeschen (oWort as string)
   do while InStr(oWort,chr$(10))>0
      mid(owort,InStr(oWort,chr$(10)),1,"")
   loop
end function
Antworten