Вниз
Скачать: 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 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.02 c
3-1080024659
Trap
2004-03-23 09:50
2004.04.18
Создание системной базы данных Microsoft Jet


3-1079613339
lesha y
2004-03-18 15:35
2004.04.18
<b> Помогите разобраться с InstallShield Express <b>


1-1080885974
V-Isa
2004-04-02 10:06
2004.04.18
Изменить свойство "чужого" компонента.


1-1080848872
mike_forewer
2004-04-01 23:47
2004.04.18
Сортировка в TStringGrid


3-1079721558
Elast
2004-03-19 21:39
2004.04.18
Дата для IB




   Наверх