Цитата:
|
Сообщение от lmikle
Потому что нужная тебе функция называется StringReplace
|
спасибо! но теперь вот что[Error] rd_.pas(129): Not enough actual parameters
Код:
procedure TForm1.Button3Click(Sender: TObject);
var
a: integer;
begin
for a:=0 to Memo1.Lines.Count do
Memo1.Lines[a]:=StringReplace(Memo1.Lines[a], 'html', 'xml');//курсор здесь
end;
end;
Admin: Теги, и еще раз теги! При рецедиве - бан.