Jak w temacie.
To tylko przyjkkład.
Znak może byc w innym miejscu i może być inny niż "3"
HELPPPP {glowa} {glowa} {glowa}
Jak w temacie.
To tylko przyjkkład.
Znak może byc w innym miejscu i może być inny niż "3"
HELPPPP {glowa} {glowa} {glowa}
S:='12121231212';
Jesli wiesz ze '3' (czy co tam chcesz) jest tylko jeden:
Delete(s, Pos('3',S),1); //zamiast 3 wstaw co chcesz
Jesli moze byc wiecej '3':
repeat
Delete(s, Pos('3',S),1);
until Pos('3',S)=0;
--
Pawel {Delphi6 }
Po pierwsze: naciśnij F1
var
tekst:string;
poz:integer;
begin
tekst:='12121231212';
poz:=Pos('3',tekst);
tekst:=Copy(tekst,0,poz-1)+Copy(tekst,poz+1,Length(tekst)-1);
ShowMessage(tekst);
end;--Jest jeszcze jeden błąd ... :)
Dzięki. Dokładnie o to chodziło.
Możesz mi jeszcze napisać co oznaczają x,y w :
pos(x,y)
THX
Luki napisał:
Dzięki. Dokładnie o to chodziło.
>Możesz mi jeszcze napisać co oznaczają x,y w :
>pos(x,y)
>
x - string ktorego szukasz
y - string w ktorym szukasz
F1, czlowieku!!!!!!!!--Pawel {Delphi6 }
Po pierwsze: naciśnij F1