Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2013.03.22;
Скачать: CL | DM;

Вниз

PResStringRec -> string   Найти похожие ветки 

 
Scott Storch ©   (2012-06-12 15:51) [0]

Как перевести PResStringRec в string?


resourcestring
 SUFFIX_DAY = "дня";
 SUFFIX_DAYS = "дней";

function GetHint(Value: Integer): PResStringRec;
var
 A, B: Integer;
 S: PResStringRec;
begin
 A := Value mod 10;
 B := Value mod 100;
 if (A = 1) and (B <> 11) then
   S := @SUFFIX_DAY
 else
   if (2 <= A) and (A <= 4) and (B <> A + 10) then
     S := @SUFFIX_DAYS
   else
     S := @SUFFIX_DAYS;
 Result := Format("%d %s", [Value, S]);
end;


 
Давайте будем жрать!   (2012-06-12 15:54) [1]

чего ты вообще добиться хочешь? почему PResStringRec?


 
Scott Storch ©   (2012-06-12 16:06) [2]


> чего ты вообще добиться хочешь? почему PResStringRec?


PResStringRec для локализации (все ресурсные строки подхватываются компонентом-localizer"ом)


 
Давайте будем жрать!   (2012-06-12 16:09) [3]

Ты в исходнике смотрел, что такое PResStringRec?

Чем не устраивает function GetHint(Value: Integer): String?


 
ProgRAMmer Dimonych ©   (2012-06-12 16:09) [4]

> [0] Scott Storch ©   (12.06.12 15:51)

Судя по

function GetHint(Value: Integer): PResStringRec;
S: PResStringRec;

и

Result := Format("%d %s", [Value, S]);

PResStringRec и String вполне себе эквивалентны и взаимозаменяемы?



Страницы: 1 вся ветка

Текущий архив: 2013.03.22;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.048 c
2-1341489229
.code
2012-07-05 15:53
2013.03.22
updater


15-1340314077
ZV
2012-06-22 01:27
2013.03.22
Компонент Async32 не работает в С++


2-1331645587
Сергей
2012-03-13 17:33
2013.03.22
Компонент Delphi для Clob Oracle?


15-1335609759
Тут иногда бываю
2012-04-28 14:42
2013.03.22
Как точно располагать Gui в редакторе?


15-1330531768
Димка На
2012-02-29 20:09
2013.03.22
Gaussian blur