Главная страница
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.47 MB
Время: 0.024 c
7-1076337530
Ivolg
2004-02-09 17:38
2004.04.18
Windows


3-1079938024
Лысый
2004-03-22 09:47
2004.04.18
Вопрос по Distinct


7-1076517027
ZeBriD
2004-02-11 19:30
2004.04.18
Завершение работы под ХР


14-1080119346
DEN75
2004-03-24 12:09
2004.04.18
передача звука по сети


1-1080709051
rosl
2004-03-31 08:57
2004.04.18
форма "сверху"