Локализация встроенных констант

← →
Kolan © (2007-06-26 09:49) [0]

http://www.delphimaster.ru/articles/const_rus/index.html
 Это нормальная статья?

Что-то сделал как написано  не меняется ничего :(

← →
Desdechado © (2007-06-26 09:57) [1]

А ты точно включил Consts в проект явно? В DPR прописан?
Или пути поиска настрой так, чтоб первой шла папка с твоим Consts

← →
Игорь Шевченко © (2007-06-26 09:57) [2]

> — Это нормальная статья?

Для сайта Delphimaster нормальная.

> Что-то сделал как написано — не меняется ничего :(

У автора меняется.
Если в статье есть его e-mail, напиши ему :)

← →
Kolan © (2007-06-26 10:09) [3]

> А ты точно включил Consts в проект явно? В DPR прописан?

Да в DPR прописан. Но он не компилится, dcu
нет. Хотя если сделать Ctrl+Click открывается переведённый модуль.

ЗЫ
Дело происходит в BDS2006

← →
Kolan © (2007-06-26 10:09) [4]

> Для сайта Delphimaster нормальная.

Это меня и пугает :) а так можно делать?

← →
Desdechado © (2007-06-26 10:24) [5]

> Но он не компилится, dcu нет.
Значит, ты указал неявно, без пути. Укажи полный путь (или относительный) или в путях поиска в среде пропиши этот путь первым.

← →
Игорь Шевченко © (2007-06-26 10:45) [6]

Kolan © (26.06.07 10:09) [4]

> а так можно делать?

Зачем ты спрашиваешь у форума, спрашивай у компилятора.

← →
Kolan © (2007-06-26 11:03) [7]

> Зачем ты спрашиваешь у форума, спрашивай у компилятора.

Потому что сделать можно много чего и компилятор к сожалению не знает будет ли у меня из-за этого геморой или нет&#133

← →
Игорь Шевченко © (2007-06-26 11:19) [8]

> Потому что сделать можно много чего и компилятор к сожалению
> не знает будет ли у меня из-за этого геморой или нет…

Опыт - сын ошибок трудных.

Давно бы уже десять раз попробовал и сам бы узнал.
Лично я, извини, ерудной подобного описанному в статье рода никогда не страдал., потому что а) проблема с пакетами б) проблема с совместной работой в) не трожь генофонд, зараза.

Когда кому-то захотелось кнопки с надписями на русском языке, был разработан ряд фукнций, вызывающих в итоге

const
SMsgDlgYes = "Да";
SMsgDlgNo = "Нет";
SMsgDlgCancel = "Отмена";

ButtonNames: array[TMsgDlgBtn] of String = (
"Yes", "No", "OK", "Cancel", "Abort", "Retry", "Ignore", "All", "NoToAll",
"YesToAll", "Help");

function hs_MessageDlgPos(const Msg: string; DlgType: TMsgDlgType;
Buttons: TMsgDlgButtons; HelpCtx: Longint;
DefaultButton: TMsgDlgBtn = mbYes): Integer;
var I: Integer;
begin
with CreateMessageDialog(Msg, DlgType, Buttons) do
try
Caption := Application.Title;
HelpContext := HelpCtx;
Position := poMainFormCenter;
if mbYes in Buttons then
(FindComponent("Yes") as TButton).Caption:=SMsgDlgYes;
if mbNo in Buttons then
(FindComponent("No") as TButton).Caption:=SMsgDlgNo;
if mbCancel in Buttons then
(FindComponent("Cancel") as TButton).Caption:=SMsgDlgCancel;
if DefaultButton in Buttons then
for I:=0 to Pred(ControlCount) do
if (Controls[I] is TButton) and
SameText(Controls[I].Name, ButtonNames[DefaultButton]) then begin
ActiveControl := Controls[I] as TWinControl;
Break;
end;
Result := ShowModal;
finally
Free;
end;
end;

и проблемы с локализацией были решены. Это, правда, было 8 лет назад, сейчас бы решение явно было другое.

← →
Суслик © (2007-06-26 11:21) [9]

А я просто кусок подуля Dialogs.pas взял и перевел под себя.
Заодно дописал некоторые функции для себя. :)

← →
Игорь Шевченко © (2007-06-26 11:23) [10]

Суслик © (26.06.07 11:21) [9]

> А я просто кусок подуля Dialogs.pas взял и перевел под себя.
>
> Заодно дописал некоторые функции для себя. :)

Аналогичный случай был в Тамбове.
http://www.delphikingdom.com/asp/viewitem.asp?catalogid=569

> а) проблема с пакетами б) проблема с совместной работой
> в) не трожь генофонд, зараза.

А говорите  спроси у компилятора&#133

Проще свой диалог написать  благодарю за ответы.

Полный комплект локализованных модулей с константами задолго до появления упомянутой статьи доступен здесь: http://polesoft.narod.ru/

> Полный комплект локализованных модулей с константами задолго
> до появления упомянутой статьи доступен здесь

Там версия Delphi неподходящая ;)

> Kolan (26.06.2007 11:03:07) [7]

> компилятор к сожалению не знает будет ли у меня из-за этого геморой или нет…

Знает - будет!

Локализация встроенных констант Найти похожие ветки