Главная страница
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.152 c
15-1352821553
Дмитрий С
2012-11-13 19:45
2013.03.22
Как записать математически?


15-1328771976
CleriC
2012-02-09 11:19
2013.03.22
Можно ли установить CnWizards (CnPack) для двух версий Delphi?


15-1347981872
dm_member
2012-09-18 19:24
2013.03.22
(Специфичный случай) Сохранение строк в байтовом формате


2-1332009690
теркин
2012-03-17 22:41
2013.03.22
Использование полиморфных объектов


15-1349261272
Jeer
2012-10-03 14:47
2013.03.22
Визуализация данных