Текущий архив: 2007.03.11;
Скачать: CL | DM;
Вниз
Ловушка для сишника MidStr() Найти похожие ветки
← →
Loginov Dmitry © (2007-02-16 09:11) [0]
uses
StrUtils;
function MidStr(const AText: AnsiString; const AStart, ACount: Integer): AnsiString; overload;
begin
Result := Copy(WideString(AText), AStart, ACount);
end;
Вот на работе у нас один чел на ней и запнулся. Delphi этому способствовала как могла, добавила uses StrUtils автоматически.
Руки мало оторвать тому, кто такой бред написал :)
← →
Думкин © (2007-02-16 12:03) [1]А на чем он запнулся?
← →
Loginov Dmitry © (2007-02-16 12:35) [2]На том, что строка конвертируется в WideString. При обработке больший строк скорость из-за этого падает в сотни раз.
← →
ЮЮ © (2007-02-16 12:43) [3]А если нужен был просто Copy(AText, AStart, ACount), так и надо было писать Copy(AText, AStart, ACount), а не использовать MidStr
← →
Desdechado © (2007-02-16 12:58) [4]Туманен смысл этой функции. Результат все равно AnsiString, как и аргумент.
Страницы: 1 вся ветка
Текущий архив: 2007.03.11;
Скачать: CL | DM;
Память: 0.47 MB
Время: 0.031 c
