Форум: "Начинающим";
Текущий архив: 2008.10.12;
Скачать: [xml.tar.bz2];
Внизв 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]
Вероятно, поскольку к версия Дельфи не имеет отношение, внутрее, просто включили в библиотеку, что бы не плодить и не переделывать программы. По истории создания библиотеки похоже.
← →
Германн © (2008-09-03 13:42) [12]
> Palladin © (03.09.08 11:10) [3]
>
> я не помню что она делает, но видимо то же, что и StringReplace
> из Delphi6 и выше...
>
То же самое, но StringReplace поддерживает Multibyte characters и флаги rfReplaceAll и rfIgnoreCase. А так почти один в один взято из RxLib.
← →
анонимъ (2008-09-05 17:57) [13]> Palladin © (03.09.08 11:16) [5]
в D5 точно уже присутствует.
← →
koha! (2008-09-08 19:25) [14]
> Palladin © (03.09.08 11:10) [3]
> я не помню что она делает, но видимо то же, что и StringReplace
> из Delphi6 и выше...
http://www.delphibasics.ru/StringReplace.php
между прочим классный ресурс.
← →
Palladin © (2008-09-08 19:28) [15]ай спасибо, что бы я без тебя делал... )
а теперь внимательно читаем вопрос и правильно воспринимаем мой пост.
← →
koha! (2008-09-08 20:05) [16]
> Palladin © (08.09.08 19:28) [15]
> ай спасибо, что бы я без тебя делал... )а теперь внимательно
> читаем вопрос и правильно воспринимаем мой пост.
Наверно, я думал, что не плохо было бы ссылки кидать, когда отвечаешь, ведь там уже все расписано, но видимо написал совсем другое, мда странно.... :-)
Страницы: 1 вся ветка
Форум: "Начинающим";
Текущий архив: 2008.10.12;
Скачать: [xml.tar.bz2];
Память: 0.48 MB
Время: 0.04 c