PureBoard

Verfasst: **19.04.2020 14:24**

Hallo, guten Tag.

Wie kann man bitte bei meiner Datei das letzte "+" löschen?
--------------------------------
xarray.obj + xarray1.obj + xsquadi.obj +
cs.lib + brt71enr.lib
--------------------------------

Ich erzeuge hier mit :

Code: Alles auswählen

If EventGadget =  #button_11
         CreateFile(0, "d:\dosc\linker.cmd")
         ReadFile(1, "d:\dosc\compbc.bat")  
         
         While Eof(1) = 0 
           string1=ReadString(1)
           string2 =  GetFilePart(string1)
           WriteString(0,Left(string2,Len(string2)-4)+".obj + ")
         Wend
    
         WriteStringN(0,"")
         WriteStringN(0,"cs.lib + brt71enr.lib")     
         CloseFile(0)
         CloseFile(1)              
      EndIf

danke.

Verfasst: **19.04.2020 14:31**

Code: Alles auswählen

If EventGadget =  #button_11
         CreateFile(0, "d:\dosc\linker.cmd")
         ReadFile(1, "d:\dosc\compbc.bat")  
         
         IsFirst = #True
         While Eof(1) = 0 
           string1=ReadString(1)
           string2 =  GetFilePart(string1)
           If Isfirst
             IsFirst = #False
             WriteString(0,Left(string2,Len(string2)-4)+".obj")
           Else
             WriteString(0," + " + Left(string2,Len(string2)-4)+".obj")
           EndIf
         Wend
    
         WriteStringN(0,"")
         WriteStringN(0,"cs.lib + brt71enr.lib")     
         CloseFile(0)
         CloseFile(1)              
      EndIf

Verfasst: **20.04.2020 00:17**

Hallo, danke für die Hilfe.

GRuss

PureBoard

Letztes Zeichen in Textdatei löschen.

Letztes Zeichen in Textdatei löschen.

Re: Letztes Zeichen in Textdatei löschen.

Re: Letztes Zeichen in Textdatei löschen.