Einzelnen Beitrag anzeigen

Matthias-k

Registriert seit: 7. Jul 2005
Ort: Freiberg
75 Beiträge
 
Delphi 7 Professional
 
#1

string problem

  Alt 27. Nov 2005, 15:27
hi leutz!

ich steck grad in ner denkklemme!

und zwar folgendes problem: ich habe einen string, in etwa dem gleich:

test -> art : test2, beschichtet, mat.765

jetzt brauch ich die 3 entscheidenden teile:

test
test2, beschichtet
mat.765

das erste habe ich! (indem ich per pos den pfeil suche)
das 2. klappt noch net und des 3. och net!

beim dritten liegt das problem an evtl 2 vorhandenen kommas! weil ich brauch immer das letzte komma! hab mir deshalb
fix ne funktion geschrieben, welche das erledigt!

Delphi-Quellcode:
function LastPos(str,delemiter : string): integer;
var
  a : integer;
begin
  a := 0;
  for a := length(str) downto 0 do
  begin
    if str[a] = delemiter then
      result := a
    else
      result := 0;
  end;
end;
nur liefert mir alles, was ich versuche, nur müll zurück!

die 3 strings extrahiere ich folgendermaßen:

Delphi-Quellcode:
    
hG := trim(copy(strgtest.Cells[0,4], 0, pos('->', strgtest.Cells[0,4]) - 1));
G := trim(copy(strgtest.Cells[0,4], pos(':', strgtest.Cells[0,4]), LastPos(strgtest.Cells[0,4],',')));
w := trim(copy(strgtest.Cells[0,4], LastPos(strgtest.Cells[0,4], ','), length(strgtest.Cells[0,4])));
vieleicht seh ich nur etwas nicht! oder meine funktion geht so nicht! ich weis es nicht mehr, was ich machen soll!

mfg matthias


Gebt Trollen keine Chance!!!
  Mit Zitat antworten Zitat