в rxlib есть ф-ция ReplaceStr, есть ли аналог в самом Delphi

← →
DelphiLexx (2008-09-03 11:03) [0]

Скажите, пожалуйста, есть ли аналог ф-ции ReplaceStr из библиотеки rxlib в самом Delphi

← →
brother © (2008-09-03 11:07) [1]

видимо нет, ибо зачем ее реализовывали тогда в rxlib?

← →
Vlad Oshin © (2008-09-03 11:10) [2]

> ReplaceStr

а чего она делает?

в SysUtils есть
function StringReplace(const S, OldPattern, NewPattern: string;
Flags: TReplaceFlags): string;

← →
Palladin © (2008-09-03 11:10) [3]

я не помню что она делает, но видимо то же, что и StringReplace из Delphi6 и выше...

← →
brother © (2008-09-03 11:14) [4]

если ReplaceStr = StringReplace, то ReplaceStr наверное имеет приимущества ибо [1]

← →
Palladin © (2008-09-03 11:16) [5]

[1] потому что StringReplace появилась начиная с D6. RxLib же куда раньше...

← →
DelphiLexx (2008-09-03 11:32) [6]

спасибо

← →
Anatoly Podgoretsky © (2008-09-03 11:38) [7]

> brother (03.09.2008 11:07:01) [1]

Вопрос сложный, например в RX есть такие функции

function FuncX: tip; begin Result := FuncY; end;

← →
brother © (2008-09-03 11:44) [8]

> function FuncX: tip;
> begin
> Result := FuncY;
> end;

О_о

← →
Palladin © (2008-09-03 11:54) [9]

Ничего тут странного нет :) Просто когда-то была своя реализация... А рефакторинг делать лень :)

← →
Vlad Oshin © (2008-09-03 12:03) [10]

можно чтоб писать меньше, псевдоним, типа
procedure TForm1.Button1Click(Sender: TObject);
type
Tmy1=record
i:integer;
end;

var
a1:tmy1;

function FunctionForCompareToZeroConstantValueAndReplaceItIfTrue:tmy1;
begin
if a1.i=0 then result.i:=1 else result.i:=0;
end;

function F: tmy1;
begin
Result := FunctionForCompareToZeroConstantValueAndReplaceItIfTrue;
end;

begin
a1.i:=0;
ShowMessage(inttostr(f.i));
a1.i:=3;
ShowMessage(inttostr(f.i));
end;

← →
Anatoly Podgoretsky © (2008-09-03 12:31) [11]

> Palladin (03.09.2008 11:54:09) [9]

Вероятно, поскольку к версия Дельфи не имеет отношение, внутрее, просто включили в библиотеку, что бы не плодить и не переделывать программы. По истории создания библиотеки похоже.

> Palladin © (03.09.08 11:10) [3]
>
> я не помню что она делает, но видимо то же, что и StringReplace
> из Delphi6 и выше...
>

То же самое, но StringReplace поддерживает Multibyte characters и флаги rfReplaceAll и rfIgnoreCase. А так почти один в один взято из RxLib.

← →
анонимъ (2008-09-05 17:57) [13]

← →
koha! (2008-09-08 19:25) [14]

> Palladin © (03.09.08 11:10) [3]
> я не помню что она делает, но видимо то же, что и StringReplace
> из Delphi6 и выше...

http://www.delphibasics.ru/StringReplace.php
между прочим классный ресурс.

ай спасибо, что бы я без тебя делал... )
а теперь внимательно читаем вопрос и правильно воспринимаем мой пост.

← →
koha! (2008-09-08 20:05) [16]

> Palladin © (08.09.08 19:28) [15]
> ай спасибо, что бы я без тебя делал... )а теперь внимательно
> читаем вопрос и правильно воспринимаем мой пост.

Наверно, я думал, что не плохо было бы ссылки кидать, когда отвечаешь, ведь там уже все расписано, но видимо написал совсем другое, мда странно.... :-)

в rxlib есть ф-ция ReplaceStr, есть ли аналог в самом Delphi Найти похожие ветки