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

Вниз

type   Найти похожие ветки 

 
MiCOLA   (2004-04-02 18:18) [0]

У меня проблема, не могу создать тип элиментами которого являются строки:
type
  TX=("odin","dva","tri");
помогите, если кто знает как, решить эту проблему.
Буду очень рад любому совету.


 
Digitman ©   (2004-04-02 18:37) [1]

массивы-то чем не устраивают ?


 
Gero ©   (2004-04-02 19:04) [2]

type
 TX=(odin,dva,tri);

По-другому нельзя.


 
P.N.P. ©   (2004-04-02 19:15) [3]


> По-другому нельзя.

Можно :)
type TMySet= record
odin:string;
dva:string;
tri:string;
end;

var
 Form1: TForm1;
 MySet:TMySet=(odin:"1";dva:"2";tri:"3");


 
Тимохов ©   (2004-04-02 19:16) [4]


> P.N.P. ©   (02.04.04 19:15) [3]


это прямо таки тоже самое...


 
PVOzerski ©   (2004-04-02 19:24) [5]

У меня последних версий Delphi нет под рукой, так что проверить идею не могу. Если enum"ы с указанным значением там поддерживаются в диапазоне longint, а длина строк не превышает 4 символов, можно представить эти строки (вернее, массивы байт) как longint"ы (AKA integer"ы) и выдать нечто вроде
TX=(odin=..., dva=... , tri=...), где вместо многоточий надо вставить правильные константы. Получится оптимизация ценностью в 2 копейки при неудобочитаемом коде. Уж лучше использовать
type
TX=(odin,dva,tri);
const
X:array[TX]of string=("Odin","Dva","Tri");


 
PVOzerski ©   (2004-04-02 19:24) [6]

Удалено модератором
Примечание: дубль



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

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

Наверх




Память: 0.48 MB
Время: 0.028 c
14-1080145970
Nikolay M.
2004-03-24 19:32
2004.04.18
Продолжение о Дедушке Морозе, русских хоткеях и DNS


1-1080563234
Анна
2004-03-29 16:27
2004.04.18
Как можно не позволять редактировать отдельные строки в TMemo?


1-1080909595
ПрогерШ
2004-04-02 16:39
2004.04.18
Как в верде выставить ширину столбцов?


14-1079808990
Sergey Masloff
2004-03-20 21:56
2004.04.18
Чудеса женской интуиции


4-1075355181
Lefan
2004-01-29 08:46
2004.04.18
как получить список служб и их состояние?