| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Русские идентификаторы в Delphi for .Net (BDS 2006) [XP]
nata © (2008-06-20 16:58:00)Мне НЕОБХОДИМО использовать русские буквы в идентификаторах в Delphi for .Net (BDS 2006).
Например,
procedure TWinForm.Кнопка_Click(sender: System.Object; e: System.EventArgs);
var
{$I 'D:\Мои документы\Список_переменных';} : string;
begin
П_Переменная:='natador';
TextBox1.Text:=П_Переменная;
end;
В файле Список_переменных.pas написано имя переменной П_Переменная (для меня важно подключение такого файла).
При первой компиляции имееются сообщения об ошибках:
[Pascal Error] Список_переменных.pas(1): E2038 Illegal character in input file: 'П' (#$1F)
[Pascal Error] Список_переменных.pas(1): E2038 Illegal character in input file: 'я' (#$4F)
[Pascal Error] WinForm.pas(108): E2003 Undeclared identifier: ' П_Переменная'
[Pascal Fatal Error] Project1.dpr(15): F2063 Could not compile used unit 'WinForm.pas'
При повторной компиляции ошибок нет и все работает хорошо.
Как этого избежать, т.к. при подключении многих файлов, компиляция мучительно долгая.
clickmaker (2008-06-23 12:37:00) [1]> мой шеф категорически настоен на русские имена
прямо как в монологе Задорнова: "могём или не могём?" )
Leonid Troyanovsky (2008-06-21 11:20:00) [2]
> Anatoly Podgoretsky © (20.06.08 22:04) [27]
> Основенно здесь 令肌肤绽放珍珠般净白
Кожа расцветает, как жемчуг из незамутненного источника?
--
Regards, LVT.
Германн (2008-06-21 01:16:00) [3]
> Игорь Шевченко © (20.06.08 21:13) [25]
Сегодня днём там были иероглифы. Сейчас вопросительные знаки. Совсем не красиво :(
Anatoly Podgoretsky (2008-06-21 00:07:00) [4]> nata (20.06.2008 23:41:31) [31]
Что бы была не всякая - начинать надо с фото.
Anatoly Podgoretsky (2008-06-21 00:05:00) [5]> Игорь Шевченко (20.06.2008 23:27:30) [30]
Так и не удалось на слабо взять.
Игорь Шевченко (2008-06-21 00:01:00) [6]nata (20.06.08 23:58) [33]
Да у меня вообще-то и проблемы нет (как и BDS2006, впрочем), так что убирать я ее не буду. С вашего позволения.
nata (2008-06-20 23:58:00) [7]можите ее убрать
Игорь Шевченко (2008-06-20 23:57:00) [8]nata (20.06.08 23:41) [31]
и все-таки, зачем точка с запятой после имени файла, который по Include включается ?
nata (2008-06-20 23:41:00) [9]ой ребята, вам явно не хватает общения, а проблема все еще имеется. TurboDelphi 2006 мне не подходит. И впервые меня называют "всякая НАТА".
Игорь Шевченко (2008-06-20 23:27:00) [10]
> Модно ли узнать каждое слово?
у каждого программиста свои секреты :)
Anatoly Podgoretsky (2008-06-20 23:24:00) [11]> Игорь Шевченко (20.06.2008 22:04:28) [28]
Меня интересует, что за длинное имя идентификатора, я ведь в курсе, что каждый значок это одно слово, это наверно немецкий идентификатор и для уменьшения физического размера записан иерофглифами. Модно ли узнать каждое слово?
Игорь Шевченко (2008-06-20 22:04:00) [12]Anatoly Podgoretsky © (20.06.08 22:03) [26]
Все имена переменных - цензурные :)
Anatoly Podgoretsky (2008-06-20 22:04:00) [13]Основенно здесь 令肌肤绽放珍珠般净白
Anatoly Podgoretsky (2008-06-20 22:03:00) [14]> Игорь Шевченко (20.06.2008 21:13:25) [25]
Я стесняюсь спросить, а что там написано?
Игорь Шевченко (2008-06-20 21:13:00) [15]Впрочем, гораздо интереснее так:
unit main;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls;
type
Строка = string;
TForm1 = class(TForm)
Button1: TButton;
procedure Button1Click(Sender: TObject);
end;
var
Form1: TForm1;
implementation
{$R *.dfm}
procedure ПоказатьСообщение (Сообщение: Строка);
begin
ShowMessage(Сообщение);
end;
procedure TForm1.Button1Click(Sender: TObject);
var
胡锦涛, 王岐山, 令肌肤绽放珍珠般净白 : Строка;
begin
令肌肤绽放珍珠般净白 := 'Foo ';
王岐山 := 'Baz ';
胡锦涛 := 'Bar';
ПоказатьСообщение(令肌肤绽放珍珠ഄ 4;净白+王岐山+胡锦涛);
end;
end.
Palladin (2008-06-20 21:11:00) [16]шеф, в том, что он идиот, - не виноват. а вот всяким натам осталось грамотно продемонстрировать шефу на несовместимость желалок и возможностей приобретенного продукта. пусть сам решает что ему надо...
Dummy (2008-06-20 21:04:00) [17]
> мой шеф категорически настоен на русские имена
Может проще сменить щефа? по-моему он - идиот.
Игорь Шевченко (2008-06-20 21:03:00) [18]Все компилируется и даже работает. Единственно - набирать неудобно, все время промеж раскладками переключаться да и редактор в IDE с русскими буквами не дружит
Игорь Шевченко (2008-06-20 21:02:00) [19]TurboDelphi 2006:
varnames.inc
МояПеременная1, МояПеременная2, МояПеременная3
unit main;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls;
type
TForm1 = class(TForm)
Button1: TButton;
procedure Button1Click(Sender: TObject);
end;
var
Form1: TForm1;
implementation
{$R *.dfm}
procedure ПоказатьСообщение (Сообщение: string);
begin
ShowMessage(Сообщение);
end;
procedure TForm1.Button1Click(Sender: TObject);
var
{$I varnames.inc}
: string;
begin
МояПеременная1 := 'Foo ';
МояПеременная2 := 'Bar ';
МояПеременная3 := 'Baz ';
ПоказатьСообщение(МояПеременная1+МояПеременная2+МояПеременная3);
end;
end.
Anatoly Podgoretsky (2008-06-20 20:58:00) [20]> nata (20.06.2008 18:07:17) [17]
У Борланда в отличии от Микрософт очень напряженые отношения с неанглийскими символами, если по рабоче крестьянски - плохо у них выходит. Чего стоит наличие буквы Я в комментариях dpr файла. И тут видимо в лужу сели. А вот у Микрософта еще в 1993 году был с этим порядок, полный порядок.
Вот так Борланд на корню гноит национальные кадры.
| |
Страницы: 