Einzelnen Beitrag anzeigen

Benutzerbild von Mavarik
Mavarik

Registriert seit: 9. Feb 2006
Ort: Stolberg (Rhld)
4.130 Beiträge
 
Delphi 10.3 Rio
 
#8

Re: wie trenne ich textzahlen??

  Alt 26. Apr 2006, 15:37
Zitat von devilone:
hmm irgendwie bin ich da zu duselig zu.. die liste bleibt immer noch leer..

ich habe hir doch die bedingung..
Delphi-Quellcode:
procedure analysiere(datei:string);
begin
sl:=tstringlist.Create;
sl.LoadFromFile('creatures.scp');
sl.SaveToFile(extractfilepath(paramstr(0))+'Creatures.scp.temp');
for i:=0 to sl.Count-1 do
  begin
  s:=sl.Strings[i];
  [b]if (s <> '') and (s[1] = '[') and (s[Length(s)] = ']') then[/b]
    begin
     delete(s,1,1);
     delete(s,length(s),1);
      delete(s,1,length('[creature'));
     s:=copy(s,pred(pos(']',s))); // <---- die ] ist doch weg!!!! Also ist POS 0!!!
     vvvv.combobox1.Items.Add(s);
      end;
  end;
end;
wie sage ich ihm das jetzt das er nur das Creatur aus der [Creatur 8767] entfernt, weil die [ ] nimt er ja weg..aber den rest gerade auch..

i am not perfect..ich bin ein mensch...
  Mit Zitat antworten Zitat