Ładny brzuch

Mam jakos zmienna o tresci np. bleble=wiekszeble . Chc, eby to co jest przed znakiem rwnoci zostao zapisane w jednej zmiennej, a to co jest po znaku rownoci w drugiej. Jak to zrobic?


przed := copy(ble, 0, Pos('=', ble)-1); po     := copy(ble, Pos('=', ble)+1), Length(ble);

try


Mam jakos zmienna o tresci np. bleble=wiekszeble . Chc, eby to co jest przed znakiem rwnoci zostao zapisane w jednej zmiennej, a to co jest po znaku rownoci w drugiej. Jak to zrobic?

Mam nadzieje ze o to chodzio:

type  TDwa = record    Raz: String;    Dwa: String;  end; function Rozpoznaj(S: String):TDwa; begin  if Pos('=',S)=0 then Exit;  Result.Raz:=Copy(S,1,Pos('=',S));  Result.Dwa:=Copy(S,Pos('=',S)+1,Length(S)-Pos('=',S) ); end;



Mam nadzieje ze o to chodzio:

type  TDwa = record    Raz: String;    Dwa: String;  end; function Rozpoznaj(S: String):TDwa; begin  if Pos('=',S)=0 then Exit;  Result.Raz:=Copy(S,1,Pos('=',S));  Result.Dwa:=Copy(S,Pos('=',S)+1,Length(S)-Pos('=',S) ); end;

Po prostu...procedure TForm1.Button1Click(Sender: TObject); var s, przed, po:string; begin if pos('=',s)=0 then exit; s:='bleble=wiekszeble'; przed:=copy(s,1,pos('=',s)-1); po:=copy(s,pos('=',s)+1,length(s)-pos('=',s)); end;

a wie ktos moze jak by to bylo w c++?

Mam podobny problem ale trzeba zmienn podzieli na trzy np. costam#costam$costam a pod # mam wstawic zmienna1 a pod $ zmienna2.
Uwaga :excl:
Znaki # moga byc zmienione miejscami a jednego z lancuchow costam moze nie byc. :(

  • zanotowane.pl
  • doc.pisz.pl
  • pdf.pisz.pl
  • zsf.htw.pl
    •