Скачать: 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 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.026 c