Главная страница
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.066 c
15-1339585593
KSergey
2012-06-13 15:06
2013.03.22
Про собеседы-то зачем ветку удалили?!


2-1329076090
dis12345
2012-02-12 23:48
2013.03.22
checkbox в stringgrid


2-1328768439
Александр_2012
2012-02-09 10:20
2013.03.22
Ввод шрифтов, формирующих таблицы в кнопки и редакторы


15-1346212466
Al2017
2012-08-29 07:54
2013.03.22
Не выходит задать течение нескольких несвязанных труб


15-1330115402
Юрий
2012-02-25 00:30
2013.03.22
С днем рождения ! 25 февраля 2012 суббота