Главная страница
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.035 c
14-1080331912
rubin
2004-03-26 23:11
2004.04.18
Где достать инфу на AMD Duron (Spitfire) строение кэша и т.д. ПЛЗ


14-1079953574
ghg
2004-03-22 14:06
2004.04.18
iriver-550 и sorell smp-t13


7-1076910434
Dark Man
2004-02-16 08:47
2004.04.18
Как перерезать глотку PC Speaker


7-1076436171
Pat
2004-02-10 21:02
2004.04.18
Delphi+FineReader


1-1080554509
СержК
2004-03-29 14:01
2004.04.18
Синхронизация системного времени