Ĺadny brzuch
Wydaje mi się, że nazwa tematu jest nieco nie zrozumiała ale nie potrafiłem nazwać tego tematu jaśniej :rolleyes:
Więc postaram się wytłumaczyć tu o co mi chodzi. Mam w TMemo powiedzmy taki tekst: "Nazywam się $imie". Co zrobić, żeby zamiast "$imie" została w to miejsce wpisana wartość zmiennej imie? Np. jeżeli zmienna imie='Damian', to wtedy powinien wyświetlić się w Memo taki tekst: "Nazywam się Damian".
Mam nadzieje że już wszystko jest jasne.
EDIT: Oczywiście nie musi tam być przed tym koniecznie znak dolara.
Użytkownik Capellini edytował ten post 15 lipiec 2006, 17:55
procedure TForm1.Button1Click(Sender: TObject); var imie:string; begin imie:='Damian'; Memo1.Text:=StringReplace(Memo1.Text,'$imie',imie,[rfReplaceAll,rfIgnoreCase] ); end;
Dzięki :) a o co chodzi w tym "[rfReplaceAll,rfIgnoreCase]"?
Użytkownik Capellini edytował ten post 15 lipiec 2006, 18:21
To jest zbiór flag (rfReplaceAll- zamień wszystkie, rfIgnoreCase- ignoruj wielkość liter). :)
zanotowane.pl doc.pisz.pl pdf.pisz.pl zsf.htw.pl
Więc postaram się wytłumaczyć tu o co mi chodzi. Mam w TMemo powiedzmy taki tekst: "Nazywam się $imie". Co zrobić, żeby zamiast "$imie" została w to miejsce wpisana wartość zmiennej imie? Np. jeżeli zmienna imie='Damian', to wtedy powinien wyświetlić się w Memo taki tekst: "Nazywam się Damian".
Mam nadzieje że już wszystko jest jasne.
EDIT: Oczywiście nie musi tam być przed tym koniecznie znak dolara.
Użytkownik Capellini edytował ten post 15 lipiec 2006, 17:55
procedure TForm1.Button1Click(Sender: TObject); var imie:string; begin imie:='Damian'; Memo1.Text:=StringReplace(Memo1.Text,'$imie',imie,[rfReplaceAll,rfIgnoreCase] ); end;
Dzięki :) a o co chodzi w tym "[rfReplaceAll,rfIgnoreCase]"?
Użytkownik Capellini edytował ten post 15 lipiec 2006, 18:21
To jest zbiór flag (rfReplaceAll- zamień wszystkie, rfIgnoreCase- ignoruj wielkość liter). :)